回复 2楼 aei135
我是引用的两个 语言写的代码 一个是 易语言 一个是 ASP写的 全文如下
SQL="Select Max(F_ID) From T_usercore"
set rs1=conn.Execute(SQL)
tmp=rs1(0)
sql="select * from T_usercore where F_username='"&username&"'"
rs.open sql,conn,1,1
If Not rs.eof Then
response.write "no"
response.end
End If
rs.close
sql="insert into T_usercore(F_id,F_username,F_password,F_Seconds,F_Type,F_Agreement,F_freeuser,F_ActiveCode,F_Coints) values('" & (tmp+1) & "','"&username&"','"&crypt_password&"',1200000000,1,1,1,1,1200)"
rs.open sql,conn,1,3
sql="insert into T_PoliceValidate(F_UserID,F_PaperIDNo,F_IsAdult,F_IsValidate) values('" & (tmp+1) & "','392202221116111175',1,1)"
rs.open sql,conn,1,3
response.write "yes"
%>
上面是ASP的
下面是易语言的
use poqworld
declare @maxid int
if (select count(f_id) from T_usercore)=0
begin
set @maxid=1
end
else
begin
select @maxid=max(f_id) from T_usercore
set @maxid=@maxid+1
end
insert into T_usercore(F_id,F_username,F_password,F_type,F_Seconds,F_active,F_Coints)
values(@maxid,
.版本 2
.支持库 dp1
.支持库 eDB
SQL命令 ＝ 编辑框1.内容 ＋ “'” ＋ 编辑框_注册账号.内容 ＋ “','” ＋ 取数据摘要 (到字节集 (编辑框_注册密码.内容)) ＋ “',” ＋ “1” ＋ “,” ＋ “0,” ＋ “1,” ＋ “0)”
.如果 (记录集1.打开 (SQL命令, 1))
信息框 (“注册游戏账号成功”, #信息图标, “成功”)
