📄 left.asp
字号:
<table border="0" width="200" cellspacing="0" cellpadding="0">
<tr>
<td>
<table border="0" width="200" cellspacing="0" cellpadding="0">
<tr>
<td width="200" background="images/bg_2.gif" height="22">
<p align="center" class="14px">商 品 分 类</td>
</tr>
<tr>
<td colspan="2" bgcolor="#FEF7F1"><!--#include file="sort.asp" --></td>
</tr>
</table>
</td>
</tr>
<tr><td background="images/bg_2.gif" height="22">
<p align="center" class=14px>在 线 调 查</td></tr>
<form action=votes.asp?vflag=add method=post target="ssortwin" onSubmit="windowOpener()">
<tr>
<td>
</td>
</tr>
<%
sql="select vote from vote where flag=1"
set rs=conn.execute (sql)
votetitle=rs("vote")
rs.close
set rs=nothing
%>
<tr>
<td align=left class=smallfont><%=votetitle%></td>
</tr>
<%
sql="select id,vote from vote where flag=0"
set rs=conn.execute (sql)
if rs.eof then
response.write "<tr><td>暂时没有投票</td></tr>"
else
do while not rs.eof
%>
<tr>
<td align=left class=smallfont><input type="radio" value="<%=rs("id")%>" name="idnums"><%=rs("vote")%></td>
</tr>
<%
rs.movenext
loop
rs.close
set rs=nothing
end if%>
<tr>
<td align=center><input type="submit" value="投票及查看结果" name="B2" class="in3"></td>
</tr></form>
<tr><td background="images/bg_2.gif" height="22">
<p align="center" class="14px">合 作 伙 伴</td></tr>
<%
sql="select webname,imgpath,url from weblink where flag=1"
set rs=conn.execute (sql)
if rs.eof then
response.write "暂时没有连接"
else
kz=1
do while not rs.eof
response.write "<tr><td><a href="&rs(2)&" target=_blank><img border=0 src=upadpic/"&rs(1)&" title="&rs(0)&"></a></td></tr>"
rs.movenext
kz=kz+1
loop
rs.close
set rs=nothing
end if%>
</table>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -