第2页_热门博文_Asp/VBScript_Web后台开发

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

2013-10-28评论(0)浏览(367)分类：Asp/VBScript

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 replace函数

2013-9-15评论(0)浏览(361)分类：Asp/VBScript

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

javascript/vbscript/asp生成随机数

2012-9-27评论(0)浏览(344)分类：Asp/VBScript

　　由于javascript，vbscript生成的随机数都是0~1之间的小数，如果要生成介于整数之间的随机数时，需要进行一些相关的处理才行，源代码如下。　　javascript生成整数之间的随机数script type=text/javascriptfunction rnd(min,max){ var tmp=min; if(maxmin){min=max;max=tmp;} return Math.floor(Math.random()*(max-min+1)+min);}alert(rn..

asp将字符串内容转换为2进制数据

2012-9-29评论(0)浏览(334)分类：Asp/VBScript

　　asp如何将字符串内容转换为2进制数据，要实现字符串到2进制的转换，可以使用adodb.stream对象写入字符串，然后设置stream的type为1，即指定或返回的数据类型为2进制，然后就可以读取2进制数据流了。　　asp如何将字符串内容转换为2进制数据流源代码如下function TextToBinary(text) dim bindata,stream set stream=server.CreateObject(ad..

sp_cursoropen返回空结果集导致获取不到sp_cursorfetch数据集解决办法

2016-4-29评论(0)浏览(330)分类：Asp/VBScript

　　今天修改一个asp程序，使用了存储过程，存储过程中使用sp_cursoropen/sp_cursorfetch来获取构造的sql语句获取分页数据，发现总记录数能获取到，但是就是无法获取到返回的记录集合。在SQL Server Management Studio执行存储过程，sql为asp输出的sql语句，发现尽然出现了2个结果集，一个是一条记录也没有的，另外一个是有结果的，如下图所示　..

NetBox打包asp文件为可执行文件exe

2014-11-7评论(0)浏览(325)分类：Asp/VBScript

　　NetBox打包asp文件为可执行文件exe示例。　　将下面内容存为.box后缀的文件，然后放到你的网站根目录下。Dim httpdShell.Service.RunService NBWeb, NetBox Web Server, NetBox Http Server Sample'- Service Event Sub OnServiceStart()Set httpd = NetBox.CreateObject(NetBox.HttpServer)If httpd.Create(, 8080) = 0 ThenSet host =..

asp导出excel文件

2014-7-21评论(0)浏览(323)分类：Asp/VBScript

　　由于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执行ping命令获取结果

2012-9-15评论(0)浏览(301)分类：Asp/VBScript

　　功能：asp使用WShShell调用系统的Ping命令，将Ping的结果重定向到一个文本文件中去,再把文本文件显示到网页中　　具体做法如下　　１）首先，建一个.BAT文件(例如：aspping.BAT，保存在d:\web站点下)，这个文件要在ASP中调用，文件内容为：ping -a %1 d:/web/%2.txt　　(%1)是将来要ping的地址，(%2)是存储ping结果的文件.　　以下是ASP执..

asp调用Request.Form集合之后，不能再调用BinaryRead

2012-9-19评论(0)浏览(272)分类：Asp/VBScript

错误：使用 Request.Form 集合之后，不能调用 BinaryRead ，使用 Request.Form 集合之后，不能调用 BinaryRead1）Request.form 是用来获取post 提交的字符的2）Request.BinaryRead 获取二进制调用Request.Form后，上载的数据已经被IIS全部处理完了，用BinaryRead当然也就没有数据可读了。两种方法中你只能用一种，如果上传文件，可以用以BinaryR..

asp批量添加修改删除操作示例

2017-3-18评论(0)浏览(272)分类：Asp/VBScript

　　asp批量添加修改删除操作示例，包括js客户端数据有效性验证，服务器端自己添加验证。titleasp批量添加修改删除操作示例/title%if request.Form(op)=update then'表单提交 ids=request.Form(ids) if ids then response.Write 要删除的数据id集合：idsbr '=========数据库删除操作 conn.execute(delete from xxx where id in(..

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

2013-4-8评论(0)浏览(271)分类：Asp/VBScript

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

vbs使用wmi遍历注册表路径子目录和目录数据

2016-1-11评论(0)浏览(266)分类：Asp/VBScript

　　wmi如何遍历指定注册表路径下的子目录，以及注册表路径右边的名称键值对集合。' 定义常数 (来源 WinReg.h)' 注册表路径常数Const HKEY_CLASSES_ROOT = H80000000Const HKEY_CURRENT_USER = H80000001Const HKEY_LOCAL_MACHINE = H80000002Const HKEY_USERS = H80000003'注册表项目类型常数Const REG_SZ = ..

vbscript语句中“&H”专用于16进制数表示

2009-8-10评论(0)浏览(263)分类：Asp/VBScript

近段时间在做一个asp的项目，由于数据库里面的字段采用字母“h”开头，在sql语言时就出现了莫名其妙的错误，经过反复的检查，也没查出有错误的地方，整整给折腾了我一天的时间。原来在vbscript语句中“H”专用于16进制数表示的。在使用“”这个符号用于字串连接时，应该在两侧加上一个空格，虽然不加空格在多数情况下运行是正常的，但那是不正..

asp/asp.net生成网站快捷方式

2013-5-14评论(0)浏览(248)分类：Asp.Net/C#/WCF

　　asp.net生成网站快捷方式源代码shortcut.aspx.cs protected void Page_Load(object sender, EventArgs e) { string Shortcut = [InternetShortcut] + Environment.NewLine; Shortcut += URL=http://www.w3dev.cn/ + Environment.NewLine;//注意修改链接地址 Shortcut += IDList= + Environment.NewLine; ..

asp实现WWW-Authenticate basic认证示例

2013-7-30评论(0)浏览(244)分类：Asp/VBScript

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

adodb.recordset更新数据占用cpu 100%问题

2013-1-10评论(0)浏览(237)分类：Asp/VBScript

　　2013-01-11更新：也有可能数据库日志太大的问题导致cpu 100%占用或者链接超时问题，参考：Microsoft OLE DB Provider for SQL Server 超时错误 80040e31　　asp程序调用adodb.recordset更新数据时，发现cpu被占用100%【单核cpu】，双核cpu则是50%，程序一直没有反应。　　后面发现是使用了select * from table where xxx=xxx，如果表中包含n..

asp md5加密算法代码

2015-12-24评论(0)浏览(233)分类：Asp/VBScript

　　asp md5加密算法代码%Private Const BITS_TO_A_BYTE = 8Private Const BYTES_TO_A_WORD = 4Private Const BITS_TO_A_WORD = 32Private m_lOnBits(30)Private m_l2Power(30) Private Function LShift(lValue, iShiftBits) If iShiftBits = 0 Then LShift = lValue Exit Function ElseIf iShiftBits = 31 Then If ..

asp批量读写更新文件utf-8编码文件示例

2014-11-6评论(0)浏览(232)分类：Asp/VBScript

　　asp批量处理文件，asp读utf-8文件，asp写utf-8文件示例代码，asp adodb.stream读写utf-8文件示例。asp批量处理目录文件示例代码小提示：如果更新的是ansi编码的文件，只需要scripting.filesystemobject对象的opentextfile打开textstream数据流进行读写即可。如果是utf-8，只能使用adodb.stream进行操作，因为scripting.filesystemobject的ch..

vbscript 移位操作

2009-8-10评论(0)浏览(227)分类：Asp/VBScript

在C和Java等编程语言中，可以方便地对变量进行移位运算，但是在VB中，却没有内置的移位运算符或者函数。于是，我们得自己动手编写移位的运算函数。原理很简单，每向右移一位，就将被移位的变量的二进制除以2；每向左移一位，就将被移位的变量的二进制乘以2。于是可以写出以下函数：+展开-VBScript'按位左移'PublicFunctionLShift(ByValval,ByVal..

Asp.Net--C#字符串类型只执行一次替换

2011-2-11评论(0)浏览(221)分类：Asp.Net/C#/WCF

　　asp.net中使用C#作为后台语言时，字符串类型的Replace方法只有2种重载版本，会一次替换完匹配的内容。不同asp的replace函数，可以指定开始位置，替换次数和比较类型。如下ASP中replace使用方法说明如下replace (expression,find,replacement,[start],[count],[compare])参数expression：必选。包含要替换的子字符串的字符串表达式。find：必..

asp如何在64位系统运行

2015-6-28评论(0)浏览(220)分类：Asp/VBScript

　　asp程序在32位系统（x86）运行正确，但是运行在64位系统出现下面的错误ADODB.Connection 错误 '800a0e7a'未找到提供程序。该程序可能未正确安装。/index.asp，行 3　　需要设置iis程序池以32位应用程序模型来运行。　　找到网站使用程序池，右键此程序池，然后高级设置　　在弹出窗口将启用３２位应用程序为true即可解决此错误。

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

2013-8-29评论(0)浏览(220)分类：Asp.Net/C#/WCF

　　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 /// 判断颜色是否和主..

utf-8 asp页面如何共享gb2312编码页面cookie

2013-3-15评论(0)浏览(219)分类：Asp/VBScript

　　在gb2312编码asp页面生成的cookie，编码是用gb2312编码的，这样在utf-8的页面中获取到的内容是通过gb2312编码的，会得到乱码。　　解决办法就是cookie内容存储用utf-8编码过的字符串，这样在utf-8编码的页面获取到这些utf-8编码后，解码还原成内容就行了。　　小提示：gb2312的asp页面coolie存储gb2312编码过的字符串也行，但是在utf-8页面解..

VB获取计算机硬件序列号

2012-1-4评论(0)浏览(219)分类：Asp/VBScript

　　目前比较常见的硬件资源包或：硬盘物理序列号、CPU序列号、网卡MAC地址、BIOS序列号、主板序列号等，下面是使用VB调用 Windows的WMI编写的一段硬件指纹获取的演示程序，直接将其另存为VBS后缀文件即可运行。稍加修改即可应用在共享软件里，实现用注册码对软件进行保护的功能。+展开-VBScriptMsgValue=""SetobjWMIService=GetObject("winmgmt..

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

2013-3-1评论(0)浏览(218)分类：Asp/VBScript

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

asp sha1加密源代码

2014-6-26评论(0)浏览(212)分类：Asp/VBScript

　　在百度找的几个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的加密算法不一样。　　最后还是靠..

vbs使用wmi获取串口设备属性

2016-1-19评论(0)浏览(212)分类：Asp/VBScript

vbs使用wmi获取串口设备属性源代码' vbs列出串口设备属性On Error Resume NextstrComputer = .Set objWMIService = GetObject(winmgmts: _ {impersonationLevel=impersonate}!\\ strComputer \root\cimv2)Set colItems = objWMIService.ExecQuery(Select * from Win32_SerialPort)For Each objItem in colItems Wscript.Echo Binar..

客户端VBScript和JavaScript相互调用的问题

2011-6-30评论(0)浏览(210)分类：JavaScript/Ajax开发技巧

　　以前在CSDN碰到一个问题，一个人问VBScript如何调用ajaxpro注册的方法，对这种需求真的很无语。。。。　　由于ajaxpro在客户端注册的脚本是JavaScript的，但是JavaScript无法调用VBScript注册的函数或者过程，只能访问VBScript注册的变量，VBScript可以调用JavaScript注册的变量或者方法，所以VBScript使用ajaxpro的异步功能时，需要传递回调..

asp生成utf-8编码静态文件

2015-9-7评论(0)浏览(208)分类：Asp/VBScript

　　asp生成utf-8编码的静态html文件。Scripting.filesystemobject的createTextFile只能指定为unicode，所以asp要生成utf-8编码的静态文件，需要使用adodb.stream来生成，adodb.stream可以指定任何编码。'asp生成指定编码静态html页面过程源代码Sub WriteToTextFile(FileUrl,byval Str,CharSet) set stm=Server.CreateObject(adodb.stream) ..

asp recordset getrows方法

2012-9-28评论(0)浏览(207)分类：Asp/VBScript

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