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

评论(0)浏览(259)分类: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)浏览(114)分类: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)浏览(452)分类: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)浏览(122)分类: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 redim preserve示例

评论(0)浏览(98)分类:Asp/VBScript
asp redim preserve示例asp中REDIM的功能是动态定义数组长度  动态数组里面的一个语句,只能出现在过程里面,可以多次使用。可以改变数组大小,和维数格式:REDIM [Preserve] 数组名(下标1[下标2....])Preserve 保留动态数组的内容(不用的话,每次执行REDIM语句,当前存储的语句会全部丢失)例如:Dim DynArray() '定义数组DynArray()为动态数组REDIM Preserv..

VB6 StrConv函数ASP的实现方法

评论(0)浏览(666)分类:Asp/VBScript
VB6 StrConv函数ASP的实现方法ASP 如何实现 VB 的 StrConv 函数来对字符串进行 Unicode 转换 ( vbFromUnicode / vbUnicode )  VB6 的StrConv 函数说明 :传回一特定转换后的 Variant (String)。语法:StrConv(string, conversion, LCID)  StrConv 函数参数说明参数说明string必要引数。为欲转换的字串运算式。conversion必要引数:为Integer。其值的和决定转换的型态。LC..

asp replace函数

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

C#/vbscript判断2个样色是否相似

评论(0)浏览(276)分类:Asp.Net/C#/WCF
C#/vbscript判断2个样色是否相似  C#/vbscript判断2个样色是否相似,算法如下RGB是个3维空间,分别计算两个颜色在这个空间的两个坐标点的直线距离,便是两个颜色的色差。色差Cv=SQR(AbsR^2+AbsG^2+AbsB^2)CS=阀值CV=CS为相似CVCS为不相似CS阀值最大为442【RGB(0,0,0)与RGB(255,255,255)的色差】C#t判断2个样色是否相似源代码 /// summary /// 判断颜色是否和主..

asp实现WWW-Authenticate basic认证示例

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

asp将base64编码的图片信息还原为图片

