搜索列表
-
VBS、ASP代码语法加亮显示的类
【ASP编程】复制代码 代码如下:<% Class cBuffer Private objFSO, objFile, objDict Private m_strPathToFile, m_TableBGColor, m_StartTime Private m_EndTime, m_LineCount, m_intKeyMin, m_intKeyMax Private m_C...
VBS、ASP代码语法加亮显示的类 -
获取远程flash并保存到本地
【ASP编程】复制代码 代码如下:<% '-------------------------------------------------------------- Dbname = "../data/flash.mdb" '更改数据库文件位置，强烈建议更改为.asp的文件！ Set Conn = Server....
获取远程flash并保存到本地 -
解决ASP（图像）上传漏洞的方法
【ASP编程】经常听说的ASP上传漏洞，即是将一些木马文件修改后缀名（修改为图像文件后缀），进行上传。 针对此情况使用下列函数进行辨别：复制代码 代码如下:<% '****************************************************************** 'CheckFileType 函数用来检查文件是否为图片文件 '参数filename是本地文件的路径 '如...
解决ASP（图像）上传漏洞的方法 -
如何利用当前时间生成随机函数？
【编程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问】<!--METADATA TYPE="typelib" UUID="00000205-0000-0010-8000-00AA006D2EA4" NAME="ADODB Type Library"--><% Dim objStream Set objStream = Server.CreateObject("ADODB.Stream") ' 创建一个Stre...
|如何|何实|实现|现无|无组|组件|件上|上传|传二|二进|进制|制文|文件|件？|？| -
如何对文件进行操作？
【编程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 ' 映射...
|如何|何对|对文|文件|件进|进行|行操|操作|作？|？| -
如何显示一个文本文件？
【编程10000问】 Write（StrING） WriteLine（StrING） WriteBlankLines（LINES） 〈html〉 〈head〉 〈http-equiv="Content-Type" content="text/html; charset=gb2312"〉 〈title〉春风精彩之文本文件显示〈/title〉 〈/head〉 〈body〉 <%...
|如何|何显|显示|示一|一个|个文|文本|本文|文件|件？|？| -
如何一行行地读取文件？
【编程10000问】dim input(30) ' 定义一个数组,大小可随时更改.这里为了显示方便.file_path=Server.Mappath("index.html")Set fs=Server.CreateObject("Scripting.FileSystemObject")Set file_open=fs.OpenTextFile(file_path)n=0Do While Not file_open.AtEndOfStreamn=n+1fileline=file_open.readlineinput(i)=file...
|如何|何一|一行|行行|行地|地读|读取|取文|文件|件？|？| -
如何用FileSystemObject组件来做一个站内搜索？
【编程10000问】searchpage.htm' 搜索页面.<html><head> <title>千花飞舞之站内搜索引擎</title> </head> <body> <CENTER> &...
|如何|何用|用F|Fi|il|le|eS|Sy|ys|st|te|em|mO|Ob|bj|je|ec|ct|t组|组件|件来|来做|做一|一个|个站|站内|内 -
如何实现全文检索？
【编程10000问】<%@ LANGUAGE="VBscript" %> <html> <head> <meta NAME="GENERATOR" Content="Microsoft FrontPage 3.0"> <meta HTTP-EQUIV="Content-Type" content="text/html; charset=gb_2312-80"> <title>星河影动之全文检索...
|如何|何实|实现|现全|全文|文检|检索|索？|？| -
为什么有的留言簿不需要数据库？
【编程10000问】< html>< body>< form action="manage.asp" method="post">< input type="text" size="10" name="username">< input type="text" size="10" name="homepage">< input type="text" size="10" name="Email">< /form>< /body>< /html>&nbs...
|为什|什么|么有|有的|的留|留言|言簿|簿不|不需|需要|要数|数据|据库|库？|？| -
如何让计数器只对新进用户计数？
【编程10000问】如何让计数器只对新进用户计数？<script language=vbscript runat=server>sub application_onstartfilepath=server.mappath("/count")filename=filepath+"\counter.txt"set fs=createobject("scripting.filesystemobject")if not fs.fileexists(filename) then fs.createtextfile(filename) &...
|如何|何让|让计|计数|数器|器只|只对|对新|新进|进用|用户|户计|计数|数？|？|
