新微赢技术网
标题:
[求助]查询问题高手来看看呀
[打印本页]
作者:
满天星
时间:
2010-1-6 23:38
标题:
[求助]查询问题高手来看看呀
我是初学者 高手帮我看看到底下面有多少个地方是错误的呀! 错误地方帮忙用红字改改谢谢了
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<form id="form1" name="form1" method="post" action="bbl.asp">
<label>
<center>
<input name="name" type="text" id="name" />
:<input type="submit" name="Submit" value="提交">
</center>
</label>
</form>
<table width="225" border="1" align="center">
<tr>
<td width="50" align="center">id</td>
<td width="49" align="center">名称</td>
<td width="51" align="center">地址</td>
<td width="47" align="center">操作</td>
</tr>
<%
if action = "bbl" then
bbkid = request.form("bbkid")
bbk = request.form("bbk")
sql = "select * from bbk where id=" & bbkid
set rs = server.createobject("adodb.recordser")
rs.open sql,conn,1,1
if rs.eof or rs.bof then
end if
end if
%>
<script>alert('找不到该文件');history.back();</script>
<%
do while not rs.eof
%><
<tr>
<td><%=rs("id")%></td>
<td><%=rs("name")%></td>
<td><%=rs("movie")%></td>
<td align="center"><a href="kkl.asp">修改</a></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<p> </p>
</body>
<%
rs.close
set rs = nothing
conn.close
set conn = nothing
%>
</html>
作者:
听雨飞扬
时间:
2010-1-6 23:39
是这样的 !
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<body>
<form id="form1" name="form1" method="post" action="bbl.asp">
<label>
<center>
<input name="name" type="text" id="name" />
:搜索
<input type="submit" name="Submit" value="提交">
</center>
</label>
</form>
<table width="225" border="1" align="center">
<tr>
<td width="50" align="center">id</td>
<td width="49" align="center">名称</td>
<td width="51" align="center">地址</td>
<td width="47" align="center">操作</td>
</tr>
<%
if action = "bbl" then
bbkid = request.form("bbkid")
bbk = request.form("bbk")
sql = "select * from bbk where id=" & bbkid
set rs = server.createobject("adodb.recordser")
rs.open sql,conn,1,1
if rs.eof or rs.bof then
end if
end if
%>
<script>alert('找不到该文件');history.back();</script>
<%
do while not rs.eof
%><
<tr>
<td><%=rs("id")%></td>
<td><%=rs("name")%></td>
<td><%=rs("movie")%></td>
<td align="center"><a href="kkl.asp">修改</a></td>
</tr>
<%
rs.movenext
loop
%>
</table>
<p> </p>
</body>
<%
rs.close
set rs = nothing
conn.close
set conn = nothing
%>
</html>
欢迎光临 新微赢技术网 (http://bbs.weiying.cn/)
Powered by Discuz! X3.2