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

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 行

快帮我!

...全文

242 点赞收藏 15

写回复

15 条回复

切换为时间正序

当前发帖距今超过3年，不再开放新的回复

发表回复

wyy1001 2004-08-11

回复赞

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

回复赞