一个ASP的高级模板引擎
这个模板引擎比较方便,跟HTML结合了
Class template
Private c_Char, c_Path, c_FileName, c_Content, c_PageUrl, c_CurrentPage, c_PageStr, ReplacePageStr
Private TagName
' ***************************************
' 设置编码
' ***************************************
Public Property Let Char(ByVal Str)
c_Char = Str
End Property
Public Property Get Char
Char = c_Char
End Property
' ***************************************
' 设置模板文件夹路径
' ***************************************
Public Property Let Path(ByVal Str)
c_Path = Str
End Property
Public Property Get Path
Path = c_Path
End Property
' ***************************************
' 设置模板文件名
' ***************************************
Public Property Let FileName(ByVal Str)
c_FileName = Str
End Property
Public Property Get FileName
FileName = c_FileName
End Property
' ***************************************
' 获得模板文件具体路径
' ***************************************
Public Property Get FilePath
If Len(Path) > 0 Then Path = Replace(Path, "\", "/")
If Right(Path, 1) <> "/" Then Path = Path & "/"
FilePath = Path & FileName
End Property
' ***************************************
' 设置分页URL
' ***************************************
Public Property Let PageUrl(ByVal Str)
c_PageUrl = Str
End Property
Public Property Get PageUrl
PageUrl = c_PageUrl
End Property
' ***************************************
' 设置分页 当前页
' ***************************************
Public Property Let CurrentPage(ByVal Str)
c_CurrentPage = Str
End Property
Public Property Get CurrentPage
CurrentPage = c_CurrentPage
End Property
' ***************************************
' 输出内容
' ***************************************
Public Property Get Flush
Response.Write(c_Content)
End Property
' ***************************************
' 类初始化
' *******************
相关文档：
用ASP实现搜索并分页是我见大多数程序员和大多数网站出现了不能正常分页的问题，搜索出来的结果点击下一页数据又重定向为初始的结果。是什么原因倒致这个问题呢？
这个问题也是在我在校正在学习ASP的时候练习实例中遇到的问题，出现这个问题后，反复的调试反复的检查代码，看来看去代码没有不报错也无误。� ......
除非您以系统帐户的身份登陆到服务器（在浏览器环境中也是可以实现），或者主机端进行了良好的权限配置，否则本文涉及的功能是很难实现的。因为我们通过iis访问某个页面时，一般是iis匿名帐户的身份，在大多数情况下，asp的WScript.Shell是被禁用的，因为它有很大的安全隐患。
要想实现这种功能，首先要得到Rar� ......
arr = array(12,52,14,43,24,58,15,64,24,57,17,56,45)
arrLen = ubound(arr)
for i=0 to arrLen-1
for j = 0 to (arrlen -1)-i
if arr(j)>arr(j+1) then
temp = arr(j)
arr(j)= arr(j+1)
arr(j+1) = temp
end if
next
next
for each l in arr
response.Write l&"< ......
一、正则表达式概述
如果原来没有使用过正则表达式，那么可能对这个术语和概念会不太熟悉。不过，它们并不是您想象的那么新奇。
请回想一下在硬盘上是如何查找文件的。您肯定会使用 ? 和 * 字符来帮助查找您正寻找的文件。? 字符匹配文件名中的单个字符，而 * 则匹配一个或多个字符。一个如 ＇data?.dat＇ 的模式可 ......
Asp操作DTS进行代参数的数据导入导出
年前接了一个小项目,其中一部分是将sql中的数据进行有选择的导出到一个mdb中。
这些是完全可以通过asp得sql语句进行操作的，但是还是想把主要导出的任务交给sql server去做，asp主要是调动这个程序而已。
想到以前做过的东西，觉得实现起来并不难，只是一个参数的问题。
开始实现� ......
