编写定制的Active Server Page(ASP)代码来完成一些任务,比方说数据库访问的能力是重要的.但是,一个由脚本写成的解决方案最明显的问题就是性能.在这篇文章中,我将向你展示如何将一个数据库对象的脚本版本转换成一个动态链接库(dll),或是就象它的通常的名字,一个COM组件.为了生成这个编译版本,我将使用Visual Basic 6 service pack 4.我曾经向你展示了如何创建一个V...[ 查看全文 ]
使用 NetBox 可以方便的将 asp 应用编译成为独立运行的执行程序,完全摆脱 iis 的束缚,在几乎所有的 Windows 版本上面直接运行,完全不需要考虑平台兼容性和对 asp 运行环境的要求。下面就是快速移植已有的 asp 应用的步骤。 一、创建 asp 运行环境 首先创建一个空的目录,在你喜欢的位置,假设是 d:\websvr。将 netbox.exe 复制到这个目录,然后在目录中创建一个文件:main.box,编辑其内容为: ...[ 查看全文 ]
This article presents a simple way to ping an address and get the results of the ping using ASP. The idea was supplied by Bart Silverstein. First, a .BAT file needs to be created that will be run from the Active Server Page. Let's call this file DoPing.BAT. It will contain only one statement, which will ping a passed in IP address. Here is the code for DoPing.BAT: ...[ 查看全文 ]
<% '***** BEGIN FUNCTION AREA ***** ' Formats a given 10 digit number into a nice looking phone number ' Example: given strNumber of 8005551212 you get (800) 555-1212 Function FormatPhoneNumber(strNumber) Dim strInput ' String to hold our entered number Dim strTemp ' Temporary string to hold our working text Dim strCurrentChar ' Var for storing each character for ev...[ 查看全文 ]
编者(icech)按:这段程序的方法是利用XMLHTTP来读取腾讯网站的相应HTML代码获取QQ的头像,根据这个想法,我们还可以抓取很多其他网站的信息,如天气预报、新闻等等。 <script language="javascript" <!-- function getFaceImg(QQcode) { var Re=new RegExp("^[1-9]{1}\d+$","g"); if (!QQcode||!Re.test(QQcode)) return; var URL="http://search....[ 查看全文 ]
<!-- #include file = "DB.fun" -- <% mingcheng=request("mingcheng") sec=Request("score") session("mingcheng")=mingcheng session("sec")=sec If session("ID")="" then response.redirect "qzhuce.asp" response.end End If dim time1 sec=Request("score&q...[ 查看全文 ]