开通博客赚积分
发布资源赚积分
分类

源码开发语言/平台
当前位置：首页 > 源码/资料 > Internet/网络编程 > WEB源码(ASP,PHP,...) > 查看源码
foot.asp
资源名称：shop2.rar　[点击查看]
上传用户：btntkt
上传日期：2021-04-16
资源大小：5296k
文件大小：13k
源码类别：

WEB源码(ASP,PHP,...)

开发平台：

DOS

foot.asp：源码内容
  1. <table width="1000" border="0" align="center" cellpadding="0" cellspacing="0">
  2.   <tr>
  3.     <td background="skin/skin<%=skinid%>/footbg1.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
  4.       <tr>
  5.         <td height="30" colspan="3">&nbsp;&nbsp;&nbsp;&nbsp;<font color=EAE9E9>友情链接:</font>
  6.           <%set rs=server.CreateObject("adodb.recordset")
  7. rs.Open "select * from links order by linkidorder",conn,1,1
  8. do while not rs.EOF
  9. response.Write "  <a href="&trim(rs("linkurl"))&"  target=_blank ><font color=EAE9E9>"&trim(rs("linkname"))&"|</font></a>"
  10. rs.MoveNext
  11. loop
  12. rs.Close
  13. set rs=nothing
  14. %></td>
  15.       </tr>
  16.       <tr bordercolor="#CCCCCC">
  17.           <td width="23%"  rowspan="2"  align="center"><a href="http://<%=weburl%>"><img src="<%=weblogo%>"  border="0"></a></td>
  18.         <%set rs=server.CreateObject("adodb.recordset")
  19. rs.open "select gongzuoshijian from webinfo",conn,1,1
  20. %>
  21.         <%
  22. function todays()
  23. dim tmprs
  24. tmprs=conn.execute("Select Count(bookID) from products Where year(adddate)=year(date()) and month(adddate)=month(date()) and day(adddate)=day(date())")
  25. todays=tmprs(0)
  26. set tmprs=nothing
  27. if isnull(todays) then todays=0
  28. end function
  29. %>
  30.         <%
  31. if session("over")="" then
  32.     jsqtoday=1
  33.     if application("dntime")<=cint(hour(time())) then
  34. conn.execute("update dept set jsqtoday=jsqtoday+1")
  35. tmprs=conn.execute("Select jsqtoday from dept")
  36. jsqtoday=tmprs(0)
  37.     else
  38. conn.execute("update dept set jsqtoday=1")
  39. tmprs=conn.execute("Select jsqtoday from dept")
  40. jsqtoday=tmprs(0)
  41.     end if
  42.     application("dntime")=cint(hour(time()))
  43.     set tmprs=nothing
  44.     
  45. conn.execute("update dept set jsq=jsq+1")
  46. tmprs=conn.execute("Select jsq from dept")
  47. jsq=tmprs(0)
  48.     set tmprs=nothing
  49.     
  50.     session("over")=true
  51. else
  52.     jsqtoday=1
  53. tmprs=conn.execute("Select jsqtoday from dept")
  54. jsqtoday=tmprs(0)
  56. tmprs=conn.execute("Select jsq from dept")
  57. jsq=tmprs(0)
  58.     set tmprs=nothing
  59. end if
  60. %>
  61.           <td width="51%">　<a href=index.asp>购物首页</a>| <a href=help.asp?action=联系我们 >联系我们</a> | <a href=dingdan.asp >订单查询</a> 
  62.             | <a href=help.asp?action=付款方式 >付款方式</a>
  63.   <%
  64. exec="select * from webinfo"
  65.       set rs=server.createobject("adodb.recordset")
  66.       rs.open exec,conn,1,3
  67.       checkid=rs("paytype")
  68.  if checkid="5" then
  69.  
  70.  %>
  71.  | <a href=pay.asp >在线支付</a> 
  72.  <%end if %>
  73.             | <a href=viewreturn.asp >留言或建议</a><% if wangwang<>"" then %>| <a target="_blank" href="http://amos1.taobao.com/msg.ww?v=2&uid=<%=wangwang%>&s=1" ><img border="0" src="http://amos1.taobao.com/online.ww?v=2&uid=<%=wangwang%>&s=1" alt="点击这里给我发消息" /></a><%else%><a href=help.asp?action=关于我们 > | 关于我们</a><%end if %></td>
  74.         <td width="26%" rowspan="2"><table width="100%" border="0" align="right" cellpadding="0" cellspacing="0">
  75.               <tr>
  76.   <% if dymail=0 then %>
  77.          <form name="youjian" method="post" action="dysend.asp">
  78.                                       
  79.                   <td width=""100%  style='padding-left:1px'> 
  80.                     &nbsp<input name="useremail" type="text" id=ymail   onfocus="this.value=''" value="填写Email订阅本站会刊" size="21">
  81.                     <INPUT class=go-wenbenkuang name=Submit2 onclick="DoMail('1',this.form.ymail.value);" type=button value=订阅>
  82.                     <INPUT class=go-wenbenkuang name=Submit4 onclick="DoMail('0',this.form.ymail.value);" type=button value=退定> 
  83.                   </td> <SCRIPT>
  84. function checkEmail(str)
  85. {
  86.     //如果为空，则通过校验
  87.     if(str == "")
  88.         return false;
  89.     if (str.charAt(0) == "." || str.charAt(0) == "@" || str.indexOf('@', 0) == -1
  90.         || str.indexOf('.', 0) == -1 || str.lastIndexOf("@") == str.length-1 || str.lastIndexOf(".") == str.length-1)
  91.         return false;
  92.     else
  93.         return true;
  94. }//~~~
  97. function DoMail(ntype,mail)
  98. {
  99. //检查mail
  100.    if(!checkEmail(mail))
  101.    {
  102.      alert("请检查Email是否正确");
  103.  return;
  104.    }
  105.     window.open("GetMailok.asp?Do="+ntype+"&mail="+mail,"","width=200px,height=100");
  106. }
  107. </SCRIPT>
  108.     </form><%end if %>
  109.           </tr>
  110.           <tr>
  111.                 <td colspan="3"  > &nbsp网站备案:<a href="http://www.miibeian.gov.cn" target="_blank"><%=icp%></a></td>
  112.           </tr>
  113.         </table></td>
  114.       </tr>
  115.       <tr bordercolor="#CCCCCC">
  116.         <td valign="top">　客服邮箱：<a href="mailto:<%=webemail%>"><%=webemail%></a>　客服电话：<%=dianhua%> 邮政编码：<%=youbian%><br />
  117.           　公司地址：<%=dizhi%>　<br>
  118.             　Copyright &copy; 2030 <%=copyright%> All Rights Reserved.</td>
  119.         </tr>
  120.       
  121.     </table></td>
  122.   </tr>
  123. </table><table cellspacing="0" cellpadding="0" width="1000" align="center" border="0">
  124.   <tbody>
  125.     
  126.     <tr>
  127.       <td   bgColor="#ffffff"><table cellspacing="0" cellpadding="0" width="100%" align="center" border="0">
  128.         <tbody>
  129.           <tr>
  130.             <td align="middle" height="22" ><font color="#a5846c">总部地址:<span class="css2">广州市天河区软件产业基地8栋</span>&nbsp;&nbsp;&nbsp;联系电话：<span class="css2">020-34506590 34700400 34709708 13719472523 13527894748</span> </font></td>
  131.           </tr>
  132.   <tr>
  133.             <td align="middle" height="22"><font color="#a5846c"><span class="css2">客服QQ:290116505</span><a target="blank" href="tencent://message/?uin=290116505&amp;Site=网软天下客服为你服务&amp;Menu=yes"><img border="0" src="/qqonline.gif" alt="网软天下客服为你服务" /></a><span class="css2">38306293<a target=blank href=tencent://message/?uin=38306293&Site=网软天下客服为你服务&Menu=yes><img border="0" src=/qqonline.gif alt="网软天下客服为你服务"></a>417586492</span><FONT face=Verdana><a target=blank href=tencent://message/?uin=417586492&Site=网软天下客服为你服务&Menu=yes><img border="0" src=/qqonline.gif alt="网软天下客服为你服务"></a></FONT><span class="css2">657248708</span><font face="Verdana"><a target="blank" href="tencent://message/?uin=657248708&amp;Site=网软天下客服为你服务&amp;Menu=yes"><img border="0" src="/qqonline.gif" alt="网软天下客服为你服务" /></a></font><br><span class="css2">客服QQ:454882888</span><font face="Verdana"><a target="blank" href="tencent://message/?uin=454882888&amp;Site=网软天下客服为你服务&amp;Menu=yes"><img border="0" src="/qqonline.gif" alt="网软天下客服为你服务" /></a></font><span class="css2">394223545</span><font face="Verdana"><a target="blank" href="tencent://message/?uin=394223545&amp;Site=网软天下客服为你服务&amp;Menu=yes"><img border="0" src="/qqonline.gif" alt="网软天下客服为你服务" /></a></font><span class="css2">469648611</span><font face="Verdana"><a target="blank" href="tencent://message/?uin=469648611&amp;Site=网软天下客服为你服务&amp;Menu=yes"><img border="0" src="/qqonline.gif" alt="网软天下客服为你服务" /></a></font><span class="css2">314730679</span><font face="Verdana"><a target="blank" href="tencent://message/?uin=314730679&amp;Site=网软天下客服为你服务&amp;Menu=yes"><img border="0" src="/qqonline.gif" alt="网软天下客服为你服务" /></a><BR>
  134.             E-mail:webmaster@wrtx.cn MSN:wrtxcn@hotmail.com</font></font></td>
  135.           </tr>
  136.           <tr>
  137.             <td align="middle" height="22"><font 
  138.             color="#7f5246">Copyright(c) 
  139.               2000-2020 www.wrtx.cn <span class="css2">广州网软天下</span> 版权所有<a 
  140.         href="admin/" target="_blank" 
  141.             class="topmenu">后台管理登录入口</a></font></td>
  142.           </tr>
  143.         </tbody>
  144.       </table></td>
  145.     </tr>
  146.   </tbody>
  147. </table>
  148. <style type="text/css">
  150. <!--
  152. .STYLE3 {font-size: 12px; font-family: "宋体"; }
  154. body {
  156. margin-top: 0px;
  158. }
  160. .STYLE4 {font-size: 12px}
  162. .STYLE5 {font-size: 13px}
  164. -->
  166. </style>
  168. <TABLE height="30" cellSpacing="0" cellPadding="0" width="1000" align="center" bgColor="#ff6600" border="0">
  170.                           <TBODY>
  172.                             <TR>
  174.                               <TD width="98%"><DIV align="center" class="STYLE5">网软天下更多更好的网站系统等你来用
  178. </DIV></TD>
  180.                             </TR>
  182.                           </TBODY>
  184.                         </TABLE>      <TABLE cellSpacing="1" cellPadding="1" width="1000" 
  186. align="center" bgColor="#ff6600" border="0">
  187.                           <TBODY>
  188.                             <TR>
  189.                               <TD bgColor="#ffffff"><TABLE cellSpacing="3" cellPadding="3" width="100%" border="0">
  190.                                   <TBODY>
  191.                                     <TR>
  192.                                       <TD><p align="left"><span class="css2"><A href="http://www.wygk.cn" target="_blank">
  194. 包含“漂亮的购物网站模板免费下载,商城购物网站管理系统正式版时尚版,通用购物网站系统网站模板下载 ,网上商店网站正式版源码,在线购物网站程序超强版,网店网站系统,漂亮的网络购物网站系统完全功能版下载,asp,php生成html多风格的在线购物网站系统,网店网页模版,专业的网站系统开发公司提供的综合网店网站网页模板,utf-8编码,全球通用的建立网上销售门户网站的建站系统,免费提供网站模板,企业网站管理系统正式版,企业网站系统源代码,公司网站源程序,政府网站模板下载,学校网站模板免费下载,购物系统正式版,行业商务门户网站源码下载,多用户商城购物,淘宝多用户开店网站系统,,服装公司网站模板免费下载，服装厂网站模板，幼儿园网站模板免费下载,托儿所网站模板,网络公司网站源码下载,网络公司网站模板下载,地板公司网站模板免费下载,家具家私公司网站模板免费下载，装饰网站模板免费版下载,装饰设计公司网站模板下载,网址导航网站源码下载,常用网址导航站模板,企业网站管理系统源码,公司网站模板,中英繁公司企业网站模板,企业网站自助建站系统,ASP企业网站模板公司网站源码中英繁漂亮免费版,SQL可生成HTML的综合版网上商店系统，HTML网上商店系统，HTML网络花店系统，asp摄像网站源代码下载,摄影店,照相店网站模板下载,婚纱摄影店,婚纱馆,摄影公司网站系统破解版,网站程序源码,网络购物网站系统英文版网上开店网站系统源码购物网站模板,HTML手机网上商店系统，网上商城购物网站系统源码网站模板最强多风格正式版下载,成人用品网站管理系统成人用品模板正式版源码下载,网上购物系统网店模板化妆品时尚版免费下载,HTML服装网上商店系统，服装专卖店网上商店开店网站系统,仿淘宝多用户网站系统,SQL网上商城购物网站系统源代码,网上在线购物网站程序,购物网站模板,政府行政事业机关单位网站管理系统,免费政府网站系统网页模板,部队网站,军警交警刑警武警部队网站模板下载免费版,公安局交通局武警部队网站模板免费正式版,公安局网站模板,党委,人大,政协网站系统模板,林业局农业局国土局畜牧局网站全站源码林业局网站网页模板下载,HTML多用途文章发布系统，可生成HTML企业建站系统（中繁英），可生成HTML仿阿里巴巴商贸供求发布系统，HTML城市美食门户网站系统，HTML学校网站管理系统，大型学校网站源码学校网页模板正式版,多风格大型学校网站模板,学校网站asp源码,大中小学网站网页模板,学校网站后台免费程序,大型仿阿里巴巴,仿慧聪b2b行业门户网站管理系统源码,网上贸易商贸网站行业网站源码,HTML医院网站管理系统，医院科室诊所门诊部网站系统源码免费版医院网站模板下载,飞达科技网上求职招聘人才市场网站管理系统源码免费版,人大委员会网站政协网站模板市委市政府网站系统源码淡红色模板下载,市政府县政府区政府乡政府镇政府网站管理系统源代码网站模板下载,
  195. HTML律师网站系统，分类信息网站系统mssql源代码供求信息网站模板免费下载,HTML分类信息门户网站系统，网络办公OA管理系统,饭店,酒店,宾馆网站系统源码,网站模板免费正式版,多城市分类信息发布网站系统,供求信息发布网站系统源码,点卡销售,数字卡网站系统,征婚交友网站系统,交友网站下载版,更多建站系统即将推出。客户可以通过代理网站直接申请各种建站系统，独立管理客户，拥有完整的网站内容、产品、会员、订单、帐务管理系统，不仅可以用来销售我们的建站产品，也可以用来销售其他网络产品、内置域名查询和提交申请功能，内置多种在线支付接口，可任意设置会员类型，设置不同会员类型的价格级别、具有动态缓存、访问统计和多种形式的广告功能。可自定网站名称、自定报价，不会显示我们的资料，统一制定网站最低保护价，充分保障代理商的利益，目前正在火爆招商中！</A></span><BR>
  196.                                      </p></TD>
  197.                                     </TR>
  198.                                   </TBODY>
  199.                               </TABLE></TD>
  200.                             </TR>
  201.                           </TBODY>
  202.                         </TABLE><TABLE height="15" cellSpacing="0" cellPadding="0" width="1000" align="center"  border="0">
  203.                           <TBODY>
  204.                             <TR>
  205.                             <td bgcolor="#F8FFE8"><div align="left"><strong><font color="#0033ff"><a href="http://www.wygk.net" target="_blank" 
  207. class="STYLE4">特大优惠：加369元即送300M空间，顶级域名1个
  208.                               加569元即送500M空间，顶级域名1个</a><script language="javascript" type="text/javascript" src="http://js.users.51.la/1560198.js"></script>
  209. <noscript><a href="http://www.51.la/?1560198" target="_blank"><img alt="&#x6211;&#x8981;&#x5566;&#x514D;&#x8D39;&#x7EDF;&#x8BA1;" src="http://img.users.51.la/1560198.asp" style="border:none" /></a></noscript></font></strong></div></td>
  210.                             </TR>
  211.                           </TBODY>
  212.                         </TABLE> 
  213. <%  if qqzt=1 then%>
  214. <!--#include file="qqservices.asp"-->
  215.  <%else 
  216.  end if %>
  217.  <!--#include file="piaofuad.asp"-->