ASP を使用して Microsoft セキュリティ更新プログラムのリストを取得するためのコードは、実際には、ASP 泥棒プログラムを学習している友人であれば、それを参照することができます。より良いコードについては、Script House が提供するソース コードをダウンロードできます。次のようにコードをコピーします。
<%
関数 Bytes2bStr(vin,cSet)
Dim BytesStream、StringReturn
BytesStream = Server.CreateObject(ADODB.Stream) を設定します。
バイトストリーム.タイプ = 2
BytesStream.Open
BytesStream.WriteText vin
バイトストリーム.位置 = 0
BytesStream.CharSet = cSet
バイトストリーム.位置 = 2
StringReturn =BytesStream.ReadText
BytesStream.close
BytesStream = なしを設定します
Bytes2bStr = StringReturn
終了機能
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)
re = 新しい正規表現を設定します
re.Pattern = <span class=label>.*?<//span>
re.Global = True
re.IgnoreCase = true
re.MultiLine = false
一致を設定 = re.Execute(aa)
薄暗い温度
tmp=
試合の各試合ごとに
tmp = tmp&match.value
次
tmp = 置換(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.閉じる
fso = 何も設定しない
応答.リダイレクト Microsoft.html
%>