急!请高手请进!关于注册的问题!

wyy1001 2004-08-10 11:19:49
我想把用户注册信息写到数据库中!,请问怎么办!
reg.asp的代码:
<HTML>

<HEAD><TITLE>ASP实例</title></head>

<body>

<form name="form1" method="post" action="reg1.asp">
姓名:
<input type="text" name="name">
<br>
密码:
<input type="password" name="psw">
<br>
<br>
性别:
<input type="radio" name="sex" value="男">

<input type="radio" name="sex" value="女">
女 <br>
<br>
城市:
<select name="city">
<option value="上海" selected>上海</option>
<option value="北京">北京</option>
</select>
<br>
<input type="submit" name="Submit" value="提交">
<input type="reset" name="Submit2" value="重置">
</form>




</body>

</html>

reg2.asp页的代码为:
<html>
<head>
<title>无标题文档</title>
</head>

<body>
<%
name=request.form("name")
psw=request.form("psw")
sex=request.form("sex")
city=request.form("city")

Set DataCon=Server.CreateObject("ADODB.Connection")
Set Rs=Server.CreateObject("ADODB.Recordset")
DataCon.ConnectionTimeout=20
DataCon.Open "DSN=guestbook_server;uid=sysdy;pwd=185898"

sqlquery="select * from reg_info where name='"&name&"'"
set rs=datacon.execute(sqlquery)
if not rs.eof then
Response.Write "<html><body><center><font size=5>您的名字已经有人在使用。</font></center></body></html>"
else
sqlstr="insert into reg_info(name,pwd,sex,age,email,QQ)"
sqlstr=sqlstr & "values('"&name&"','"&pwd&"','"&sex&"','"&age&"','"&email&"','"&QQ&"')"
DataCon.Execute(sqlstr)
end if

response.write name
response.write psw
response.write sex
response.write city
%>

</body>
</html>


可是错误信息为:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified
/reg1.asp, 第 16 行

快帮我!
...全文
291 15 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
15 条回复
切换为时间正序
请发表友善的回复…
发表回复
wyy1001 2004-08-11
  • 打赏
  • 举报
回复
up
wyy1001 2004-08-10
  • 打赏
  • 举报
回复
这也里是一个自动存取的过程
大哥,你们快回答呀
怎么不们不告诉我详细点呀
batistuta97 2004-08-10
  • 打赏
  • 举报
回复
只要把数据库类型选成MDB的就是了啊
wyy1001 2004-08-10
  • 打赏
  • 举报
回复
我是用的access建的数据库
名字为reg.mdb 表为reg_info
我把我的数据库和我的这个asp放在了一个文件夹里
ycted 2004-08-10
  • 打赏
  • 举报
回复
控制面版->管理工具->ODBC数据源,然后你就可以看到有系统dsn和用户dsn.那就看你用那个,你就在那个下面定义好你的dsn
batistuta97 2004-08-10
  • 打赏
  • 举报
回复
控制面板->管理工具->数据源(ODBC)->系统DNS->添加->SQL SERVER->名称添guestbook_server,服务器选择reg_info表所在服务器->填写登录用户名和密码->下一步->下一步->完成->测试数据源
wyy1001 2004-08-10
  • 打赏
  • 举报
回复
没有,大哥,怎么定义呀!
GageCSDN 2004-08-10
  • 打赏
  • 举报
回复
DSN guestbook_server没有定义吧
batistuta97 2004-08-10
  • 打赏
  • 举报
回复
DSN=guestbook_server设置的问题,检查一下DNS吧
wyy1001 2004-08-10
  • 打赏
  • 举报
回复
<html>
<head>
<title>无标题文档</title>
</head>

<body>
<%
name=request.form("name")
psw=request.form("psw")
sex=request.form("sex")
city=request.form("city")

Set DataCon=Server.CreateObject("ADODB.Connection")
Set Rs=Server.CreateObject("ADODB.Recordset")

