| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 450 人关注过本帖
标题:数据库插入记录的问题
取消只看楼主 加入收藏
zsl5566
Rank: 1
来 自:泉州
等 级:新手上路
帖 子:163
专家分:0
注 册:2006-12-12
收藏
 问题点数:0 回复次数:1 
数据库插入记录的问题

调试出错的提示:
Microsoft VBScript 编译器错误 错误 '800a03f6'

缺少 'End'

/iisHelp/common/500-100.asp,行242

Microsoft JET Database Engine 错误 '80040e14'

FROM 子句语法错误。

/reg_chk.asp,行24

表单代码:
<form id="form2" name="form2" method="post" action="reg_chk.asp" onsubmit="return check(this)"><br><br>

<table width="341" height="246" border="0" cellpadding="0" cellspacing="0">
<tr>
<td>用&nbsp;户&nbsp;名:</td>
<td><label>
<input name="uname" type="text" id="uname" />
<span class="STYLE2">*</span></label></td>
</tr>
<tr>
<td>密&nbsp;&nbsp;&nbsp;&nbsp;码:</td>
<td><label>
<input name="pwd1" type="password" id="pwd1" />
<span class="STYLE2">*</span></label></td>
</tr>
<tr>
<td><p>密码确认:</p> </td>
<td><input name="pwd2" type="password" id="pwd2" />
<span class="STYLE2">*</span> </td>
</tr>
<tr>
<td>电子邮箱:</td>
<td><label>
<input name="email" type="text" id="email" />
<span class="STYLE2">*</span></label></td>
</tr>
<tr>
<td>联系电话:</td>
<td><label>
<input name="tel" type="text" id="tel" />
<span class="STYLE2">*</span></label></td>
</tr>
<tr>
<td>联系地址:</td>
<td><input name="add" type="text" id="add" />
<span class="STYLE2">*</span></td>
</tr>
<tr>
<td colspan="2"><label>
<div align="center">
<input type="submit" name="Submit" value="注册" />&nbsp;&nbsp;
<input type="reset" name="Submit2" value="重置" />
</div>
</label></td>
</tr>
</table>
<p>&nbsp;</p>
</form>
插入动作的代码:
<!-- #include virtual="/inc/conn.asp" -->
<!-- #include virtual="/inc/jk_md5.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>无标题文档</title>
</head>
<%
If Request.Form("uname")<>"" And Request.Form("pwd1")<>"" And Request.Form("pwd2")<>"" And Request.Form("email")<>"" And Request.Form("tel")<>"" And Request.Form("add")<>"" Then
Dim strSql,sql,uname,password,password1,tel,add,email
uname=Request.Form("uname")
password=Request.Form("pwd1")
password1=Request.Form("pwd2")
tel=Request.Form("tel")
add=Request.Form("add")
email=Request.Form("email")
if password<>password1 then
response.write "<script>alert('两次密码不正确!');</script>"
response.write"<a href='reg1.asp'>返回</a>"
else
set rs=server.CreateObject("adodb.recordset")
sql="select * from user where Name='"&uname&"'"
set rs=conn.execute(sql)
if rs.eof then
password=jk_md5(password,"short")
strSql="insert into user ([Name],[Pwd],[Tel],[Add],[email]) values ('"&uname&"','"&password&"','"&tel&"','"&add&"','"&email&"')"
conn.Execute(strSql)
Response.Write "添加成功!"
Response.Write "<a href='index.asp'>返回首页登录</a>"
Else
Response.Write "该用户已存在!"
Response.Write "<a href='reg1.asp'>重新填写</a>"

End If
End If
End If

%>
<body>
</body>
</html>

搜索更多相关主题的帖子: 数据库 记录 
2007-05-08 16:51
zsl5566
Rank: 1
来 自:泉州
等 级:新手上路
帖 子:163
专家分:0
注 册:2006-12-12
收藏
得分:0 
OK了,谢谢~~
想问一下,什么情况下要加[]

不要给准备要做的事寻找失败的理由~~
2007-05-08 17:15
快速回复:数据库插入记录的问题
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.024399 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved