修改默认asp默认上传大小

评论(0)浏览(186)分类：Asp/VBScript
修改默认asp默认上传大小　　默认asp接受的数据大小为200kb，如果你表单的总内容大于200kb（包括提交的文字和文件大小的总和，不单是指文件的大小），需要修改iis的配置，将200kb更改为更加大的值。　　具体操作步骤入下1，先在服务里关闭iis admin service服务。2，.找到 WINDOWS\system32\inetsrv\下的MetaBase.xml，用记事本打开，找到ASPMaxRequestEntityAllowed 把..

asp导出excel文件

评论(0)浏览(388)分类：Asp/VBScript
asp导出excel文件　　由于excel软件能识别table格式的数据，所以asp只需要输出table格式的html代码，同时设置好contenttype，增加保存为附件的响应头即可将输出的html代码保存为xls文件。　　asp导出excel文件源代码如下%Response.ContentType = application/excelResponse.AddHeader Content-Disposition, attachment;filename=xxxx.xls % table %while not rs...

asp sha1加密源代码

评论(0)浏览(279)分类：Asp/VBScript
asp sha1加密源代码　　在百度找的几个asp sha1（vbs写的）加密结果和asp.net的sha1加密结果不一样，asp.net sha1加密完后是40位，网上找的asp sha1加密是64位，还以为asp.net做了截取（如网上的asp的md5机密和asp.net位数不一样，是做了截取的问题），但是asp的64位加密结果并没有包含asp.net的40位结果，看来找到的版本和asp.net的加密算法不一样。　　最后还是靠..

执行特殊自定义asp过滤条件后如何对记录集分页

评论(0)浏览(164)分类：Asp/VBScript
执行特殊自定义asp过滤条件后如何对记录集分页　　asp取出recordset后，如果需要执行特殊自定义的asp过滤语句，满足条件后再输出对应的记录，而这个asp过滤条件无法融合到sql语句中时，此时asp要如何对记录集进行正确的分页操作？　　要对需要执行特殊自定义asp过滤的记录集进行分页操作，不能使用asp提供的默认分页操作，如rs.pagesize，rs.recordcount，rs.pagecount，rs.absolutepage这种..

asp获取enctype multipart/form-data编码表单数据

评论(0)浏览(511)分类：Asp/VBScript
asp获取enctype multipart/form-data编码表单数据　　当表单指定了enctype=multipart/form-data，asp是无法通过Request(xxx)来获取表单中项目内容的，因为表单指定enctype=multipart/form-data后，将会以2进制数据上传表单内容，而不是默认的application/x-www-form-urlencoded，以键值对字符串的形式上传内容，asp的request对象只能获取到键值对的数据，2进制的数据内容无法获取。　　所以表单..

asp操作json对象示例

评论(0)浏览(208)分类：Asp/VBScript
asp操作json对象示例　　本示例通过服务器端的JScript作为桥接，实现vbscript通过json字符生成对应的JSON对象。script language=JScript runat=Server//注意不同格式的JSON格式的字符串调用不同的方法 function toObject(json) {//JSON对象格式的字符串 eval(var o= + json); return o; } function toArray(s) {//JSON对象数组格式的字符串 ..

asp检查ip地址是否为内网/私有ip地址

评论(0)浏览(127)分类：Asp/VBScript
asp检查ip地址是否为内网/私有ip地址　　asp检查ip地址是否为私有/内网ip地址源代码。内网/私有IP地址网段如下，还有127开头的回环地址10.0.0.0-10.255.255.255172.16.0.0172.31.255.255192.168.0.0-192.168.255.255%function IpToNumber(ip)'IP地址转为数字 arr=split(ip,.) IpToNumber=256*256*256*clng(arr(0))+256*256*clng(arr(1))+256*clng(arr(2))+clng(arr(3))end fu..

asp网站使用utf-8编码注意事项

