feng2112的专栏

用下面的函数转换即可Function StreamToStr(sStream) dim dr Set dr=Server.CreateObject("Adodb.Stream") dr.Mode=3 dr.Type=2 dr.Open dr.Charset="GB2312" dr.WriteText sStream dr.Position=0 dr.Charset="UTF-8" Stream

开始日期结束日期

WEB页面导出为EXCEL文档的方法 单元格A单元格A单元格A单元格A单元格合并行A单元格B单元格B单元格B单元格B单元格合并行B//指定页面区域内容导入Excelfunction AllAreaExcel() {

第一种:    str = "xx=xxxx"    set objHttp = CreateObject("MSXML2.ServerXMLHTTP")    objHttp.open "POST", "http://xxx/xx.asp", false    objHttp.setRequestHeader "Content-type", "application/x-www-

... ExpStr(vStr,vReg,sStr) 返回正则匹配结果 ##################################################### vStr 为原始字符串 vReg 为正则表达式 sStr 为分隔符（尽量使用原始字符串中不会出现的字符串） ############################################

base64编码与解码,修改了一些函数，使之编码为单字节的，便于与java的 sun.misc.BASE64Decoder 编码对应function bin2dec(binStr)    towPow=1    numLen=len(binStr)    bin2Dec=0    decPos=numLen    do while decPos>0        cChar=mid(binStr,

function bin2dec(binStr)    towPow=1    numLen=len(binStr)    bin2Dec=0    decPos=numLen    do while decPos>0        cChar=mid(binStr,decPos,1)        nChar=Cint(cChar)        bin2Dec=bin2Dec+nChar*to

 request.asp页面%dim Httpsset Https=server.createobject("MSXML2.XMLHTTP")定义一个XMLHTTP对像Https.open "POST","http://127.0.0.1/response.asp",falseHttps.send "echo1234569876541111122222"if Https.readysta

 目前比较流行的ASP木马主要通过三种技术来进行对服务器的相关操作。一、使用FileSystemObject组件FileSystemObject可以对文件进行常规操作可以通过修改注册表，将此组件改名，来防止此类木马的危害。HKEY_CLASSES_ROOT/Scripting.FileSystemObject/改名为其它的名字，如：改为FileSystemObject_ChangeName自己以后

ASP木马、Webshell之安全防范解决办法正文内容：　　注意：本文所讲述之设置方法与环境：适用于Microsoft Windows 2000 Server/Win2003 SERVER 　 IIS5.0/IIS6.0 　　　　1、首先我们来看看一般ASP木马、Webshell所利用的ASP组件有那些？我们以海洋木马为列：　　＜object runat=”server” id=”

Request.ServerVariables(Url) 返回服务器地址Request.ServerVariables(Path_Info) 客户端提供的路径信息Request.ServerVariables(Appl_Physical_Path) 与应用程序元数据库路径相应的物理路径Request.ServerVariables(Path_Translated) 通过

正则表达式在asp里的简单应用验证手机号码function IsValidMobileNo(MobileNo)    dim regEx    set regEx = New RegExp    regEx.Pattern = "^(130|131|132|133|134|135|136|137|138|139|159)/d{8}$"    IsValidMobileNo=regEx.test(

一、方法与说明　　首先要上传一个WINRAR的解压程序，就是WINRAR自己的解压程序，只需要它的核心程序winRAR.EXE这个文件就可以了，在WINRAR的安装目录里以找到。然后要上传一个执行RAR.EXE的程序 CMD.EXE 这个是WINDOWS操作系统里的程序，在系统盘WINNT/SYSTEM32文件夹中可以找到。上传完这两个文件后，就需要编写一些程序代码来实现压缩与解压缩。　　不妨将实

Thank you for your kind 

<br /> <br />'字符串转ascII码,转换后的ascII码以";"连接<br />Function getAscII(str)<br />k = Len(str)<br />For i = 1 To k<br />getAscII = getAscII & Asc(Mid(str,i,1))&";"<br />Next<br />If Len(getAscII)>2 then<br />getAscII = Left(getAscII,Len(getAscII)-1)<br />End if<b