好的.代碼我貼出來了,請幫我看啊!
這是產品搜索網面:
Untitled Document
這是asp程序
產品查詢
<%
'創建 Ado Connection, 打開access數據庫'
Set cn=Server.CreateObject("ADODB.Connection")
cn.Open "AccessDatabase"
Set.rs=Server.CreateObject("ADODB.Connection")
'下面語句中的product指數據庫中的prodcut表,access中的數據庫包括多人個表'
strsql="SELECT*FROM Prodcut Where product_name="& Request("Name") & ""
rs.Open strsql,cn
If rs.EOF Then
Response.Write"很抱謙,沒有您要的這種產品
"
End If
Set Name1=rs("product_name")
set name2=rs("product_type")
set name3=rs("product_price")
do until rs.eof
response.write name1 & " " & name2 & " " & name3 & "
"
rs.movenext
loop
rs.close
cn.close
%>