程序人生

ASP强制刷新网页和判断文件地址实例代码

强制刷新网页 <% '强制性刷新随机验证码 '让随机验证码每次按IE的后退按钮时,返回登录页面的随即码都自动刷新, Response.expires=-1 Response.AddHeader"pragma","no-cache" Response.AddHeader"cache-c...

程序人生

ASP上传漏洞之利用CHR(0)绕过扩展名检测脚本

今天Demon 提到了这个问题,正好想到之前看到的一篇文章《Automatic file upload using IE+ADO without user interaction - VBSscript》 。这篇文章给出了本地无交互自动上传脚本的示例,正好今天可以借...

程序人生

asp 由动态网页转变为静态网页的实现代码

具体代码实现: 1.模板文件(html) 复制代码 代码如下: html xmlns="http://www.w3.org/1999/xhtml" head meta http-equiv="Content-Type" content="text/html; charset=gb2312" / title{title} - 新闻中心 - 哎呀呀饰品加盟连...

程序人生

asp 判断上传文件中是否存在危险代码

复制代码 代码如下: % function CheckFileContent(FileName) dim ClientFile,ClientText,ClientContent,DangerString,DSArray,AttackFlag,k set ClientFile=Server.CreateObject("Scripting.FileSystemObject") set ClientText=ClientFile.OpenTextFi...

程序人生

asp自动补全html标签自动闭合(正则表达式)

复制代码 代码如下: Function closeHTML(strContent) Dim arrTags, i, OpenPos, ClosePos, re, strMatchs, j, Match Set re = New RegExp re.IgnoreCase = True re.Global = True arrTags = Array("p", "div", "span", "table", "ul", "font", "b", "...

程序人生

asp实现截取字符串函数

如果标题过长,因为页面布局的限制,只能列表10个字符,这个函数会帮你实现的 复制代码 代码如下: '截取字符串 strvalue(标题,字数) function strvalue(str,lennum) dim p_num dim i if strlen(str)=len...

程序人生

ASP 高级模板引擎实现类

复制代码 代码如下: Class template Private c_Char, c_Path, c_FileName, c_Content, c_PageUrl, c_CurrentPage, c_PageStr, ReplacePageStr Private TagName ' *************************************** '设置编码 ' *************************...