评论(0)浏览(1103)分类：Asp/VBScript
asp网站使用utf-8编码注意事项　　中文window操作系统，asp默认的编码为gb2312。如果asp网站想将编码改为utf-8，需要注意asp文件也要存储为utf-8编码，要不会乱码。　　asp网站使用utf-8编码需要注意如下步骤1）用page指令申明codepage为65001%@ language=vbscript codepage=65001 %　　这个申明需要出现在asp文件中服务器端代码的第一个位置，其他html代码可以在page指令之前..

使用adodb.stream读写2进制值数据

评论(0)浏览(755)分类：Asp/VBScript
使用adodb.stream读写2进制值数据　　asp如何使用adodb.stream读写2进制数据，示例源代码如下'使用adodb.stream将文件读取为二进制数据数组Function ReadBinary(FileName) Dim Buf(), I With CreateObject(ADODB.Stream) .Mode = 3: .Type = 1: .Open: .LoadFromFile FileName ReDim Buf(.Size - 1) For I = 0 To .Size - 1: Buf(I) = AscB(.Read(1)): Next ...

asp/vbscript 36进制自动增长序号

评论(0)浏览(152)分类：Asp/VBScript
asp/vbscript 36进制自动增长序号　　asp生成0~9，a~z的36进制字符串，运行下面示例需要使用IE核心的浏览器，其他非IE核心浏览器不支持vbscriptscript language=vbscriptfunction getinitstring(l)'初始化指定长度的0字符串 l=l-1 for i=0 to l getinitstring=0getinitstring nextend functionfunction getnextchar(chrcode)'获取下一个字符 if chrcode=57 then&..

MSXML2.DOMDocument加载xml文件系统错误: -2146697209

评论(0)浏览(223)分类：Asp/VBScript
MSXML2.DOMDocument加载xml文件系统错误: -2146697209　　asp使用MSXML2.DOMDocument加载网络上的xml文件时，在调用load方法前需要注意设置oXML.setProperty ServerHTTPRequest, true启用ServerHTTPRequest请求，要不会出现系统错误: -2146697209。　　asp使用MSXML2.DOMDocument组件时需要注意一下4中情况%Dim oXML, oXMLError, ReturnValue, xSet oXML = Server.CreateObject(MSXML2.DOMDocument)..

asp获取当前为星期几

评论(0)浏览(284)分类：Asp/VBScript
asp获取当前为星期几　　asp有函数weekday获取日期所在周的星期几（数字），weekdayname返回星期几名称。　　测试代码如下，请使用IE运行本示例script language=vbscriptd=nowxqj=weekday(d)msgbox xqj'输出数字，星期日为1，星期一为2...依次类推，星期六为7msgbox weekdayname(xqj)/script

vbscript获取文件修改，创建，访问时间

评论(0)浏览(240)分类：Asp/VBScript
vbscript获取文件修改，创建，访问时间 set fso=createobject(Scripting.FileSystemObject) set fn=fso.GetFile(E:\AD.txt) msgbox 文件创建时间：fn.DateCreated msgbox 文件最后修改时间：fn.DateLastModified msgbox 文件最后访问时间：fn.DateLastAccessed set fn=nothing set fso=nothing

vbs文件获取当前的路径

评论(0)浏览(227)分类：Asp/VBScript
vbs文件获取当前的路径currentpath = createobject(Scripting.FileSystemObject).GetFolder(.).Path或者currentpath = createobject(Scripting.FileSystemObject).GetFile(Wscript.ScriptFullName).ParentFolder.Path

asp时间戳和时间对象相互转换

评论(0)浏览(290)分类：Asp/VBScript
asp时间戳和时间对象相互转换　　asp时间戳和时间对象相互转换源代码'把标准时间转换为UNIX时间戳Function ToUnixTime(strTime, intTimeZone) If IsEmpty(strTime) or Not IsDate(strTime) Then strTime = Now If IsEmpty(intTimeZone) or Not isNumeric(intTimeZone) Then intTimeZone = 0 ToUnixTime = DateAdd(h,-intTimeZone,strTime) ToUnixTime = Dat..

asp读写文件示例

