发一个自己封装的Asp Dll文件
调试程序和做程序的时候，好多重复的代码一直输入很麻烦，也很没有效率，封装一个自己的Asp包包，挺有有的
下载个精简版的VB6.0，新建 ActiveX dll，以下是封装的代码，重要部分都有注释，不懂可以跟帖
Option Explicit
Public Resp As Response, Requ As Request, Appl As Application, Serv As Server, Sess As Session '内置对象的变量声明
Public ObjConn As Object, StrSql As String, ObjRs As Object, ObjFso As Object '全局级变量
'=============================Md5部分声明=============================
Private Const BITS_TO_A_BYTE = 8
Private Const BYTES_TO_A_WORD = 4
Private Const BITS_TO_A_WORD = 32
Private m_lOnBits(30), m_l2Power(30) '数组声明
'=====================================================================
Public Sub OnStartPage(MyObj As ScriptingContext)
Set Resp = MyObj.Response
Set Requ = MyObj.Request
Set Serv = MyObj.Server
Set Appl = MyObj.Application
Set Sess = MyObj.Session
Sess.Timeout = 30
End Sub
Public Sub OnEndPage()
Set Resp = Nothing
Set Requ = Nothing
Set Serv = Nothing
Set Appl = Nothing
Set Sess = Nothing
End Sub
'----------------------------------------------------------------------------------
'----------------------------------------------------------------------------------
'---------- 函数表 方法 与外来参数传递 -----------
'----------------------------------------------------------------------------------
'----------------------------------------------------------------------------------
'W 方法 入口值：StrWords As String 返回值：直接输出
'R 方法 入口值：StrUrl As Strin
相关文档：
VBSCRIPT 的数据类型
VBSCRIPT 只有一种数据类型：variant ，程序根据上下文来判断 variant 为数字类型还是字符串类型。
引号内的数字被看成字符串，如：a="12" ；
不带引号当然就是数字，如：b=13 。
实例：
以下为引用内容：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C// ......
变量申明，命名规则与运算符
1，用三种语句来声明变量：dim ，public 与 private ，比较常用的还是 dim 。
如：<% dim a %> ；<% dim a , b , c %>
2，命名规则：
<1> 变量的第一个字符必须是字母，数字和符号都不行。
<2> 不能嵌入句点。
<3> 长度不能超过255个字符。
<4> ......
流程控制语句
以下用实例来演示流程控制语句中的循环语句与条件语句：
条件语句：if ...else
以下为引用内容：
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns ......
1：SQL 注入：
解决方案：
a. 这个问题主要是由于传入特殊字符引起的我们可以在对输入的用户名密码进入过滤特殊字符处理。
b. 使用存储过程通过传入参数的方法可解决此类问题（注意：在存储过程中不可使用拼接实现，不然和没用存储过和是一样的）。
2. XSS（跨站脚本攻击）：
解决方案：
a. 通过在 Page 指令或 � ......
<html xmlns="http://www.w3.org/1999/xhtml" >
<HEAD>
<title>多文件上传 </title>
<script language="JavaScript">
function addFile()
{
var str = ' <br / ......