评论(0)浏览(1260)分类:Asp/VBScript
asp将base64编码的图片信息还原为图片  asp将base64编码的图片信息还原为图片,可以将得到的base64编码的图片内容保存为一个xml文件(或者组合成下面贴出的xml格式的字符串,此时注意xml组件调用的方法不同于xml文件),通过MSXML2.DOMDocument+ADODB.Stream保存为图片文件。  base.xml文件内容 ?xml version=1.0 encoding=gb2312? data ![CDATA[iVBORw0KGgoAAAANS..

asp.net/asp Response IsClientConnected属性

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

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

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

asp recordset bookmark属性

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

upload_5xsoft asp无组件文件上传类库

评论(1)浏览(740)分类: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 ISAPI_Rewrite重写后的伪静态URL地址

评论(2)浏览(822)分类:Asp.Net/C#/WCF
获取asp ISAPI_Rewrite重写后的伪静态URL地址  如何获取被ISAPI_Rewrite重写后的URL。【解决方法试用于asp和asp.net】  测试环境:IIS6中使用ISAPI_Rewrite对Default.aspx进行重写,重写后的地址为:Index-After-ReWriter.html。  需要获取重写后的地址,即Index-After-ReWriter.html。解决方案asp.netstring rawurl=Request.ServerVariables[HTTP_X_REWRITE_URL];Response.Write(raw..

vbscript实现正则替换参数为函数

评论(0)浏览(122)分类:Asp/VBScript
vbscript实现正则替换参数为函数  vbscript如何使用正则替换,替换参数为函数,可以处理分组中的数据后再返回需要的数据。  javascript的正则替换被替换内容可以为参数,但是vbscript的正则替换没有这种功能,替换成的内容只能为字符串,不能为一个返回字符串的函数。  下面是一个老外写的vbscript实现的替换成的内容可以为一个回调函数博文,原文如下来源:http://gotoc..

MSScriptControl.ScriptControl组件介绍

评论(0)浏览(737)分类:Asp/VBScript
MSScriptControl.ScriptControl组件介绍MSScriptControl.ScriptControl组件实例对象属性属性名称类型备注AllowUIBOOL检测是否允许运行用户的接口元素。如果为False,则诸如消息框之类的界面元素不可见。CodeObjectObject脚本暴露给宿主调用的对象。只读。ModulesModules宿主提供给脚本的组件库模块。只读。(COM组件通常都是以对象收集的形式向用户提供可以留给用户二次开发的对象集合..

asp/vbscript解析json字符串生成json对象

评论(0)浏览(329)分类:Asp/VBScript
asp/vbscript解析json字符串生成json对象  asp/vbscript将json字符解析为json对象的方法,如果asp使用jscript来编写服务器端代码操作json字符串就简单了,vbscript需要MSScriptControl.ScriptControl或者服务器端的jscript来作为中间体才行。  vbscript将json字符解析为json对象的方法一,使用MSScriptControl.ScriptControl组件,请用IE浏览器运行本示例,会有安全提示,需要点击是..

ASP内置对象类型属性介绍

评论(0)浏览(212)分类:Asp/VBScript
ASP内置对象类型属性介绍  ASP内置对象Request,Request.Form,Request.Form(id)类型,.item, .items, .count, .content属性介绍  测试这些对象类型和是否包含.item, .items, .count, .content属性源代码 % On Error Resume Next Dim i,biName,arrBI,AI biName = ObjectContext, _ Server, _ Application, _ Application.Contents, _ ..

asp访问ad目录通过ldap

评论(0)浏览(200)分类:Asp/VBScript
asp访问ad目录通过ldap转载自:http://forums.aspfree.com/code-bank-54/asp-code-query-ad-ldap-169652.htmlthe following code let's you query a domain AD to get users details.I've split the query into two parts, so if you want to get more than one users details and want different info for each user you can add another sub and get what i..

asp查询ldap

评论(0)浏览(133)分类:Asp/VBScript
asp查询ldap  asp如何查询ldap示例demo%@ Language=VBScript %%Option ExplicitDim con,rs,Com,letter,school%htmlheadstyle.over { background-color: #FFFF66; cursor: hand}.out { background-color: #CCCCCC}/style/headbody topmargin=0 leftmargin=0 bgcolor=#CCCCCC %Set con = Server.CreateObject(ADODB.Connection)con.provider =ADsDSOObjectc..

asp无组件生成缩略图[非生成文件]

评论(0)浏览(114)分类:Asp/VBScript
asp无组件生成缩略图[非生成文件]  网上有不少生成缩略图的ASP组件,如aspjpeg,若你的虚拟空间不支持注册新组件,可能会感觉自己的网站失色不少。心晴不才,结合网上资源写了个无组件生成缩略图程序,仅供参考。  还是先看看基础部分吧。首先,我们知道在页面中显示图片是如下代码:  img src=pic.gif border=0 width=300 height=260  src是图片路径,border控制图片边..

asp gb2312/utf-8编码和解码

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

asp base64编码/解码函数

评论(0)浏览(208)分类:Asp/VBScript
asp base64编码/解码函数  asp实现的base64编码和解码函数使用方法!--#include file=base64.inc--%'---------------------------------------------------------------------------------str=我爱你tandyencodestr=encode64(str) '编码response.write encodestr hrresponse.write decode64(encodestr) hr '解码%  asp实现的base64编码和解码函数源代码..

asp正则submatches分组

评论(0)浏览(171)分类: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 recordset getrows方法

评论(0)浏览(255)分类:Asp/VBScript
asp recordset getrows方法  在ASP中操作数据库一般都要用到RecordSet对象,如果注重程序效率的话,可以使用RecordSet对象的GetRows方法,把记录集recordset转换成二维数组,因为操作数组在速度上将比用RecordSet对象的MoveNext方法快很多,也可以在将recordset转换为数组后尽早释放RecordSet对象,从而减少资源的占用,这也是优化ASP性能的一个方法。  假设现在有一个..

asp数字分页导航示例

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