📄 dcrevise0.asp
字号:
<%@ LANGUAGE="VBSCRIPT"%>
<!-- #include file="../ADOVBS.INc" -->
<%
set conn=server.createobject("adodb.connection")
conn.open Application("DBCon_ConnectionString")
set rs=server.createobject("adodb.recordset")
rs.LockType=adLockOptimistic
tm= request("tm")
sql="select * from diaoc1 where sb='"& tm &"'"
response.write sql
'response.end
rs.open sql,conn
if rs.eof then
response.write "没有所查信息!"
response.end
else
%>
<html>
<head>
<title>管理</title>
</head>
<body bgcolor="#fffffa" text="#3333ff">
<table width="740" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td width="217" align="middle" valign="bottom" rowspan="2"><IMG height=25 src="file://///Jy2/d/Inetpub/wwwroot/zhao/images/smallmark.gif" width=120></td>
<td colspan="2" valign="bottom" height="30"> </td>
</tr>
<tr>
<td width="285" valign="bottom"><A href="file://///Jy2/d/Inetpub/wwwroot/zhao/default.asp">本站首页</a> >>生活调查</td>
<td width="238" valign="bottom" align="right"> </td>
</tr>
<tr>
<td colspan="3" bgcolor="#006600"></td>
</tr>
</table>
<h2 align=center ><font size="7" face="Times New Roman, Times, serif">修改调查信息</font></h2>
<form action="/images/zhao/revise/dcrevise1.asp" method=post>
<table align=center height="216" >
<tr>
<td width="68" nowrap><font size="5">题目:</font></td>
<td width="154"><font size="5">
<input name=tm maxLength=40 value=<%=rs("sb")%>>
</font></td>
</tr>
<tr align="left">
<td colspan="2" rowspan="2" nowrap><font size="5">选择:</font> </td>
<tr > </tr>
<tr >
<td width="68" align="middle"><font size="5">1</font></td>
<td width="154"><font size="5">
<input name=db1 maxlength=40 value=<%=rs("db1")%>>
</font></td>
</tr>
<tr>
<td width="68" align="middle"><font size="5">2</font></td>
<td width="154"><font size="5">
<input name=db2 maxLength=40 value=<%=rs("db2")%>>
</font></td>
</tr>
<tr>
<td width="68" align="middle"><font size="5">3</font></td>
<td width="154"><font size="5">
<input name=db3 maxLength=40 value=<%=rs("db3")%>>
</font></td>
</tr>
<tr>
<td width="68" align="middle"><font size="5">4</font></td>
<td width="154"><font size="5">
<input name=db4 maxLength=40 value=<%=rs("db4")%>>
</font></td>
</tr>
<div> </div>
<tr>
<td width="68" align="right"><font size="5"> </font></td>
<td width="154"><font size="5">
<input type=submit value="修 改" name="submit" style="BACKGROUND-COLOR: palegreen">
<input type=submit value="删 除" name="Submit2" style="BACKGROUND-COLOR: palegreen">
</font> </td>
</tr>
</table>
</form>
</body>
</html>
<%
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -