cmd2007 发表于 2008-7-17 18:39

这段代码逻辑错了 请教怎么改

<%
   set conn = server.CreateObject("adodb.connection")
   conn.open "dbq="&server.MapPath("gs.mdb")&";driver={microsoft access driver (*.mdb)}"
   key = request.form("key")            '获取表单提交的关键字
   sql2 = "select * from yuangong where xingming like '%"&key&"%'  "    '查询关键字
   set rs = server.CreateObject("adodb.recordset")
   rs.open sql2,conn,1,1
   %>         
    下面应该输出 包含关键字的 数据库内容,但是上面代码有问题,输出的是最后一条数据库内容,
   请教上面要怎么改 才可以输出包含关键字的数据库内容
        <input name="text1" type="text" value="<%=rs("xingming")%>" />
        <p><input name="text2" type="text" value="<%=rs("nianling")%>" /></p>
        <p><input name="text3" type="text" value="<%=rs("huji")%>" /></p>
        <p><input name="text4" type="text" value="<%=rs("xueli")%>" /></p>
        <p><input name="text5" type="text" value="<%=rs("zhiwei")%>" /></p>
        <p><input name="text6" type="text" value="<%=rs("lianxi")%>" /></p>
        <p><input name="text7" type="text" value="<%=rs("jingli")%>" /></p>

multiple1902 发表于 2008-7-17 18:46

这条记录符合筛选条件吗?
确定key有值吗?

tianyu123 发表于 2008-7-17 19:09

<%
   set conn = server.CreateObject("adodb.connection")
   conn.open "dbq="&server.MapPath("gs.mdb")&";driver={microsoft access driver (*.mdb)}"
   key = request.form("key")            '获取表单提交的关键字
  [color=Red] response.write key '输出key的值 看是否获取到了值
   response.end[/color]
   sql2 = "select * from yuangong where xingming like '%"&key&"%'  "    '查询关键字
   set rs = server.CreateObject("adodb.recordset")
   rs.open sql2,conn,1,1
   %>

cmd2007 发表于 2008-7-17 21:19

谢谢斑竹和tianyu123的提醒 出来了

页: [1]

编程论坛