输入要查询的id：
<input type="text" name="idquerst" id="idquerst" />
<%
dim textid
textid=idquerst.value
Set rs = Server.CreateObject("ADODB.Connection")
rs.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&server.MapPath("data\userdata.mdb")
set us=server.CreateObject("adodb.recordset")
us.open "select * from users where id='" & textid & "'",rs,1,1
response.Write us("username")
response.Write("<p>")
response.Write us("pwd")
%>
上面这段代码不能运行，想根据text中输入的id号在数据库中查询

us.open "select * from users where id=" & textid,rs,1,1这样就可以运行了，自己解决，哈哈

ID是数字类型，你用字符类型当然出错。