📄 diaocha1.asp
字号:
<%@ LANGUAGE="VBSCRIPT"%>
<!-- #include file="../ADOVBS.INc" -->
<%
set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString")
set rs=server.createobject("adodb.recordset")
sqlstr="select top 10 * from diaoc1 where id<>1 order by tm desc "
rs.open sqlstr,conn,1,1
num=rs.recordCount
%>
<HTML>
<HEAD>
<TITLE>Zhao1Zhao网上调查</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<link rel="stylesheet" href="../html/3508.css">
<style type="text/css">
<!--
.botton { font-size: 12px; line-height: 14px; color: #000000; background-color: #FFFFF0}
-->
</style>
</HEAD>
<BODY bgColor=#ffffff>
<table width="740" border="0" cellspacing="0" cellpadding="0" align="center" height="40">
<tr>
<td width="192" height="39" align="center" valign="bottom"><img src="../images/newzhao1zhao.gif" width="140" height="50"></td>
<td colspan="2" align="right" height="39" valign="bottom">
<table width="480" border="1" bordercolordark="#FFFFFF" bordercolorlight="#FFFFFF" bgcolor="#CCCCFF" cellpadding="0" cellspacing="0" height="22">
<tr align="center">
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../html/navigator.asp" class="black">本站导航</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18">
<a href="../sh/search.asp" class="black">二手市场</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../chat/default.asp" class="black">供求信息</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../news/index.asp" class="black">精品生活</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18">
<a href="../lovelife/default.asp" class="black">我爱生活</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../xhtj/index.asp" class="black">笑话天地</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="diaocha1.asp" class="black">调查生活</a></td>
<td width="75" bordercolorlight="#FFFFFF" bordercolordark="#000000" align="center" height="18"><a href="../club/Default.asp" class="black">生活社区</a></td>
</tr>
</table>
</td>
</tr>
<tr>
<td colspan="3" height="1" bgcolor="006600"></td>
</tr>
</table>
<table align=center border=0 cellpadding=0
cellspacing=0 width=740 bgcolor="#FFFFCC">
<tbody>
<tr>
<td colspan="2" height="18"> 【本站导航】<a href="../default.asp">首页</a> >>
调查生活</td>
</tr>
</tbody>
</table>
<br>
<table border=0 cellpadding=0 cellspacing=0 class=normal width="600" align="center">
<tr>
<td height="27"> </td>
</tr>
<tr>
<td><%for i=1 to num %>
<form action="diaocha2.asp" method=post target=_blank >
<table border="0" cellpadding="0" cellspacing="0" align="center" width="560">
<tr>
<td colspan="2"> <%=i%>.<%=rs("sb")%>? </td>
</tr>
<tr>
<td colspan="2">
<table width="80%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td>
<input CHECKED name=slt type=radio value=db1>
<%=rs("db1")%></td>
<td>
<input name=slt type=radio value=db2>
<%=rs("db2")%></td>
</tr>
<tr>
<td>
<input name=slt type=radio value=db3>
<%=rs("db3")%></td>
<td>
<input name=slt type=radio value=db4>
<%=rs("db4")%></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="50%" colspan="2"> 您的意见:</td>
</tr>
<tr>
<td colspan="2">
<textarea name=yj rows="5" cols="80" class="botton"></textarea>
</td>
</tr>
<tr valign="bottom">
<td align="center" colspan="2" height="60">
<input class=botton name=Submit type=submit value=提交 >
<input class=botton name=view type=submit value=查看>
</td>
</tr>
<tr>
<td colspan="2">
<input type=hidden name=id value=<%=rs("id")%>>
</td>
</tr>
</table>
</form>
<%
rs.movenext
if rs.eof then exit for
next
%> </td>
</tr>
</table>
<!-- #include file="../include/end.htm" -->
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -