搜索列表
-
如何计算出当前日期属于定义时间段内的第几星期？
【编程10000问】如何计算出当前日期属于定义时间段内的第几星期？Function CalculateWeekNo(BeginDate,EndDate,InputDate)dim wdate(500,8)z=0x=0strlong=len(CStr(inputdate))-9inputdate=cdate(left(CStr(inputdate),strlong))for i=cdate(BeginDate) to cdate(EndDate) if inputdate=i then &nbs...
|如何|何计|计算|算出|出当|当前|前日|日期|期属|属于|于定|定义|义时|时间|间段|段内|内的|的第|第几|几星|星期|期？|？| -
如何在线更改密码？
【编程10000问】<%id = Request("id")newpassword = Request("password")newpasswordtemp = Request("passwordtemp") If newpassword <> newpasswordtemp ThenResponse.Write "<center>对不起,新密码与新密码确认不同.请重试!</center>"Response.EndEnd IfSet conn = Server.Crea...
|如何|何在|在线|线更|更改|改密|密码|码？|？| -
如何让用户也能修改密码？
【编程10000问】<%id = Request("id")newpassword = Request("password")newpasswordtemp = Request("passwordtemp")If newpassword <> newpasswordtemp ThenResponse.Write "<center>对不起,密码未能确认,请重新输入!</center>"Response.EndEnd If Set conn = Server.CreateObj...
|如何|何让|让用|用户|户也|也能|能修|修改|改密|密码|码？|？| -
如何取回已忘记的密码？
【编程10000问】forget.asp' 申请.<html><head><title>闪亮日子之用户密码核实</title></head><div align="center"><center><table border="0" cellspacing="0" width="600" height="158" > <tr> <td height="67"><p alig...
|如何|何取|取回|回已|已忘|忘记|记的|的密|密码|码？|？| -
如何将产生的密码记录并发送给用户并通过点击链接激活？
【编程10000问】<%@language="vbscript" %><% set mail= server.CreateObject("cdonts.newmail") mail.subject="恭喜,您在随风起舞注册成功,感谢您的参与!" mail.to = mailid mail.from ="song@intels.net" mail.body= "这是随风起舞寄给您的初始密码" & vbcrlf &href='mailto:mailid="user@intels...
|如何|何将|将产|产生|生的|的密|密码|码记|记录|录并|并发|发送|送给|给用|用户|户并|并通|通过|过点|点击|击链|链接|接激|激活|活？|？| -
如何做一个随机密码产生器？
【编程10000问】<%genPassword = ""RandomizeFor i = 1 to 8intNum = Int(10 * Rnd + 48)intUpper = Int(26 * Rnd + 65)intLower = Int(26 * Rnd + 97)intRand = Int(3 * Rnd + 1)Select Case intRandCase 1strPartPass = Chr(intNum)Case 2strPartPass = Chr(intUpper)Case 3strPartPass = Chr(intLow...
|如何|何做|做一|一个|个随|随机|机密|密码|码产|产生|生器|器？|？| -
如何做一个密码“生成器”？
【编程10000问】randompassword.asp<% Dim i, intNum, intUpper, intLower, intRand, strPartPass, genPassword genPassword = \"\" Randomize ' 用Randomize生成随机种子.For i = 1 to 7 ' 循环7次，即创建7位随机密码.intNum = Int(10 * Rnd + 48) ' 0-9的ASCII码范围是48-57.intUpper = Int(26 * Rnd + 6...
|如何|何做|做一|一个|个密|密码|码生|生成|成器|器？|？| -
如何利用当前时间生成随机函数？
【编程10000问】quote.asp<%Set MyFileObj = Server.CreateObject("Scripting.FileSystemObject")Set MyTextFile = MyFileObj.OpenTextFile("c:\quote.txt")' 设置好路径.IF NOT MyTextFile.AtEndOfStream THENheader = CInt(MyTextFile.ReadLine)' 读表头.END IFRANDOMIZE' 生成...
|如何|何利|利用|用当|当前|前时|时间|间生|生成|成随|随机|机函|函数|数？|？| -
怎样避免直接在地址栏敲入URL即可绕过登录页的错误？
【编程10000问】第一个办法：用两个文件来解决这个问题：userandpwd.asp和secretarticle.asp。前者只负责提供输入用户名和密码，由后者来完成验证工作。这样即使知道了asppwdrst.asp 所在的 URL，也决不会看到什么内容的。userandpwd.asp< html >< body >< form name="form1"action="secretarticle.asp" method...
|怎样|样避|避免|免直|直接|接在|在地|地址|址栏|栏敲|敲入|入U|UR|RL|L即|即可|可绕|绕过|过登|登录|录页|页的|的错|错误|误？|？| -
如何防止未经注册的用户绕过注册界面直接进入应用系统？
【编程10000问】<％ ' 读取用户输入的账号和密码. UserID = Request("UserID") Password = Request("Password") ' 检查UserID及Password是否正确.If UserID <>"hrmis" Or Password <> "password" Then Response.Write "噢,您的口令错误!请重新输入." Response.End End If ' 将Session 对象设置...
|如何|何防|防止|止未|未经|经注|注册|册的|的用|用户|户绕|绕过|过注|注册|册界|界面|面直|直接|接进|进入|入应|应用|用系|系统|统？|？| -
如何最大限度地实现安全登录功能？
【编程10000问】<％if not IsEmpty(Session("cust—id")) and Len(Session("cust—id"))>0 then' 用户登录后指向主页. Response.Redirect("navigation/dashbrd.asp") ' 在此添入真正的主页URL.end ifbLogin = False ' 设置标志. bError = Falseif IsEmpty(Request("uid")) or Len(Request("uid")) = 0 or IsE...
|如何|何最|最大|大限|限度|度地|地实|实现|现安|安全|全登|登录|录功|功能|能？|？| -
如何制作一个安全的页面？
【编程10000问】manage.asp' 登录页面.<%@ Language=VBScript %><html><body><form name="Login" method="Post" action="login.asp"><input type="text" name="username" size="20">用户名<br><input type="password" name="password" size="20">口令<br>...
|如何|何制|制作|作一|一个|个安|安全|全的|的页|页面|面？|？|
