搜索列表
-
实例学习如何在ASP中调用DLL
【ASP编程】本文通过VB5.0创建ActiveX DLL文件，这个文件模拟了一个掷色子的过程,向大家介绍如何在ASP中调用DLL的文章专题。 动态联接库(DLL)是加快应用程序关键部分的执行速度的重要方法，但有一点恐怕大部分人都不知道，那就是在ASP文件也能通过调用DLL来加快服务器的执行速度，下面我简单的介绍一下在ASP...
实例学习如何在ASP中调用DLL -
[整理版]ASP常用内置函数
【ASP编程】函数，就是该语言封装了的一个功能块，以方便用户的调用。比如“now()”在VBScript中就是一个能显示出当前日期和时间的函数。至于具体为什么能显示，则是该语言内核所定的，用户只需明白“now()”就是用来能显示日期时间的。那么，我们当前接触的VBScript还有其他什么功能的函数么？1，日期/时间函数这些函数包括对“年...
[整理版]ASP常用内置函数 -
如何将产生的密码记录并发送给用户并通过点击链接激活？
【编程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' 生成...
|如何|何利|利用|用当|当前|前时|时间|间生|生成|成随|随机|机函|函数|数？|？| -
如何编制一个产生随机密码的函数？
【编程10000问】<%response.write makePassword(16)function makePassword(byVal maxLen)Dim strNewPassDim whatsNext, upper, lower, intCounterRandomizeFor intCounter = 1 To maxLen whatsNext = Int((1 - 0 + 1) * Rnd + 0)If whatsNext = 0 Then ...
|如何|何编|编制|制一|一个|个产|产生|生随|随机|机密|密码|码的|的函|函数|数？|？| -
怎样给文件加密最安全？
【编程10000问】<%@ Language = VBScript%><%Response.Expires = 0p = "abcdefg"Set TestPWD = New CPassWordTestPWD.EnPWD pTestPWD.UnPWD TestPWD.ShowPWD(True)k = TestPWD.ShowPWD(True)l = TestPWD.ShowPWD(False)Set TestPWD = NothingWith Resp...
|怎样|样给|给文|文件|件加|加密|密最|最安|安全|全？|？| -
如何终止浏览器的Cahce页面？
【编程10000问】如何终止浏览器的Cahce页面？ Function Redirect( NewURL ) If Not IsEmpty( NewURL & "" ) ThenDim QuestionMark QuestionMark = Instr( NewURL, "?" )If QuestionMark = 0 ThenResponse.Redirect NewURL & "?" & NoCacheURL()Response.End ElseRespo...
|如何|何终|终止|止浏|浏览|览器|器的|的C|Ca|ah|hc|ce|e页|页面|面？|？| -
如何使图象随机显示？
【编程10000问】<% dim p,ppic,dpicppic=12randomizep=Int((ppic*rnd)+1)dpic="chunfeng/images/"&p&".gif"%> [1]
|如何|何使|使图|图象|象随|随机|机显|显示|示？|？| -
如何拒绝同一张表单被多次提交？
【编程10000问】如何拒绝同一张表单被多次提交？formtest.asp' 表单文件.<%Randomize ' 初始化随机数种子.num1=rnd()' 产生随机数.num1=int(26*num1)+65 ' 修改num1的范围,使其是A-Z范围的Ascii码,防止表单名出错.session("antry")="test"&chr(num1) ' 产生随机字符串.%><form name="test" action="testact.a...
|如何|何拒|拒绝|绝同|同一|一张|张表|表单|单被|被多|多次|次提|提交|交？|？| -
如何显示随机信息？
【编程10000问】<html><head><title>千花飞舞之信息随机显示</title></head><body><% randomizerandomnum=int(rnd*6)+1' 随机发生次数.select CASE randomnumCASE 1%>我最喜爱的出版社——中国水利水电出版社<br><%CASE 2%>我最常去的网站——...
|如何|何显|显示|示随|随机|机信|信息|息？|？|
