或者改一下我下面这个也行
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<%
set conn=server.createobject("adodb.connection")
conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("db_sousuo1.mdb")
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<table width="535" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="200" valign="top">
<%
dim rs,sql
set rs=server.CreateObject("adodb.recordset")
sql="select * from product where "
if trim(request("bt"))<>"" then
sql= sql & "carclass like '%"&trim(request("bt"))&"%' and "
end if
if trim(request("nr"))<>"" then
sql= sql & "provice like '%"&trim(request("nr"))&"%' and "
end if
本内容试读结束，登录后可阅读更多
下载后可阅读完整内容，剩余2页未读，立即下载