MM_conn_STRING.ConnectionTimeout=20
MM_conn_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ=C:\Inetpub\wwwroot\wang\reg.mdb"
sqlquery="select * from reg_info where name='"&name&"'"
set rs=datacon.execute(sqlquery)
if not rs.eof then
Response.Write "<html><body><center><font size=5>您的名字已经有人在使用。</font></center></body></html>"
else
sqlstr="insert into reg_info(name,pwd,sex,city)"
sqlstr=sqlstr & "values('"&name&"','"&pwd&"','"&sex&"','"&city&"')"
DataCon.Execute(sqlstr)
end if

response.write name
response.write psw
response.write sex
response.write city
%>
</body>
</html>


还是错了,小妹闷死了,快帮一下呀
错误信息为:
错误类型:
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/wang/reg1.asp, 第 16 行


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.0.3705; .NET CLR 1.1.4322)

网页:
POST 74 ??? /wang/reg1.asp

POST Data:
name=wyy1001&psw=19841001&sex=%C5%AE&city=%C9%CF%BA%A3&Submit=%CC%E1%BD%BB
zhouyouok 2004-08-10
  • 打赏
  • 举报
回复
insert into 表名(字段1,字段2.....) values(value1,value2)字段名和值要相对应的。
zhouyouok 2004-08-10
  • 打赏
  • 举报
回复
sqlstr="insert into reg_info(name,pwd,sex,age,email,QQ)"
sqlstr=sqlstr & "values('"&name&"','"&pwd&"','"&sex&"','"&city&"')"
你这个city是什么是不是和上面不对应了。
wyy1001 2004-08-10
  • 打赏
  • 举报
回复
<html>
<head>
<title>无标题文档</title>
</head>

<body>
<%
name=request.form("name")
psw=request.form("psw")
sex=request.form("sex")
city=request.form("city")

Set DataCon=Server.CreateObject("ADODB.Connection")
Set Rs=Server.CreateObject("ADODB.Recordset")

MM_conn_STRING.ConnectionTimeout=20
MM_conn_STRING = "Driver={Microsoft Access Driver (*.mdb)};DBQ=C:\Inetpub\wwwroot\wang\reg.mdb"

sqlquery="select * from reg_info where name='"&name&"'"
set rs=datacon.execute(sqlquery)
if not rs.eof then
Response.Write "<html><body><center><font size=5>您的名字已经有人在使用。</font></center></body></html>"
else
sqlstr="insert into reg_info(name,pwd,sex,age,email,QQ)"
sqlstr=sqlstr & "values('"&name&"','"&pwd&"','"&sex&"','"&city&"')"
DataCon.Execute(sqlstr)
end if

response.write name
response.write psw
response.write sex
response.write city
%>
</body>
</html>

现在的错误信息为:

错误类型:
Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: ''
/wang/reg1.asp, 第 16 行


浏览器类型:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; .NET CLR 1.0.3705; .NET CLR 1.1.4322)

网页:
POST 74 ??? /wang/reg1.asp

POST Data:
name=wyy1001&psw=19841001&sex=%C5%AE&city=%C9%CF%BA%A3&Submit=%CC%E1%BD%BB

大哥,仔细给我看一下呀,我在急等!
我一定给你多一点分的,少了,再加
colinliu 2004-08-10
  • 打赏
  • 举报
回复
还有,大哥,你的age定义的是数字型的吧?如果是的话,就应该写成这样:

sqlstr="insert into reg_info(name,pwd,sex,age,email,QQ)"
sqlstr=sqlstr & "values('"&name&"','"&pwd&"','"&sex&"',"&age&",'"&email&"','"&QQ&"')"
DataCon.Execute(sqlstr)
wyy1001 2004-08-10
  • 打赏
  • 举报
回复
这也里是一个自动存取的过程
大哥,你们快回答呀
怎么不们不告诉我详细点呀

如果你真想帮我QQ154389914
QQMM86@hotmail.com

28,409

社区成员

发帖
与我相关
我的任务
社区描述
ASP即Active Server Pages,是Microsoft公司开发的服务器端脚本环境。
社区管理员
  • ASP
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