Question

ASP+ACCESS数据库查询，求助！

想设计一个ASP+ACCESS查询数据库的小程序，分为2个页面，第一个叫index.asp，代码：<form action="look.asp" method="post" name="form1">
<input name="xh" type="text" size="19" maxlength="6" style="font-family: 宋体; font-size: 12pt">
<input name="submit" type="submit" value="确认" style="font-family: 宋体; font-size: 12pt">
<input type="reset" name="btn2" value="重置" style="font-family: 宋体; font-size: 12pt"> 第二个叫look.asp，代码：<%
xh=request("xh")
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("date.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
if request("xh")<>"" then
sql="select * from sql where xh like'" & xh & "'"
else
sql="select top 1 * from sql"
end if
rs.Open sql,conn,1,1
totalput=rs.RecordCount
if rs.EOF and rs.BOF then
Response.Write "输入条件错误，请核对后重新输入！"
else
%>
<%=rs("top1")%>
<%=rs("top2")%>
<%=rs("top3")%>
<%=rs("top4")%>
<%=rs("top5")%>
<%=rs("top6")%>
<% do while not rs.eof %>
<%
rs.movenext
loop
end if
rs.Close
set rs=nothing
set conn=nothing
%>

数据库叫：date.mdb。现在的问题时，我想在index.asp页面里输入3个查询条件，且必须3个条件全部输入正确，才可以显示，否则将弹出对话框提示“请输入完整查询条件”假设这3个条件分别是<%=rs("top1")%>、<%=rs("top2")%>、<%=rs("top3")%>

Answer 1

<script language="javascript">
function check()
{

if (document.form1.xh1.value=="" || document.form1.xh2.value=="" || document.form1.xh3.value=="" )
{
alert("输入有误，请检查重新输入！");
return false;
}

}
</script>
<form action="look.asp?xh1=request("xh1")&xh2=request("xh2")&xh3=request("xh3")" method="post" name="form1">
<input name="xh1" type="text" size="19" maxlength="6" style="font-family: 宋体; font-size: 12pt">
<input name="xh2" type="text" size="19" maxlength="6" style="font-family: 宋体; font-size: 12pt">
<input name="xh3" type="text" size="19" maxlength="6" style="font-family: 宋体; font-size: 12pt">
<input name="submit" type="submit" value="确认" style="font-family: 宋体; font-size: 12pt" onClick="return check()">
<input type="reset" name="btn2" value="重置" style="font-family: 宋体; font-size: 12pt">

///////////look.asp
<%
xh1=request("xh1")
xh2=request("xh2")
xh3=request("xh3")
set rs=server.createobject("adodb.recordset")
conn = "DBQ=" + server.mappath("date.mdb") + ";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"

sql="select * from sql where top1 like '" & xh1 & "' and top2 like '"&xh2&"' and xh3='"&xh3&"'"

rs.Open sql,conn,1,1
totalput=rs.RecordCount
if rs.EOF then
Response.Write "输入条件错误，请核对后重新输入！"
else
do while not rs.eof %>
<%=rs("top1")%> 
<%=rs("top2")%> 
<%=rs("top3")%> 
<%=rs("top4")%> 
<%=rs("top5")%> 
<%=rs("top6")%> <br /><br />

<%
rs.movenext
loop
end if
rs.Close
set rs=nothing
set conn=nothing
%>

Answer 2

你说数据库名叫 date.mdb

而你代码是这样定的 sql="select * from sql where xh like'" & xh & "'"
这里的数据库名为 sql 数据库名错误

Answer 3

判断一下不就行了把这三个条件都拿出来判断