www.gusucode.com > QQ空间互踩整站源码asp网站源码程序 > QQ空间互踩整站源码asp网站源码程序/getcode.asp
<!--#include file="conn.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>重获链接代码_<%=WebName&ChannelName%></title>
<meta name="description" content="QQ空间互踩联盟,QQ空间互踩,互踩空间,QQ互踩。">
<meta name="keywords" content="<%=WebAlt%>">
<link rel="stylesheet" href="style.css">
<body leftmargin="0" topmargin="0">
<!--#include file="top.asp"-->
<table width="760" border="0" align="center" cellpadding="3" cellspacing="0" class="main_tdbg">
<tr>
<td height="30"><div align="center"><a href="addlink.asp">QQ空间互踩联盟，加入马上获得更多的朋友来访！</a></div></td>
</tr>
</table>
<table width="760" border="0" align="center" cellpadding="0" cellspacing="0" class="main_tdbg">
<tr>
<td align="center">
<%
dim username
username=hx.checkstr(session("username"),12)
if username="" then
username="你注册时的用户名"
end if%>
<table width="98%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30">点击越多，排名越前，前<%=LineLogo*LineNum%>名可以显示图标，其它则显示文字。</td>
</tr>
</table>
<table width="98%" border="0" align="center" cellpadding="3" cellspacing="0">
<tr>
<td width="49%" class="main_title2"><font color="#0000FF">QQ空间文字代码：</font><a href="http://<%=hx.BaseUrl%>in.asp?id=<%=username%>" target="_blank" title="<%=WebAlt%>"><%=WebName%></a></td>
<td align="center" class="main_title1"><strong>QQ互踩帮助文件</strong>：如何把这些代码加入到我的QQ空间里？</td>
</tr>
<tr>
<td class="main_title1"><font color="#0000FF">代码：
<textarea name="textarea" cols="38" rows="5">[em]e46[/em][url=http://<%=hx.BaseUrl%>in.asp?id=<%=username%>]<%=WebName%>，点击这里获得互踩机会！[/url][em]e46[/em]
</textarea>
</font>
<br>
把以上代码拷贝到QQ空间留言版里，别人点击这个链接，将为你<br>
加分哦！分越高在我们网站排名越靠前，被踩的几率就更大哦。</td>
<td valign="top" class="main_title2">1.可以直接拷贝左边的代码，到自己的或者别人的QQ空间的留言板中粘贴，当别人通过这个链接进入到我们网站，就为你加上了一分哦！<br>
2.在自己的QQ空间里，自定义->新建模块->添加一个“图文模块”。<br>
<strong>图片地址：</strong><font color="#FFFFFF">http://www.javy.com.cn/qq/images/logo.gif</font><br>
<strong>标题链接：</strong><font color="#FFFFFF">http://<%=hx.BaseUrl%>in.asp?id=<%=username%></font><br>
<strong>标 题：</strong><font color="#FFFFFF">QQ互踩联盟，加入马上获得更多的朋友来访！点击加分！</font></td>
</tr>
</table>
<br></td>
</tr>
</table>
<table width=760 border=0 align="center" cellpadding=0 cellspacing=0>
<tr>
<td class="main_tdbg"><p>以下所列的空间已在“<%=WebName%>”申请了互踩，但没有点击量,可能的原因有：</p>
<ol>
<li>贵站没有做好我站的链接或代码有错。</li>
<li>初始化后贵站还没有给我站带来点击数。</li>
<li>如果您不会在空间中加入代码，<a href="#">请查看帮助！</a></li>
</ol>
<p>请空间主人点击重新获取我站的链接代码，拷贝到空间的主页中，点击一次进入我站即可，否则我站可能会删除您的空间的链接哦！</p></td>
</tr>
</table>
<%
dim rs
dim i
set rs=hx.execute("select username,sitename from CL_Link where inp=0 order by inp desc")
i=0
%>
<table width=760 border=0 align="center" cellpadding=3 cellspacing=0 class="main_tdbg">
<%
if rs.eof then
response.write "<tr><td><li>暂时还没有符合此条件的空间哦！</td></tr>"
else
Do While Not rs.eof
if i mod LineNum = 0 then
response.write "<tr>"
end if
%>
<td align="center"><a href="?username=<%=rs("username")%>" title="请《<%=rs("sitename")%>》的主人点击获取我站链接代码！"><%=rs("sitename")%></a></td>
<%
if (i+1) mod LineNum = 0 then
response.write "</tr>"
end if
i=i+1
rs.movenext
loop
end if
set rs=nothing
CloseDatabase
%>
</table>
<!--#include file="under.asp"-->
</body>
</html>