W-ts抢先提供魔域网站帐号注册系统

软件简介：
本系统由W-TS提供。程序全部开源。转载请保留出处。
www.w-ts.cn
$ i: o; y! O" \9 SQQ：6798705
( c; ^+ |# I' b- z* f# T# p架设方法：只要将IIS指定到程序目录。inc/conn.asp设置好连接的各项属性即可使用。
修改密码。取回密码功能即将提供。

" w% z4 v! x5 J: j3 ]: h更强大的魔域Web管理系统紧张制作中。

2007.10.20
2 A3 l* _- F- C7 h
( o( d( D8 t" {-----------------------------------------------------------
) A* M! \  }/ f$ V$ h/ F$ d如果出现
3 v* a" ~  L+ f% c& v1 yMicrosoft OLE DB Provider for ODBC Drivers 错误 '80040e21'
多步 OLE DB 操作产生错误。如果可能，请检查每个 OLE DB 状态值。没有工作被完成。
) T" j7 d; [% ~4 P/registersave.asp，行 34
情况请将registersave.asp内容替换成以下:

+ k; f) C: e6 `3 j$ Z$ g1 a' n!--#include file=inc/conn.asp--
4 Z$ }6 K: X! z( Z. y9 L%
2 G) `, \/ B6 _. z- D0 G: }* F if(request(action)=save) then
& |3 \3 ~+ D9 q  E* w+ O% i; ] id = GetPostField(id)
oldpass = GetPostField(oldpass)
moldpass = GetPostField(moldpass)
hash = GETpostfield(hash)
. L) ?& s" E. l, _" Q* t CheckCode = GetPostField(CheckCode)
9 P' O4 M- `, C/ l) b
if CheckCode  CStr(Session(CheckCode)) then
1 S* c+ s; c0 @9 U msg(您填写的验证码与系统产生的不一致，请重新输入)
7 n* }9 `( T( K. O* l0 W" Z' Rend if
4 [- v1 a# Q6 Z$ x. B. q$ d  C+ s& `
if(ChkInvaildWord(id) or ChkInvaildWord(oldpass) or ChkInvaildWord(moldpass)) then
msg(请不要输入非法字符)
end if

if oldpass  moldpass then
msg(两次密码不相同)
end if
( V8 g- d9 U1 V+ r6 U: k& A set rs=server.createobject(adodb.recordset)
  c* }* o  J# w4 H2 m( {# h sql = select * from account where name = ''
; g  c2 \$ e4 r- K6 e1 I1 F; _ rs.open sql,conn,1,1
If Not(rs.Eof And rs.Bof) Then
msg(注册失败，您输入用户名已经被注册，请更换其它用户名)
" X7 y) p5 K! H. W  c  R4 [ rs.Close
Else '继续注册
3 M$ x3 f. M/ G, `* z/ P% B: g& G rs.Close
% z% [: ^& \+ x& D  z2 ~ conn.execute(insert into account (name,password,reg_date,vip) values ('','','',0) )
; {. K" s3 ?# t% n: v7 H set rs=nothing
msg(恭喜你，注册成功)
end if
end if
%
下载地址：

2008-8-19 16:51 上传 W-ts抢先提供魔域网站帐号注册系统.rar

下载权限:

版本vip会员

本地下载 检测资源   提取码: 需要终身vip或更高权限

有些游戏资源需要vip下载开通请点击开通vip