📄 default.asp
字号:
<TD></TD>
<TD colspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="655" height="22" valign="middle" style="border-bottom:#009090 2px solid;">·等待审核的文字链接（<span class="STYLE7">审核通过前，只显示你站的链接文字</span>）</td>
</tr>
</table></TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="10"></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="28"></TD>
<TD></TD>
<TD colspan="3" valign="top"><table border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<%
i=1
StarNodes=0
strSourceFile = Server.MapPath("Word.xml")
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.load(strSourceFile)
Set objRootsite = objXML.documentElement.selectSingleNode("guestbook")
'获取子节点数据（因为是从节点数从0开始的所最大子节点数要减1）
AllNodesNum = objRootsite.childNodes.length - 1
response.write "<tr>"
while StarNodes =< AllNodesNum
id=objRootsite.childNodes.item(StarNodes).childNodes.item(0).text
liketype=objRootsite.childNodes.item(StarNodes).childNodes.item(1).text
linkname=objRootsite.childNodes.item(StarNodes).childNodes.item(2).text
linkurl=objRootsite.childNodes.item(StarNodes).childNodes.item(3).text
imgpath=objRootsite.childNodes.item(StarNodes).childNodes.item(4).text
addtime=objRootsite.childNodes.item(StarNodes).childNodes.item(5).text
ischeck=objRootsite.childNodes.item(StarNodes).childNodes.item(6).text
if liketype="1" and ischeck="0" then
response.write "<td height='28' align='center' valign='middle' bgcolor='#ffffff' style='padding:5px;'>"&linkname&"</td>"
'response.write "<td height='28' align='center' valign='middle' bgcolor='#ffffff' style='padding:5px;'><a href='http://"&replace(linkurl,"http://","")&"' target='_blank' class='a4'>"&linkname&"</a></td>"
%>
<%
if i mod 8=0 then response.write "</tr><tr>"
i=i+1
end if
StarNodes = StarNodes + 1
wend
set objXML = nothing
%>
</table></TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="27"></TD>
<TD></TD>
<TD> </TD>
<TD> </TD>
<TD> </TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="22"></TD>
<TD></TD>
<TD colspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="655" height="22" valign="middle" style="border-bottom:#009090 2px solid;">·等待审核的图片链接（<span class="STYLE8"><span class="STYLE7">审核通过前，</span>只显示你站的LOGO</span>）</td>
</tr>
</table></TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="10"></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="50"></TD>
<TD></TD>
<TD colspan="3" valign="top"><table border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<%
j=1
StarNodes=0
strSourceFile = Server.MapPath("Word.xml")
Set objXML = Server.CreateObject("Microsoft.XMLDOM")
objXML.load(strSourceFile)
Set objRootsite = objXML.documentElement.selectSingleNode("guestbook")
'获取子节点数据（因为是从节点数从0开始的所最大子节点数要减1）
AllNodesNum = objRootsite.childNodes.length - 1
response.write "<tr>"
while StarNodes =< AllNodesNum
id=objRootsite.childNodes.item(StarNodes).childNodes.item(0).text
liketype=objRootsite.childNodes.item(StarNodes).childNodes.item(1).text
linkname=objRootsite.childNodes.item(StarNodes).childNodes.item(2).text
linkurl=objRootsite.childNodes.item(StarNodes).childNodes.item(3).text
imgpath=objRootsite.childNodes.item(StarNodes).childNodes.item(4).text
addtime=objRootsite.childNodes.item(StarNodes).childNodes.item(5).text
ischeck=objRootsite.childNodes.item(StarNodes).childNodes.item(6).text
if liketype="2" and ischeck="0" then
response.write "<td height='28' align='center' valign='middle' bgcolor='#ffffff' style='padding:5px;'><img src='http://"&replace(imgpath,"http://","")&"' border=0 height=31 width=88></td>"
'response.write "<td height='28' align='center' valign='middle' bgcolor='#ffffff' style='padding:5px;'><a href='http://"&replace(linkurl,"http://","")&"' target='_blank' title='"&linkname&"'><img src='http://"&replace(imgpath,"http://","")&"' border=0 height=31 width=88></a></td>"
%>
<%
if j mod 7=0 then response.write "</tr><tr>"
j=j+1
end if
StarNodes = StarNodes + 1
wend
set objXML = nothing
%>
</table></TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="48"></TD>
<TD></TD>
<TD> </TD>
<TD> </TD>
<TD> </TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="160"></TD>
<TD></TD>
<TD valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" style="border:#dddddd 1px solid;">
<form name="form1" action="addtextlink.asp" method="post" onSubmit="return checkform1()">
<tr>
<td height="27" colspan="2" align="center" valign="middle" bgcolor="#f6f6f6">文字链接申请</td>
</tr>
<tr>
<td width="83" height="30" align="center" valign="middle">链接名称：</td>
<td width="249" valign="middle"><input name="linkname" type="text" id="linkname" maxlength="8">
7字内</td>
</tr>
<tr>
<td height="31" align="center" valign="middle">链接地址：</td>
<td valign="middle"><input name="linkurl" type="text" id="linkurl" maxlength="60"></td>
</tr>
<tr>
<td height="32"> </td>
<td> </td>
</tr>
<tr align="center" valign="top">
<td height="35" colspan="2"> <input type="submit" name="Submit" value="提交审核">
<br><br>提交后24小时内必须做好本站链接！！</td>
</tr>
</form>
</table></TD>
<TD> </TD>
<TD valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0" style="border:#dddddd 1px solid;">
<form name="form2" action="addimglink.asp" method="post" onSubmit="return checkform2()">
<tr>
<td height="27" colspan="2" align="center" valign="middle" bgcolor="#f6f6f6">图片链接申请(88*31)</td>
</tr>
<tr>
<td width="87" height="29" align="center" valign="middle">链接名称：</td>
<td width="238" valign="middle"><input name="linkname" type="text" id="linkname" maxlength="15">
10字内</td>
</tr>
<tr>
<td height="28" align="center" valign="middle">链接地址：</td>
<td valign="middle"><input name="linkurl" type="text" id="linkurl" maxlength="60"></td>
</tr>
<tr>
<td height="28" align="center" valign="middle">图片路径：</td>
<td valign="middle"><input name="imgpath" type="text" id="imgpath" maxlength="60"></td>
</tr>
<tr align="center" valign="middle">
<td height="55" colspan="2"><input type="submit" name="Submit2" value="提交审核">
<br><br>提交后24小时内必须做好本站链接！！</td>
</tr>
</form>
</table></TD>
<TD> </TD>
<TD></TD>
</TR>
<TR>
<TD height="42"></TD>
<TD></TD>
<TD> </TD>
<TD> </TD>
<TD> </TD>
<TD></TD>
<TD></TD>
</TR>
<TR>
<TD height="78"> </TD>
<TD colspan="5" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<!--DWLayoutTable-->
<tr>
<td width="691" height="78" valign="middle"><p><span class="STYLE4">友情链接须知：<span class="STYLE5">提交您的链接请求后，尽快做好我站的链接</span>，我们将在<span class="STYLE6">24小时</span>内审核、做好贵站的链接。<br>
链接形式： <br>
文字链接－中华免费家教网 链接地址：http://www.123.com<br>
图片链接－中华免费家教网 链接地址：http://www.123.com/logo.gif<br>
链接图片(88*31)：</span><br>
</p> </td>
</tr>
</table></TD>
<TD> </TD>
</TR>
<TR>
<TD height="25"> </TD>
<TD> </TD>
<TD colspan="3"><div align="center"><span class="STYLE4"><strong>本站首页只做文字链接，要求PR>=4，日IP>3000。</strong></span><br><br>
</div></TD>
<TD></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="base.asp"-->
</BODY></HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -