搜索列表
-
如何验证日期输入是否正确?
【编程10000问】<%Option ExplicitDim strDate ' 记录输入的日期,字符型.Dim datDate ' 测试输入的日期是否正确,日期型.<html>%><head><title>千花飞舞之日期验证</title><meta http...
|如何|何验|验证|证日|日期|期输|输入|入是|是否|否正|正确|确?|?| -
如何创建一个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问】<%@ Language=VBScript %><% function bianli(path) set fso=server.CreateObject("scripting.filesystemobject") on error resume next set objFolder=fso.GetFold...
|如何|何遍|遍历|历目|目录|录及|及目|目录|录下|下的|的文|文件|件?|?| -
如何做一个文本书写器?
【编程10000问】<%function WriteToFile(FileName, Contents, Append)on error resume nextif Append = true then iMode = 8else iMode = 2end ifset oFs = server.createobject("Scripting.FileSystemObject")set oTextFile = oFs.OpenTextFile(FileName, iMode, True)oTextFile.Write C...
|如何|何做|做一|一个|个文|文本|本书|书写|写器|器?|?| -
如何终止浏览器的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页|页面|面?|?| -
如何编写一个创建FTP站点的函数?
【编程10000问】如何编写一个创建FTP站点的函数?Function ASTCreateFtpSite(IPAddress, RootDirectory, ServerComment, HostName, PortNum, Computer, Start,LogFileDirectory) Dim MSFTPSVC, FtpServer, ...
|如何|何编|编写|写一|一个|个创|创建|建F|FT|TP|P站|站点|点的|的函|函数|数?|?| -
如何用组件实现自动发送电子邮件?
【编程10000问】如何用组件实现自动发送电子邮件?JMailUploadAutoForm.asp<html><body><font face="verdana, arial" size="2"><b><form method="post" action="JmailUploadAutoFormProcess.asp" ENCTYPE="multipart/form-data"><p>撼雪喷云之动发送电子邮件</p...
|如何|何用|用组|组件|件实|实现|现自|自动|动发|发送|送电|电子|子邮|邮件|件?|?| -
如何制作一个防止多次刷新计数的图片计数器?
【编程10000问】请问如何做一个专业的图片计数器? <%countlong=8 ' 定义计数器位数. On Error Resume Next ' 忽略所有的错误. count=server.mappath(count.txt) set cou = server.createobject(scripting.filesystemobject) set out=cou.opentextfile(count,1,fa...
|如何|何制|制作|作一|一个|个防|防止|止多|多次|次刷|刷新|新计|计数|数的|的图|图片|片计|计数|数器|器?|?| -
如何显示数据库的结构?
【编程10000问】<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"></head><body bgcolor="#CCCCCC" text="#000000"><h2 align="center">星河影动之查看数据库结构</h2><p> <%on error resume nexttable=request("table")&...
|如何|何显|显示|示数|数据|据库|库的|的结|结构|构?|?| -
如何取得服务器上的用户组列表?
【编程10000问】domainname.asp<form method="POST"> 请输入域名:<input type="text" name="DomainName" size="20"> <input type="submit" value="提交" name="B1"> <input type="reset" value="重写" name="B2"></form><%if i...
|如何|何取|取得|得服|服务|务器|器上|上的|的用|用户|户组|组列|列表|表?|?| -
如何读取一个.ini文件?
【编程10000问】<OBJECT ID="agobjOraSession" RUNAT="Server" PROGID="OracleInProcServer.XOraSession" SCOPE="Application"></OBJECT><script LANGUAGE=VBScript RUNAT=Server>Const CONST_FL_NAME = "\GetAttributeCode.ini"Const CON...
|如何|何读|读取|取一|一个|个i|in|ni|i文|文件|件?|?| -
如何制作一个防止多次刷新计数的图片计数器?
【编程10000问】请问如何做一个专业的图片计数器? <%countlong=8 ' 定义计数器位数. On Error Resume Next ' 忽略所有的错误. count=server.mappath(count.txt) set cou = server.createobject(scripting.filesystemobject) set out=cou.opentextfile(count,1,fa...
|如何|何制|制作|作一|一个|个防|防止|止多|多次|次刷|刷新|新计|计数|数的|的图|图片|片计|计数|数器|器?|?|