<% searchword1 = Request("input1") searchword2 = Request("input2") Dim objConn Dim objRec Dim strConn TitleAuthorSQL = "SELECT authors.au_lname,authors.au_fname,titles.title_id,titles.title From titles,authors,titleauthors where authors.au_id=titleauthors.au_id AND titles.title_id=titleauthors.title_id AND authors.au_lname like'"&searchword1&"%' AND titles.title like '"& searchword2&"%' order by authors.au_lname,authors.au_fname;" Set objConn = Server.CreateObject("ADODB.Connection") Set objRec = Server.CreateObject("ADODB.Recordset") objConn.Open strConnect %>
Search :     
Simple Query
Ordering Column Data
Author Loops
Stores Loops
Simple Dbase Query
Complex Dbase Query
Sales in Stores
Current Server Time
Master Detail
HotList Project
Publishers&Titles Hot List
PlayList Using File
PlayList Using DBase


Main Link Page

LAB12:TWO ARGUMENTS FOR ONE QUERY

The Search String You Entered For Author was:  <% =searchword1 %>
The Search String You Entered For Title was:  <% =searchword2 %>

ENTER AN AUTHOR AND A TITLE SEARCH STRING HERE:

AUTHOR: TITLE:

HERE ARE THE RESULTS OF YOUR DATABASE QUERY

<% if Request.Form("go1") <> "" Then objRec.Open TitleAuthorSQL, objConn %> <% while Not objRec.EOF Response.Write "" & objRec("au_lname") & ", " & objRec("au_fname") & ", " & objRec("title_id") & ", " & objRec("title") & "
" objRec.MoveNext Wend End If 'objRec.Close set objRec = Nothing %>

C++ Tutorial ASP Tutorial Java Tutorial XML Tutorial
Visual Basic And More Javascript doc Flash Tutorial
DeVry University Bronx Community College My Library
Send comments to Support@rrasaq.com