| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 1512 人关注过本帖
标题:折磨了我N天了,盼能人指点一下,不盛感激,在线等待……
只看楼主 加入收藏
hahatuzi2000
Rank: 1
等 级:新手上路
帖 子:39
专家分:0
注 册:2008-7-25
收藏
得分:0 
[bo][un]快疯了[/un] 在 2008-8-18 09:22 的发言:[/bo]

7楼的,你说这段代码哪儿找的,什么意思?
我的代码有问题,是吗?
能告诉我哪儿有问题吗?说明白点,好吗?

这段代码是怎么来的啊?自己编写的么? ,看了半天才看懂.
没有检测过,你先试试看.我觉得应该可以了吧

代码如下:[Reg_Submit.asp]



Set Rec3=Server.CreateObject("ADODB.Recordset")
SQL3="Select * from Users where User='"&Name3&"' or UserName='"&User3&"'"
Rec3.Open SQL3,GJ_Cnn,1,3
if rec3("User")=Name3 then Response.Redirect "reg.asp?Err=10&N='"&Name3&"'"  end if    '重定向到注册页面,并附上提示信息:该真实姓名的用户已注册
if rec3("UserName")=User3 then Response.Redirect "reg.asp?Err=9"  end if  '重定向到注册页面,并附上提示信息:该用户名已被使用

if rec3.bof or rec3.eof then    'Name3是表单提交的真实姓名,User3是表单提交的用户名   
     rec3.addnew
     rec3("user")=Name3
     rec3("userName")=User3
     rec3("passWord")=pw3
     rec3("Reg_Date")=date
     rec3("LeiB")=LB3
     rec3("ShenHe")=0
     rec3.update               ' 如果数据库里没有用户提交的信息就更新该记录
     Response.Redirect "index.asp"    '注册成功后重定向到登陆页面
end if
rec3.close
set rec3=nothing
2008-08-19 21:52
快速回复:折磨了我N天了,盼能人指点一下,不盛感激,在线等待……
数据加载中...
 
   



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

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