📄 left.asp
字号:
<!--#include file="Inc/ShopSelect.asp"-->
<!--#include file="load.asp"-->
<TABLE cellSpacing=0 cellPadding=0 width="173" border=0>
<TBODY>
<TR>
<TD>
<img border="0" src="images/menu1.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD >
<%
if session("user_id")<>empty then
call load2()
else
call load1()
end if
%>
</TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
<TR>
<TD>
<img border="0" src="images/menu2.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD height="53">
<div align="center">
<%set rs3=server.createobject("adodb.recordset")
sql3="select * from typ order by taxis"
rs3.open sql3,conn,1,1
rs3.movefirst
%>
<TABLE width="100%" border=0 height="23">
<TBODY><% do while not rs3.eof
i=i+1
%>
<TR>
<TD height="19" align=center><a href="ShopList.asp?zu=<%=rs3("id")%>"><%=rs3("name")%></a></TD><%
rs3.movenext%>
<TD align=center><a href="ShopList.asp?zu=<%=rs3("id")%>"><%=rs3("name")%></a></TD>
</TR>
<%
rs3.movenext
if i>=4 then exit do
loop%>
</TBODY>
</TABLE></div>
<div align="right"><a href="shopzu_list.asp"><img src="images/more.gif" width="31" height="11" border="0" /></a></div></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD>
<img border="0" src="images/menu3.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD>
<div align="center">
<TABLE width="100%" border=0 height="100" id="table1">
<TBODY>
<TR>
<TD align=center>
<a href=first1.asp>注册会员</a></TD>
<TD align=center>
<a href=first2.asp>申请开店</a></TD>
</TR>
<TR>
<TD align=center height="20">
<a href=first3.asp>通过审核</a></TD>
<TD align=center height="20">
<a href=first4.asp>免费认证</a></TD>
</TR>
<TR>
<TD align=center>
<a href=first5.asp>推荐店铺</a></TD>
<TD align=center>
<a href=first6.asp>评定星级</a></TD>
</TR>
<TR>
<TD align=center><a href=first7.asp>如何交易</a></TD>
<TD align=center><a href=first8.asp>联系留言</a></TD>
</TR>
</TBODY>
</TABLE></div>
</TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD>
<img border="0" src="images/menu4.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD > <TABLE width="100%" align=center border=0>
<TBODY>
<TR>
<TD> <form action="search.asp" method="post" name="form" id="form">
<table width="100%" border="0" cellpadding="2">
<tr>
<td>
商品名称:<INPUT size=15 name=keyword></td>
</tr>
<tr>
<td align="center">
<input type="submit" name="Submit" value="搜索看看" class=input3></td>
</tr>
</table>
</form>
</TD>
</TR>
</TABLE><TABLE width="100%" align=center border=0>
<TBODY>
<TR>
<TD> <form action="shopsearch.asp" method="post" name="form1" id="form1">
<table width="100%" border="0" cellpadding="2">
<tr>
<td>
店铺名称:<INPUT size=15 name=keyword></td>
</tr>
<tr>
<td align="center">
<input type="submit" name="Submit" value="多多找找" class=input3></td>
</tr>
</table>
</form>
</TD>
</TR>
</TABLE></TD>
</TR>
</TABLE></TD>
</TR>
<TR>
<TD>
<img border="0" src="images/menu6.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD> <TABLE width="100%" align=center border=0>
<TBODY>
<TR>
<TD>
<table border="0" align="center" cellpadding="5" cellspacing="0">
<tr>
<td>
<%set rs11=server.createobject("adodb.recordset")
sql11="select top 16 * from school order by id desc"
rs11.open sql11,conn,1,1
if rs11.eof then
response.write"暂时没有学校"
else
i=0
do while not rs11.eof
%>
<a href="shopschool.asp?school=<%=rs11("id")%>" target="_blank"><%=rs11("name")%></a>
<%
i=i+1
if i mod 2=0 then
%><br><%end if
rs11.movenext
loop
end if
rs11.close
set rs11=nothing%>
</td>
</tr>
</table>
</TD>
</TR>
<tr>
<td align=right><a href="school.asp"><img src=images/more.gif width=31 height=11 border=0></a></td>
</tr>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD>
<img border="0" src="images/menu5.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD> <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
<TBODY>
<TR>
<TD> <TABLE width="100%" align=center border=0>
<TBODY>
<TR>
<TD>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" >
<%
Set rs= conn.execute("select * from user_info order by user_id desc" )
do while not rs.eof
%>
<tr>
<td height=18 >·<a href=userinfo.asp?user_id=<%=rs("user_id")%>><%=rs("user_name")%></a> [<%=FormatDateTime(rs("user_Date"),vbshortdate)%>]</td>
<% b=b+1
if b>=8 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr>
<tr>
<td align=right><a href=user_list.asp><img src=images/more.gif width=31 height=11 border=0></a></td>
</tr>
</table></TD>
</TR>
</TBODY>
</TABLE></TD>
</TR>
</TBODY>
</TABLE>
</TD>
</TR>
<TR>
<TD>
<img border="0" src="images/menu7.gif" width="173" height="63"></TD>
</TR>
<TR>
<TD align="center"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" width="100%" >
<%
Set rs= conn.execute("select * from links order by id desc" )
do while not rs.eof
%>
<tr>
<td height=18 >·<a href=linkurl.asp?id=<%=rs("id")%> target=_blank><%=rs("title")%></a></td>
<% c=c+1
if c>=8 then exit do
rs.movenext
loop
rs.close
set rs=nothing
%>
</tr> <tr>
<td align=right><a href=link_list.asp><img src=images/more.gif width=31 height=11 border=0></a></td>
</tr>
</table></TD>
</TR>
</TABLE>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -