Function HTMLDecode(s)If Trim(s)s = Replace(s, CHR(13),"")'回车符s = Replace(s, CHR(10),"")'换行符s = Replace(s, CHR(32)," ") '空格s = Replace(s, CHR(9)," ") 'TAB键的空格End IfHTMLDecode = sEnd Fun

学习一下~原文地址：巧用asp文件写入生成文本日志文件作者：点点创建新文件，写入：function log_result(sWord)    set fs=createobject("scripting.filesystemobject")    setts=fs.createtextfile(server.MapPath("log/"&replace(now(),":","")&Rnd

今天我想谈谈一个网页的计数器问题，有些网站的计数器在用户刷新一次页面时，记数值会加1，这样的计数器是不健全的。如果你的网站搞一些有奖活动，例如，"如果你是第100000个用户你将得到本站提供的奖品"。所以，下面给出一个计数器的原码，同时你要在这个asp文件下新建一个counter.txt文件，用于存放记数值。function counts(counterfile)dim objfso,

有两种方法在asp中定义数组，让我们看看每种的例子：方法一：MyArray =Array("Jan","Feb","Mar","Apr","May","Jun","Jul","Aug","Sep","Oct","Nov","Dec")方法二：Dim myArray(2)myArray(0)="Jan"myArray(1)="Feb" 动态改变数组的大小DIM myArray()

Do...Loop: 当（或直到）条件为“真”时循环。While...Wend: 当条件为“真”时循环。For...Next: 指定循环次数，使用计数器重复运行语句。For Each...Next: 对于集合中的每项或数组中的每个元素，重复执行一组语句。  For Next是先判断循环变量的值是否在指定的范围内，如果在指定的范围内，则开始执行循环体语句，否则跳出循环。For Ne

ewebeditor好像对浏览器的支持不是很好,如果是IE8.0的话改成如下解决办法：打开 Editor/Js/Editor.js168行左右：把 if (element.YUSERONCLICK) eval_r(element.YUSERONCLICK + "anonymous()");改为：if(navigator.appVersion.match(/8./i)==’8.’

ASP 0104 : 80004005问题：WIN2003、IIS6 无法上传较大的文件“Request 对象 错误 \’ASP 0104 : 80004005\’ 解决方案：先关闭iis admin service 服务找到C:\WINDOWS\system32\inetsrv\metabase.xml,打开，找到ASPMaxRequestEntityAllowed 把他修改为需

Function Sort(ary)Dim KeepChecking,I,FirstValue,SecondValueKeepChecking = TRUEDo Until KeepChecking = FALSE KeepChecking = FALSE For I = 0 to UBound(ary,1)  If I = UBound(ary,1) Then ExitFor  

ntime =  now()ndate = date()nweek = Weekday(ndate)shijian=cstr(year(ntime))+right("0"+cstr(month(ntime)),2)+right("0"+cstr(day(ntime)),2)+right("0"+cstr(hour(ntime)),2)+right("0"+cstr(minute(ntime)

本周select * from 表 where datediff('w',日期字段,now())=0本月select * from 表 where datediff('m',日期字段,now())=0本季select * from 表 datediff('q',日期字段,now())=0DateAdd 函数描述:返回已添加指定时间间隔的日期。语法:DateAdd(interval, n

在数组是不能直接用变量来定义下标的，如：n=5dim a(n)这样就会报错 为了达到不固定的下标值，可以用的executen=5execute ("dim a("&n&")")response.Write(ubound(a))输出结果为5 还有另一种方法就是用Redim ,Redim是可以使用变量的~dim danxuanrs.open "select count(id)

详细出处参考：http://www.jb51.net/article/16087.htm   近日用ASP开发了一个进销存系统（开发环境：Windows2000+DW MX 2004+IIS5.0)，在本机上运行、调试一切正常，没有任何错误信息，但将它放到windows server 2003上去就不行了500错误解决办法" TITLE="ASP运行在IIS6 500错误解决办法" />