学习中受“挫”
今天小有兴趣做了三个页面用来实现记录的修改工作。可是谁知老天如此不配合。测试到第三个页面怎么的也能不过,看也老长时间都看不出什么问题来。请各位仁兄帮帮忙!!第一个页面代码是一个目录页
<!--#include file="conn.asp"-->
<!--连接表,在目录布面中-->
<% dim exec
exec="select * from jibenxinxi"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,1 %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>记录修改页面</title>
</head>
<body>
<table border="1" bordercolor="#3399CC" class="neirong" >
<% if rs.eof and rs.bof then %>
<tr><td>暂无记录</td>
<tr>
<% else %>
<tr>
<% do while (not rs.eof) %>
<td><a href="xgnr.asp?bh=<% =rs("bh") %>"><% response.write(rs("xm")) %></a></td>
<% rs.movenext
loop %>
</tr>
<% end if %>
</table>
</body>
</html>
第二个页面代码修改做用。
<!--#include file="conn.asp"-->
<% dim xbh
xbh="1"
if(request.querystring("bh")<>" ") then
xbh=request.QueryString("bh")
end if %>
<% dim exec
exec="select * from jibenxinxi where bh=" + xbh
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,1,3 %>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>修改页面</title>
<style type="text/css">
<!--
.STYLE1 {
color: #FFFFFF;
font-size: 12px;
font-style: normal;
line-height: normal;
font-weight: lighter;
font-variant: normal;
text-transform: none;
}
-->
</style>
</head>
<body>
<table width="489" height="109" border="1" cellpadding="0" cellspacing="0" bordercolor="#000000">
<tr>
<th colspan="2" bgcolor="#000000" scope="row"><span class="STYLE1">注册表</span></th>
</tr>
<tr bgcolor="#666666">
<th width="148" class="STYLE1" scope="row">姓名</th>
<td width="468" rowspan="4"><form name="form1" method="post" action="xgcg.asp">
<table width="436" border="0" cellpadding="0" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#000000">
<tr>
<th scope="row"><label>
<input name="xm" type="text" size="60" value="<% =rs("xm") %>">
</label></th>
</tr>
<tr>
<th scope="row"><label>
<input name="xb" type="text" size="60" value="<% =rs("xb") %>">
</label></th>
</tr>
<tr>
<th scope="row"><label>
<input name="nl" type="text" size="60" value="<% =rs("nl") %>">
</label></th>
</tr>
<tr>
<th scope="row"><label>
<input name="dh" type="text" size="60" value="<% =rs("dh") %>">
</label></th>
</tr>
</table>
<tr bgcolor="#666666">
<th class="STYLE1" scope="row">性别</th>
</tr>
<tr bgcolor="#666666">
<th class="STYLE1" scope="row">年龄</th>
</tr>
<tr bgcolor="#666666">
<th height="15" class="STYLE1" scope="row">电话</th>
</tr>
<tr bgcolor="#666666">
<th colspan="2" scope="row">
<label>
<input type="submit" name="Submit" value="提交">
</label>
<label>
<input type="reset" name="Submit2" value="重置">
</label>
</form>
<% rs.close
set rs=nothing
conn.close
set conn=nothing %>
</th>
</tr>
</table>
</body>
</html>
第三个页面修改成项提示————————问题就出现在这个页面
<!--#include file="conn.asp"-->
<% dim exec,sql,xm,xb,nl,dh
sql="select * from jibenxinxi where bh=" & request.Form("bh")
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,3 这就 是第5行
xm=request.form("xm")
xb=request.form("xb")
nl=request.form("nl")
dh=request.form("dh")
exec=" insert into jibenxinxi (xm,xb,nl,dh) values ('"+ xm +"','"+ xb +"','"+ nl +"','"+ dh +"')"
conn.execute exec %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>修改成功</title>
</head>
<body>
恭喜你修改第<% =rs("bh") %>记录已成功!
<% rs.close
set rs=nothing
conn.close
set conn=nothing %>
</body>
</html>
提示信息如下:
错误类型:
Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 'bh=' 中。
/xgcg.asp, 第 5 行
[[it] 本帖最后由 it2008chf 于 2008-6-30 17:36 编辑 [/it]]