asp 实现远程登陆代码

Dim objXMLHTTP, xml, place
       Set xml = Server.CreateObject("Microsoft.XMLHTTP")
       xml.Open "GET", "网址",False
       xml.Send
       response = xml.responseText    '获取页面的返回值

 

时间: 2024-08-31 15:10:58

asp 实现远程登陆代码的相关文章

asp用户退出登陆代码

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% session("aname")="" session("admin_flag")="" session.Abandon() response.Redirect("login.asp")  %>    <% Session.timeout=60 if i

asp简单用户登陆代码

<!-- #include file="../inc/conn1.asp"--> <!-- #include file="../inc/md5.asp"--> <%   if cstr(request("code"))<>cstr(session("getcode")) then     response.write"<SCRIPT language=JavaScrip

asp完整登陆代码

asp完整登陆代码 <% option explicit 强制浏览器重新访问服务器下载页面,而不是从缓存读取页面 Response.Buffer = True Response.Expires = -1 Response.ExpiresAbsolute = Now() - 1 Response.Expires = 0 Response.CacheControl = "no-cache" 主要是使随机出现的图片数字随机 %> <!--#include file=&quo

asp获取远程网页的指定内容的实现代码_小偷/采集

代码如下: 复制代码 代码如下: <% '用ASP获取远程目标网页指定内容,代码由广州网站建设http://www.jb51.net提供 On Error Resume Next Server.ScriptTimeOut=9999999 Function getHTTPPage(Path) t = GetBody(Path) getHTTPPage=BytesToBstr(t,"GB2312") End function Function Newstring(wstr,strng

asp.net IHttpModule模板用户登陆代码实例

asp教程.net ihttpmodule模板用户登陆代码实例 void application_acquirerequeststate(object source, eventargs e)         {             httpapplication application = (httpapplication)source;             user user = (user)application.context.session["user"]; //获取

asp简单的用户登陆代码

asp简单的用户登陆代码 <% username=replace(request.form("username"),"'","''") password=replace(request.form("password"),"'","''") sql="select * from admin where(username='"&username&&q

asp获取远程网页的指定内容的实现代码

代码如下: 复制代码 代码如下: <% '用ASP获取远程目标网页指定内容,代码由广州网站建设http://www.jb51.net提供 On Error Resume Next Server.ScriptTimeOut=9999999 Function getHTTPPage(Path) t = GetBody(Path) getHTTPPage=BytesToBstr(t,"GB2312") End function Function Newstring(wstr,strng

ASP获取远程文件大小信息(通过header头信息)

文件大小|远程文件|header ASP获取远程文件的通过header头信息,并返回远程文件大小信息,远程文件可以是网页或RAR,EXE任何格式的文件. 以下的代码是由阿里西西alixixi.com提供的最简化的写法. 以下是引用片段:<% 'ASP获取远程文件大小方法1 set xml = Server.CreateObject("MSXML2.XMLHTTP") xml.open "GET","http://www.alixixi.com/dow

用ASP实现远程批量文件改名

用ASP实现远程批量文件改名 -------------------------------------------------------------------------------- 对于网站设计者而言,时常处理大批量的文件是难免的,特别是图片和一些文本文本文件,更是经常处理.而由于网站大量文件的关系,对于同类型文件的命名,往往就直接采用带有一定规律的递增数字来作为文件名,比如,我们常见的图片文件的命名,就时常采用1001.jpg.1002.jpg这种方式,这样的好处是文件名不会重复,容