📄 index.asp
字号:
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%set rss=server.createobject("adodb.recordset")
rss.open "select * from shop_his where username='"&nosql(session("username"))&"' and lx=2 order by ltime desc",conn,1,1
while not rss.eof%>
<tr>
<td height="22"> <img src="img/image002.gif" width="15" height="15">
<%if len(trim(rss("shopname")))>21 then
response.write left(trim(rss("shopname")),21)&".."
else
response.write trim(rss("shopname"))
end if%>
</td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%rss.movenext
wend
rss.close
set rss=nothing%>
</table></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table><%end if%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="/img/lf_tl_best10.gif" width="180" height="40" border="0" usemap="#Map3"></td>
</tr>
<tr>
<td>
</td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><%if session("username")="" then
set rsg=server.createobject("adodb.recordset")
rsg.open "select top 12 * from shop_usergg where lx=0 order by id desc",conn,1,1
else
set rsg=server.createobject("adodb.recordset")
rsg.open "select top 10 * from shop_usergg where lx="&nosql(session("reglx"))&" or lx=0 order by id desc",conn,1,1
end if
if rsg.recordcount=0 then
%>
<table width="160" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height="26" align=center>暂无会员公告</td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
</table>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%
while not rsg.eof
%>
<tr>
<td height="22"><a href="gg_list.asp?id=<%=rsg("id")%>" title=<%=year(rsg("adddate"))%>年<%=month(rsg("adddate"))%>月<%=day(rsg("adddate"))%>日发布><img src="/img/left_7.gif" width="11" height="11" border="0">
<%if len(trim(rsg("zt")))>12 then
response.write left(trim(rsg("zt")),12)&""
else
response.write trim(rsg("zt"))
end if%>
</a></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%
rsg.movenext
wend
%>
</table>
<%
end if
rsg.close
set rsg=nothing
%></td>
</tr>
</table>
<%if xw=1 and xw1=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_news_z.gif" width="180" height="40" border="0" usemap="#Map11"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
set rs=server.createobject("adodb.recordset")
rs.open "select top 8 newsname,adddate,newsid from shop_news order by adddate desc",conn,1,1
if rs.recordcount=0 then
%>
<table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height="26" align=center>暂无新闻</td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
</table>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%
while not rs.eof
%>
<tr>
<td height="22"><img src="/img/go.gif" width="15" height="15"><a href="news/news.asp?id=<%=rs("newsid")%>" title=<%=year(rs("adddate"))%>年<%=month(rs("adddate"))%>月<%=day(rs("adddate"))%>日发布>
<%if len(trim(rs("newsname")))>11 then
response.write left(trim(rs("newsname")),11)&""
else
response.write trim(rs("newsname"))
end if%>
</a></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
end if
rs.close
set rs=nothing
%></td>
</tr>
</table></td>
</tr>
</table>
<%end if%>
<%if zt=1 and zt1=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_zt_z.gif" width="180" height="40" border="0" usemap="#Map4"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
set rs=server.createobject("adodb.recordset")
rs.open "select top 8 Title,UpdateTime,newsid from shop_zhuanti order by UpdateTime desc",conn,1,1
if rs.recordcount=0 then
%>
<table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height="26" align=center>暂无专题</td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
</table>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%
while not rs.eof
%>
<tr>
<td height="22"><img src="/img/go.gif" width="15" height="15"><a href="info/listzt.asp?id=<%=rs("newsid")%>" title=<%=year(rs("UpdateTime"))%>年<%=month(rs("UpdateTime"))%>月<%=day(rs("UpdateTime"))%>日发布>
<%if len(trim(rs("Title")))>11 then
response.write left(trim(rs("Title")),11)&""
else
response.write trim(rs("Title"))
end if%>
</a></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
end if
rs.close
set rs=nothing
%></td>
</tr>
</table></td>
</tr>
</table>
<%end if%>
<%if gq=1 and gq1=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_info_z.gif" width="180" height="40" border="0" usemap="#Map7"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
set rs=server.createobject("adodb.recordset")
rs.open "select top 6 id,tit,lls from shop_infomsg order by id desc",conn,1,1
if rs.recordcount=0 then
%>
<table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height="26" align=center>暂无信息</td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
</table>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%
while not rs.eof
%>
<tr>
<td height="22"><img src="/img/go.gif" width="15" height="15"><a href=Supply/show.asp?n=<%=rs("id")%> title=此信息已被浏览<%=rs("lls")%>次>
<%if len(trim(rs("tit")))>11 then
response.write left(trim(rs("tit")),11)&""
else
response.write trim(rs("tit"))
end if%>
</a></td>
</tr>
<tr>
<td height="1" colspan="2" class="td_margin1"><img src="/img/skin<%=cssid%>/x.gif" width="149" height="1"></td>
</tr>
<%
rs.movenext
wend
%>
</table>
<%
end if
rs.close
set rs=nothing
%></td>
</tr>
</table></td>
</tr>
</table>
<%end if%>
<%if rj=1 and rj1=1 then%>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif" class="sm_gray">
<tr>
<td height="12"></td>
</tr>
<tr>
<td><img src="img/lf_Diary_z.gif" width="180" height="40" border="0" usemap="#Map8"></td>
</tr>
<tr>
<td> </td>
</tr>
</table>
<table width="180" border="0" align="center" cellpadding="0" cellspacing="0" background="img/lf_bg.gif">
<tr>
<td><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td><%
set rs=server.createobject("adodb.recordset")
rs.open "select top 8 * from shop_rj where shh=1 order by id desc",conn,1,1
if rs.recordcount=0 then
%>
<table width="80%" border="0" cellspacing="0" cellpadding="5" align="center">
<tr>
<td height="26" align=center>暂无<span class="b14">日记</span></td>
</tr>
</table>
<%else%>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
</table>
<table width="160" border="0" align="center" cellpadding="0" cellspacing="0">
<%
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -