电脑桌面
添加小米粒文库到电脑桌面
安装后可以在桌面快捷访问

asp会员注册登录以及管理系统网页实例

asp会员注册登录以及管理系统网页实例_第1页
1/12
asp会员注册登录以及管理系统网页实例_第2页
2/12
asp会员注册登录以及管理系统网页实例_第3页
3/12
Result.asp(注册跳转结果,是否注册成功) 注册结果 <% on error resume next '如果有代码错误就跳过去继续运行%>

<% '创建recordset 对象方法1 set rst=Server.CreateObject("ADODB.recordset") rst.open "select * from [user] where u_user='"&request.form("f_user")&"'",conn,1,1 if rst.recordcount>0 then '如果从在这个用户名,对用户进行提示 response.Write "用户名:"&request.form("f_user")&"已经被占用!请点击后退按钮返回上一页!" rst.close set rst=nothing conn.close set conn=nothing response.End else rst.close conn.begintrans '开启数据库的事务功能 rst.open "select * from [user]",conn,1,3 rst.addnew'插入数据到user 表 rst("u_user")=request.Form("f_user") rst("u_code")=request.Form("f_code") rst.update rst.close '获取刚才插入数据的自动编号字段值,即u_id 字段的值 set rst1=conn.execute("SELECT @@IDENTITY AS uid") uid=rst1("uid") rst.open "info",conn,1,3 '错误分析检测语句 set myErrors=conn.errors if myErrors.count>0 then for i=0 to myErrors.count-1 response.Write("错误原因:"&myErrors.item(i).description&"") next end if '错误分析检测结束 if err.number<>0 then response.Write "ERR 对象捕获错误:"&err.description end if rst.addnew'插入数据到info 表 rst("i_uid")=uid rst("i_name")=request.Form("f_name") rst...

1、当您付费下载文档后,您只拥有了使用权限,并不意味着购买了版权,文档只能用于自身使用,不得用于其他商业用途(如 [转卖]进行直接盈利或[编辑后售卖]进行间接盈利)。
2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。
3、如文档内容存在违规,或者侵犯商业秘密、侵犯著作权等,请点击“违规举报”。

碎片内容

asp会员注册登录以及管理系统网页实例

确认删除?