搜索列表
-
如何编制一个产生随机密码的函数?
【编程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问】authenticate.asp<%Dim URLURL = Request.QueryString' 获得URL. %> <html><body><FORM METHOD=POST ACTION="/validate.asp"> <INPUT TYPE=HIDDEN NAME="URL" VALUE="<%=URL%>"> ' 将URL保...
|如何|何对|对用|用户|户进|进行|行授|授权|权?|?| -
如何用拦截表单的方法上传图片?
【编程10000问】<script language="vbs">sub send_onclick dim f set f=document.ff photo=trim(f.photo.value) if photo="" then &...
|如何|何用|用拦|拦截|截表|表单|单的|的方|方法|法上|上传|传图|图片|片?|?| -
如何实现无组件上传二进制文件?
【编程10000问】<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library"--><% Dim objStream Set objStream = Server.CreateObject("ADODB.Stream") ' 创建一个Stre...
|如何|何实|实现|现无|无组|组件|件上|上传|传二|二进|进制|制文|文件|件?|?| -
如何制作一个文本文件编辑器?
【编程10000问】newdoc.asp<%@ Language=VBScript %><script id=DebugDirectives runat=server language=javascript>//Set these to true to enable debugging or tracing@set @debug=false@set @trace=false</script><html><head><META name=VI60_defaultClientScr...
|如何|何制|制作|作一|一个|个文|文本|本文|文件|件编|编辑|辑器|器?|?| -
如何在线查询本地机的文件?
【编程10000问】<html><head><title>随风起舞之文件查询</title></head><body><p align="center" > <b><font face="宋体" color="red" size="5"> 星河影动之文件查询系统</font></b></p><hr><form method="PO...
|如何|何在|在线|线查|查询|询本|本地|地机|机的|的文|文件|件?|?| -
如何获知文件最后的修改日期和时间?
【编程10000问】<%Dim objCMFUDim strModifiedSet objCMFU = Server.CreateObject("CM_FileUtils.GetProperty")' 创建对象并赋给变量,并且GetProperty类是当前唯一可用的.strModified = objCMFU.LastModified' 检索并返回包含最后修改日期和时间(LastModified function )值.当然了,还要考虑到出错的...
|如何|何获|获知|知文|文件|件最|最后|后的|的修|修改|改日|日期|期和|和时|时间|间?|?| -
如何获知文件被改动的情况?
【编程10000问】Function File_GetLastModified( sFile )Dim objFileObj, objFile Set objFileObj = CreateObject("Scripting.FileSystemObject") If sFile = "" Then sFile = Server.MapPath( Request.ServerVariables("script_NAME") ) End If Set objFile ...
|如何|何获|获知|知文|文件|件被|被改|改动|动的|的情|情况|况?|?| -
如何对文件进行操作?
【编程10000问】<%@ LANGUAGE="VBScript" %><% 'Set file i/o constants. Const ForReading = 1 Const ForWriting = 2 Const ForAppending = 8 filename = "test.txt" path = Server.MapPath("data") & "\" & filename ' 映射...
|如何|何对|对文|文件|件进|进行|行操|操作|作?|?| -
如何创建一个PDF文件?
【编程10000问】 <%Option ExplicitSub CheckXlDriver() On Error Resume Next Dim vConnString Dim oConn, oErr vConnString = "DRIVER={Microsoft Excel Driver (*.xls)};DBQ=NUL:" &n...
|如何|何创|创建|建一|一个|个P|PD|DF|F文|文件|件?|?| -
如何用表单在线建立目录?
【编程10000问】creatfolder.htm' 表单文件.<form name="form1" method="post" action="folder.asp">创建一个文件夹: <input type="text" name="name"><input type="submit" name="Submit" value="提交"></form> folder.asp<%@ LANGUAGE = "VBScript" %><% Dim...
|如何|何用|用表|表单|单在|在线|线建|建立|立目|目录|录?|?| -
如何创建Word文件?
【编程10000问】creatdoc.asp<!DOCTYPE html PUBLIC "-//W3C/Dtd html 3.2 Final//EN"><head><title>星河影动之创建Word文件</title><META HTTP-EQUIV="Refresh" CONTENT="30;URL='orderForm.asp'"></head><% dotLocatio...
|如何|何创|创建|建W|Wo|or|rd|d文|文件|件?|?|