📄 disp.asp
字号:
<%@ Language="VBScript" CodePage="936" %>
<% Option Explicit %>
<!--#include file="Const.asp"-->
<%
Dim ID
ID = Request.QueryString("ID")
Dim Xml
Set Xml = Server.CreateObject("Microsoft.XMLHTTP")
Xml.Open "GET", ThiefUrl & "Disp.xml.asp?ID=" & ID, False
Xml.Send
Dim XmlDom
Set XmlDom = Server.CreateObject("Microsoft.XMLDOM")
XmlDom.Async = False
XmlDom.ValidateOnParse = False
XmlDom.Load( Xml.responseXML )
Set Xml = Nothing
Dim topic
Set topic = XmlDom.getElementsByTagName("topic")
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<html>
<head>
<meta name="Description" content="美女写真|网友自拍|好色妹妹|美女图片|偷拍走光|">
<meta name="author" content="美女写真馆">
<title>美女写真馆--网友自拍-美女写真-偷拍走光</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="images/default.css" rel=Stylesheet type=text/css>
</head>
<body bgcolor="#003F7F" topmargin="0">
<table width="770" height="10" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td> </td>
</tr>
</table>
<table width="770" height="10" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td> </td>
</tr>
</table>
<table width="770" height="10" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td align="center">
<strong><% = topic.Item(0).getElementsByTagName("title").Item(0).Text%></strong>
更新时间：
<% = topic.Item(0).getElementsByTagName("addtime").Item(0).Text%>
浏览量：<% = topic.Item(0).getElementsByTagName("clickcount").Item(0).Text%>
</td>
</tr>
</table>
<table width="770" height="10" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td align="center"><table width="770" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="770"><% = topic.Item(0).getElementsByTagName("body").Item(0).Text%></td>
</tr>
</table></td>
</tr>
</table>
<table width="770" height="10" border="0" align="center" cellpadding="0" cellspacing="0" background="images/img_bj_2.jpg">
<tr>
<td> </td>
</tr>
</table>
<br>
<p align="center"><strong><a href="index.asp"><font color="#FF0000" size="5">>>>返回首页--美女自拍写真馆 </font></a></strong></p>
<table cellspacing=0 cellpadding=0 width=770 border=0 height="8" align="center">
<tr>
<td valign=top align=middle height="18"><div align="center">
</div></td>
</tr>
</table>
<br>
</body>
</html>
<% Set XmlDom = Nothing %>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -