用asp获取微软安全更新列表的代码 小偷程序
来源:asp之家 发布时间:2011-02-24 11:19:00
代码如下:
<%
Function Bytes2bStr(vin,cSet)
Dim BytesStream,StringReturn
Set BytesStream = Server.CreateObject("ADODB.Stream")
BytesStream.Type = 2
BytesStream.Open
BytesStream.WriteText vin
BytesStream.Position = 0
BytesStream.CharSet = cSet
BytesStream.Position = 2
StringReturn =BytesStream.ReadText
BytesStream.close
Set BytesStream = Nothing
Bytes2bStr = StringReturn
End Function
Set xmlhttp = server.CreateObject("Msxml2.XMLHTTP")
m_queryURL = "http://www.microsoft.com/china/technet/security/current.mspx"
XMLHTTP.Open "GET", m_queryURL, false
XMLHTTP.send()
s = XMLHTTP.responseBody
aa = Bytes2bStr(s,"GB2312")
Set re = New RegExp
re.Pattern = "<span class=""label"">.*?<\/span>"
re.Global = True
re.IgnoreCase = true
re.MultiLine = false
set matches = re.Execute(aa)
dim tmp
tmp = ""
for each match in matches
tmp = tmp&match.value
next
tmp = Replace(tmp,"href=""","target=_blank href=""http://www.microsoft.com")
set fso = server.CreateObject("scripting.filesystemobject")
set f = fso.OpenTextFile(server.mappath("Microsoft.html"),2,true)
f.write(tmp)
f.close
set fso = nothing
response.Redirect "Microsoft.html"
%>


猜你喜欢
- 1、安装Django在命令行模式下使用pip工具来安装Django,pip工具的安装方法见此篇pip install django2、确认是
- 佛爷去了公司的年夜饭,我有点无聊就在公司 Coding 点东西玩玩,于是就有了这玩意。请允许我很猥·琐得将这个游戏称之为“是男人坚持 100
- 有这种要求,更新自己本身的字段的某个值进行加或者减常规方法:UPDATE tbl_kintai_print_hisSET &nb
- 下面这段代码是asp编写的用来识别客户端是否为手机浏览器,以及手机类型的代码。主要用于手机网站的建设,以便实现相同网址下的不同版本网站(比如
- 一、异常检测简介异常检测是通过数据挖掘方法发现与数据集分布不一致的异常数据,也被称为离群点、异常值检测等等。1.1 异常检测适用的场景异常检
- 本文实例讲述了php打印输出棋盘的两种实现方法。分享给大家供大家参考。具体实现方法如下:例子1,代码如下:<?php /** &nbs
- 首先,定义一个变量:(以下以本人写的为例)首先定义一个变量:然后,给变量赋值:如果想要修改数据,主要代码如下:然后界面上要记得绑定数据id:
- 1.方法方法描述bbox(item, column=None)返回指定item的框选范围,或者单元格的框选范围column( cid, op
- 函数原型与参数详解OpenCV提供了cv.Canny()方法,该方法将输入的原始图像转换为边缘图像。该方法的原型为:cv.Canny(ima
- 目录1.在app下的models.py中创建新的模板2.数据迁移(用pycharm自带的Terminal工具即可)3.在app下的views
- Tensorflow是目前最流行的深度学习框架,我们可以用它来搭建自己的卷积神经网络并训练自己的分类器,本文介绍怎样使用Tensorflow
- 此次遇到的问题是在import pycurl 时报错pycurl:libcurl link-time version is older th
- 1查找字符位置函数: strpos($str,search,[int]):查找search在$str中的第一次位置从int开始; strip
- --====================================================================
- 前言🥂上一篇文章说完MySQL的事务和锁了,这次来详细介绍一下在MySQL中一条更新语句的详细执行流程 (本文无特殊说明均是采用Innodb
- 1、表的主键、外键必须有索引;2、数据量超过300的表应该有索引;3、经常与其他表进行连接的表,在连接字段上应该建立索引;4、经常出现在Wh
- 合并与分割tf.concattf.concat可以帮助我们实现拼接操作.格式:tf.concat( values,
- 本文实例为大家分享了python K均值聚类的具体代码,供大家参考,具体内容如下#-*- coding:utf-8 -*- #!/usr/b
- 两种方式以及效果:方式一,使用PIL.Image.blend方式:from PIL import Image, ImageDrawim =
- 本文实例讲述了php+redis实现注册、删除、编辑、分页、登录、关注等功能。分享给大家供大家参考,具体如下:主要界面连接redisredi