UC知道asp会员注册生成系统
来源：百度知道 编辑：UC知道 时间：2024/06/05 08:21:19
本人的站最近因为人数增加~发现了一个严重问题,会员注册之后,如果语音相同,比如:天天.甜甜..U就无法定义.相关源码如下:
<!--#include file="../inc/conn.asp"-->
<!--#include file="../fangzhu.asp"-->
<!--#include file="../md5.asp"-->
<%
if request("uu")="" then
response.Write("<script language='javascript'>alert('用户名和密码没有填写！');location.href=('/reg/');</script>")
else
%>
<%
''''''''''''''''开始
Set d = CreateObject("Scripting.Dictionary")
d.add "a",-20319
中间部分相同..
d.add "zuo",-10254
function g(num)
if num>0 and num<160 then
g=chr(num)
else
if num<-20319 or num>-10247 then
g=""
else
a=d.Items
b=d.keys
for i=d.count-1 to 0 step -1
<!--#include file="../inc/conn.asp"-->
<!--#include file="../fangzhu.asp"-->
<!--#include file="../md5.asp"-->
<%
if request("uu")="" then
response.Write("<script language='javascript'>alert('用户名和密码没有填写！');location.href=('/reg/');</script>")
else
%>
<%
''''''''''''''''开始
Set d = CreateObject("Scripting.Dictionary")
d.add "a",-20319
中间部分相同..
d.add "zuo",-10254
function g(num)
if num>0 and num<160 then
g=chr(num)
else
if num<-20319 or num>-10247 then
g=""
else
a=d.Items
b=d.keys
for i=d.count-1 to 0 step -1
楼主：您的程序好像最后URL=名字拼音把？
甜甜跟天天 当然是一个拼音了。。 。
建议增加点东西嗯。比如第一个注册的是甜甜，url="tiantian"
第二个注册的天天
url="tiantian1"
第三个注册的是田田
url="tiantian2"
具体怎么写？
在
url=c(request("uu"))
''''''''''''''''结束
之后增加以下语句：
Set rs2= Server.CreateObject("ADODB.Recordset")
rs2.open "SELECT count(url) FROM `huiyuan` WHERE url like '"&url&"%'",conn,1,1
dim s:s=rs2(0)
if s<>"0" then url=url&s
rs2.close:set rs2=nothing
这是最简单的方法稍微有点BUG但并不影响实用。
BUG就是 比如已经有一个叫“甜甜”的了。然后来了个叫“甜”的那么他可能被分配成tian1