set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("shop.mdb") exec="select * from E_product where ProductNum='"&request("ProductNum")&"'" set rs=server.createobject("adodb.recordset") rs.open exec,conn,1,1 --------------第16行

if request("ProductNum")="" then response.Write "对不起,请输入产品序号或者名称." else response.Write "以下是你要查找的产品的信息:" response.Write "<hr noshade>" response.Write "<table width='90%' border='0' align='center'>" response.Write"<tr>" response.Write"<td width='20%'><img src='"&rs("ProductPhoto")&"' width='138' height='139'</td>" response.Write"<td width='50%'>"& rs("ProductContent")&"</td>" response.Write"<td width='20%'>价格:"& rs("ProductPrice")&"RMB</td>"%> <td width="10%"><form name="form1" method="post" action="ebuy.asp"> <input type="hidden" name="ProductNum" value="<%=rs("ProductNum")%>"> <input type="submit" name="submit" value="购买"> </form></td> <%response.Write"</tr>" end if

rs.close set rs=nothing conn.close set conn=nothing

IE提示

Microsoft OLE DB Provider for ODBC Drivers 错误 '80040e21'

ODBC 驱动程序不支持所需的属性。

/blue/enumsearch.asp，行16

if rs.eof then ...... else ......... end if

exec="select * from E_product where ProductNum='"&request("ProductNum")&"'"

这里的 ProductNum 是数字来的吧???是的话就要改为: exec="select * from E_product where ProductNum="&request("ProductNum")&""