评论(0)浏览(118)分类：Asp/VBScript
asp读写文件示例　　asp读出文件放入表单的textarea容器中，修改后写回原文件中。注意如果文件编码不是系统默认的ansi，调用opentextfile方法时加上编码。参考Scripting.FileSystemObject的OpenTextFile方法参数说明asp检测文件编码asp读写文件示例源代码%set fso=server.CreateObject(scripting.filesystemobject) if request.querystring(action)=update then..

asp使用CDO.Message组件发邮件示例

评论(0)浏览(457)分类：Asp/VBScript
asp使用CDO.Message组件发邮件示例asp使用CDO.Message组件发邮件示例-远程Server需要身份验证 Const cdoSendUsingPickup = 1 'Send message using the local SMTP service pickup directory. Const cdoSendUsingPort = 2 'Send the message using the network (SMTP over the network). Const cdoAnonymous = 0 'Do not authenticate Const cdoBa..

asp抓阄随机分配号码源代码

评论(0)浏览(125)分类：Asp/VBScript
asp抓阄随机分配号码源代码　　asp抓阄随机分配号码，vbscript随机分配某个数组内的项，得到不重复的循序号。运行本代码需要使用IE浏览器script language=vbscript charset=utf-8Function rndint(byval MinNum,byval MaxNum)'asp生成整数之间的随机数函数 dim tmp if MaxNumMinNum then'交换大小值，防止传递时大小搞反 tmp=MinNum:MinNum=MaxNum:MaxNum=tmp..

asp replace函数

评论(0)浏览(532)分类：Asp/VBScript
asp replace函数Replace语法Replace(expression, find, replacewith[, compare[, count[, start]]])Replace 函数参数expression：必选。 字符串表达式 包含要替代的子字符串。find： 必选。被搜索的子字符串。replacewith ：必选。用于替换的子字符串。start： 可选。expression 中开始搜索子字符串的位置。如果省略，默认值为 1。在和count 关联时必须用count ..

asp解码chrw/chr编码文件还原为源代码

评论(0)浏览(833)分类：Asp/VBScript
asp解码chrw/chr编码文件还原为源代码　　将asp函数的参数通过chrw编码加密后，如后解码chrw内容。下面的解码函数，原来很简单，用正则提取内容中的chrw串，然后eval动态执行获取的chrw串得到内容，再执行替换即可。注意事项参考源代码里面的注释，注意将源代码保存为vbs格式的文件后执行，如果是asp文件，需要将createobject修改为server.createobject　　asp chrw编码解密文件源代..

asp实现WWW-Authenticate basic认证示例

评论(0)浏览(298)分类：Asp/VBScript
asp实现WWW-Authenticate basic认证示例　　访问asp网站，使用WWW-Authenticate basic认证机制示例代码。WWW-Authenticate basic认证采用base64编码用户输入的信息，所以需要一个base64解码类，具体看下面贴出的base64.asp文件。　　注意事项，需要设置iis，网站目录安全，身份验证和访问控制，取消集成 Windows身份验证，如下图所示，记得要配置匿名访问用户。　　示例代码如下index...

asp.net/asp Response IsClientConnected属性

评论(0)浏览(88)分类：Asp/VBScript
asp.net/asp Response IsClientConnected属性　　Response IsClientConnected 属性可以在asp/asp.net运行之时，判断客气端是否断开连接，返回true or false。这样避免用户在访问执行时间比较长的页面时，因为用户的重新刷新或关闭页面，服务端程序还在继续执行，导致服务器资源没有被即时释放。IsClientConnected相关说明：IsClientConnected 属性只读，它指示自上次调用 Response.Write 之..

asp同一个网站存在不同编码页面跳转出现乱码解决办法

评论(0)浏览(409)分类：Asp/VBScript
asp同一个网站存在不同编码页面跳转出现乱码解决办法　　症状：同一个asp站点，当不同页面使用了不同的编码时，如果从一个页面转到另外一个不同编码的页面，出现乱码。　　环境：2个不同的都用meta标签指定了编码，page指令同时指定了codepage为对应的编码号。gb2312编码的asp文件存储编码为ansi，utf-8编码的asp文件存储编码为utf-8。　　如果环境设置好，同上面说的，一般是不会出现乱码的。　　..

