📄 bjxfoot.asp
字号:
<br>
<TABLE cellSpacing=0 cellPadding=0 width=970 align=center border=0>
<TBODY>
<TR>
<TD align=left vAlign=top class=b><table width="100%" align="center" border="0" cellspacing="0" cellpadding="0" bordercolor="#CCCCCC">
<td width="250" rowspan="2" align="center"><img src="images/top/logo.gif"> </td>
<%set rs=server.CreateObject("adodb.recordset")
rs.open "select gongzuoshijian from BJX_config",conn,1,1
%>
<%
function todays()
dim tmprs
tmprs=conn.execute("Select Count(bookID) from BJX_goods 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
%>
<%
if session("over")="" then
jsqtoday=1
if application("dntime")<=cint(hour(time())) then
conn.execute("update BJX_Dept set jsqtoday=jsqtoday+1")
tmprs=conn.execute("Select jsqtoday from BJX_Dept")
jsqtoday=tmprs(0)
else
conn.execute("update BJX_Dept set jsqtoday=1")
tmprs=conn.execute("Select jsqtoday from BJX_Dept")
jsqtoday=tmprs(0)
end if
application("dntime")=cint(hour(time()))
set tmprs=nothing
conn.execute("update BJX_Dept set jsq=jsq+1")
tmprs=conn.execute("Select jsq from BJX_Dept")
jsq=tmprs(0)
set tmprs=nothing
session("over")=true
else
jsqtoday=1
tmprs=conn.execute("Select jsqtoday from BJX_Dept")
jsqtoday=tmprs(0)
tmprs=conn.execute("Select jsq from BJX_Dept")
jsq=tmprs(0)
set tmprs=nothing
end if
%>
<td><%dim endtime
endtime=timer()
response.Write " <a href=index.asp>购物首页</a> | <a href=about.asp?action=about >关于我们</a> | <a href=http://www.gzshopping.com >bjxshop</a> | <a href=about.asp?action=lxwm >业务联系</a> | <a href=help.asp?action=shiyongfalv >版权声明</a> | <a href=help.asp?action=fukuan >付款方式</a> | <a href=BJXbook.asp >留言/建议/投诉</a>"
%>
</td>
</tr><tr>
<td valign="top">
<%=bjxcopyright%></td>
</tr>
</table></TD>
</TR>
</TBODY>
</TABLE>
<!--#include file="shopkefu.asp"-->
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -