51啦的统计代码放在哪啊foot.asp 20
foot.asp<tablewidth="1000"border="0"align="center"cellpadding="0"cellspacing="0"><tr>...
foot.asp
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td background="images/body/footbg1.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" colspan="3"> <font color=EAE9E9>友情链接:</font>
<%set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from links order by linkidorder",conn,1,1
do while not rs.EOF
response.Write " <a href="&trim(rs("linkurl"))&" target=_blank ><font color=EAE9E9>"&trim(rs("linkname"))&"|</font></a>"
rs.MoveNext
loop
rs.Close
set rs=nothing
%></td>
</tr>
<tr bordercolor="#CCCCCC">
<td width="23%" rowspan="2" align="center"><a href="http://<%=weburl%>"><img src="<%=weblogo%>" width=187 height=75 border="0"></a></td>
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select gongzuoshijian from webinfo",conn,1,1
%>
<%
function todays()
dim tmprs
tmprs=conn.execute("Select Count(bookID) from products Where year(adddate)=year(date()) and month(adddate)=month(date()) and day(adddate)=day(date())")
todays=tmprs(0)
set tmprs=nothing
if isnull(todays) then todays=0
end function
%>
<td width="53%"> </td>
<td width="24%" rowspan="2"><table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<form name="youjian" method="post" action="dysend.asp">
<td width="205" style='padding-left:1px'><div align="center">
<input name="useremail" type="text" id="useremail" style="ime-mode:disabled"onfocus="this.value=''" value="填写email订阅本站会刊" size="20">
<input type="submit" name="Submit3" value="订阅" onClick="return checkmail();">
</div></td>
</form>
</tr>
<tr>
<td colspan="3" >  网站备案:<a href="http://www.miibeian.gov.cn" target="_blank"><%=icp%></a></td>
</tr>
</table></td>
</tr>
<tr bordercolor="#CCCCCC">
<td valign="top"> 客服邮箱:<a href="mailto:<%=webemail%>"><%=webemail%></a> 客服电话:<%=dianhua%> 邮政编码:<%=youbian%><br />
公司地址:<%=dizhi%> <br>
 魔法贴magicsticker是北京高瑞思特科技有限公司持有的商标</td>
</table></td>
</tr>
</table>
<% if qq=1 then%>
<!--#include file="QQservices.asp"-->
<%else
end if %> 展开
<table width="1000" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td background="images/body/footbg1.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="30" colspan="3"> <font color=EAE9E9>友情链接:</font>
<%set rs=server.CreateObject("adodb.recordset")
rs.Open "select * from links order by linkidorder",conn,1,1
do while not rs.EOF
response.Write " <a href="&trim(rs("linkurl"))&" target=_blank ><font color=EAE9E9>"&trim(rs("linkname"))&"|</font></a>"
rs.MoveNext
loop
rs.Close
set rs=nothing
%></td>
</tr>
<tr bordercolor="#CCCCCC">
<td width="23%" rowspan="2" align="center"><a href="http://<%=weburl%>"><img src="<%=weblogo%>" width=187 height=75 border="0"></a></td>
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select gongzuoshijian from webinfo",conn,1,1
%>
<%
function todays()
dim tmprs
tmprs=conn.execute("Select Count(bookID) from products Where year(adddate)=year(date()) and month(adddate)=month(date()) and day(adddate)=day(date())")
todays=tmprs(0)
set tmprs=nothing
if isnull(todays) then todays=0
end function
%>
<td width="53%"> </td>
<td width="24%" rowspan="2"><table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
<tr>
<form name="youjian" method="post" action="dysend.asp">
<td width="205" style='padding-left:1px'><div align="center">
<input name="useremail" type="text" id="useremail" style="ime-mode:disabled"onfocus="this.value=''" value="填写email订阅本站会刊" size="20">
<input type="submit" name="Submit3" value="订阅" onClick="return checkmail();">
</div></td>
</form>
</tr>
<tr>
<td colspan="3" >  网站备案:<a href="http://www.miibeian.gov.cn" target="_blank"><%=icp%></a></td>
</tr>
</table></td>
</tr>
<tr bordercolor="#CCCCCC">
<td valign="top"> 客服邮箱:<a href="mailto:<%=webemail%>"><%=webemail%></a> 客服电话:<%=dianhua%> 邮政编码:<%=youbian%><br />
公司地址:<%=dizhi%> <br>
 魔法贴magicsticker是北京高瑞思特科技有限公司持有的商标</td>
</table></td>
</tr>
</table>
<% if qq=1 then%>
<!--#include file="QQservices.asp"-->
<%else
end if %> 展开
2个回答
展开全部
公司地址:<%=dizhi%> <br>
魔法贴magicsticker是北京高瑞思特科技有限公司持有的商标
“插入51.la代码”</td>
</table></td>
</tr>
</table>
<% if qq=1 then%>
<!--#include file="QQservices.asp"-->
<%else
end if %>
魔法贴magicsticker是北京高瑞思特科技有限公司持有的商标
“插入51.la代码”</td>
</table></td>
</tr>
</table>
<% if qq=1 then%>
<!--#include file="QQservices.asp"-->
<%else
end if %>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
AiPPT
2024-09-19 广告
2024-09-19 广告
作为北京饼干科技有限公司的工作人员,关于AIPPT免费生成PPT的功能,我可以简要介绍如下:AIPPT是一款基于人工智能技术的PPT制作工具,它为用户提供了免费生成PPT的便捷服务。用户只需简单输入PPT的主题或内容大纲,AIPPT便能智能...
点击进入详情页
本回答由AiPPT提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询