asp recordset bookmark属性

评论(0)浏览(92)分类：Asp/VBScript
asp recordset bookmark属性asp recordset bookmark属性 　　返回唯一标识 Recordset 对象中当前记录的书签，或者将 Recordset 对象的当前记录设置为由有效书签所标识的记录。 设置或返回计算有效书签的变体型表达式。 详细说明　　使用 Bookmark 属性可保存当前记录的位置并随时返回到该记录。书签只能在支持书签功能的 Recordset 对象中使用。　　打开 Recordset 对象时，..

upload_5xsoft asp无组件文件上传类库

评论(1)浏览(769)分类：Asp/VBScript
upload_5xsoft asp无组件文件上传类库　　upload_5xsoft无组件文件上传类库源代码和示例，增加了一个小功能，获取文件扩展名称。　　测试代码test.htmlform method=post action=save.asp enctype=multipart/form-data名称:input type=text name=name /input type=submit value=提交 /br /文件:input type=file name=file //formsave.asp!--#include file=upload_5xsoft.asp--%set up..

asp gb2312/utf-8编码和解码

评论(0)浏览(1149)分类：Asp/VBScript
asp gb2312/utf-8编码和解码　　整理网上的asp编码和解码函数，添加了如何在utf-8编码页面中解码gb2312编码的函数。　　asp编码，此函数可以将字符串编码为指定编码的url编码，可以在任何编码的asp页面中使用dim iSourceCode'网站默认编码iSourceCode=Session.CodePage'得到当前页面指定的编码'sStr：要编码的字符串'iTargetCode：指定的编码Function UrlE..

asp连接mssqlserver不同实例

评论(0)浏览(258)分类：Asp/VBScript
asp连接mssqlserver不同实例　　今天安装了sqlserver2005，给sqlserver2005起了实例名称sql2005，asp要连接sqlserver2005和默认的mssqlserver2000【默认实例名称】，需要修改驱动字符串中的server项目，将mssqlserver的实例名称加上，如果不加上就会连接到默认的mssqlserver实例【mssqlserver2000，而不是sqlserver2005的sql2005】。　　驱动字符串如下面所示'********..

asp正则submatches分组

评论(0)浏览(198)分类：Asp/VBScript
asp正则submatches分组s=test1,test2fasdfasfafsa%response.write aaa%dfafadfafafafa%for i=0 to 1:response.write ddd:next%fdsfdfdsfsd_ dddddd22222aaaaaa%aaa=888%换行set rx=new RegExp'创建正则表达式rx.Global=true'全局匹配rx.Pattern=%([\s\S]+?)%'正则表达式set mc=rx.Execute(s)'执行匹配response.write 共有mc.count项for each m in mc..

asp数字分页导航示例

评论(0)浏览(189)分类：Asp/VBScript
asp数字分页导航示例　　一个asp生成数字分页导航的示例代码，可以指定每次显示多少个数字导航，效果点击这里查看dim CurrentPage'当前页dim CurrentPageKey'页码键名称dim TotalRecord'总记录数dim TotalPage'总页数dim PageSize'每页显示多少条dim NumberPageSize'显示多少个页码dim pms'查询的其他参数 function getguider() dim n..

去掉asp now方法中的am，pm内容

评论(0)浏览(261)分类：Asp/VBScript
去掉asp now方法中的am，pm内容　　调用asp的now方法时如果得到的内容附带了am/pm字符串，那么写入数据库时会导致asp程序出错，出现这个问题一般是系统时区设置的问题，可以通过如下方法解决now方法返回am/pm字符串问题。　　开始，设置，控制面板，选择区域和语言选项，在区域选项中选择自定义，选择时间标签，将时间格式设置为HH:mm:ss，设置为24小时制时间，将下面的AM符号..