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

调试出错的提示:
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
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
sql="select * from [user] where Name='"&uname&"'"
再试试。
2007-05-08 17:10
zsl5566
Rank: 1
来 自:泉州
等 级:新手上路
帖 子:163
专家分:0
注 册:2006-12-12
收藏
得分:0 
OK了,谢谢~~
想问一下,什么情况下要加[]

不要给准备要做的事寻找失败的理由~~
2007-05-08 17:15
yms123
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:209
帖 子:12488
专家分:19042
注 册:2004-7-17
收藏
得分:0 
sql="select * from [user] where Name='"&uname&"'"
user是数据库的保留关键字,一般如果用数据库的保留关键字做表名时必须加括号以区分表名和关键字,否则程序区分不了就会错误。
2007-05-08 17:18
kidy2005
Rank: 1
等 级:新手上路
帖 子:107
专家分:0
注 册:2007-4-18
收藏
得分:0 
有时不加也可以的,我都是经常不加[]照样可以用

恒天装饰网:http://www.
2007-05-09 11:53
cyc308
Rank: 1
等 级:新手上路
帖 子:83
专家分:0
注 册:2005-5-26
收藏
得分:0 
保留关键字一定要加
2007-05-09 12:59
快速回复:数据库插入记录的问题
数据加载中...
 
   



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

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