📄 choosexm.asp
字号:
<!--#include file="../conn.asp"-->
<html>
<head>
<link rel="stylesheet" type="text/css" href="../style.css">
</head>
<body topmargin="0" leftmargin="0" bgcolor="#dddddd">
<br>
<br>
<br>
<br>
<%
dim bh
aspname=request("aspname")
action=request("ch_name")
sql="select top 10 * from zxxm order by zxxm_id desc"
set choosers=server.createobject("adodb.recordset")
choosers.open sql,conn,1,1
if not choosers.eof then
x=choosers.recordcount-1
action1="n"
else
x=-1
action1="y"
end if
%>
<script>
function set(form)
{
if(confirm("确定删除该条及所有相关记录？"))
{
<%
if action1="n" then
response.Write("form.action='delete.asp?bh=" & choosers(1) & "&aspname=" & aspname &"&mname=zxxm'")
end if
%>
}
else
{
form.action="#";
}
return true;
}
</script>
<form method="post">
<table width="90%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#c0c0c0">
<tr>
<td colspan="6"><div align="center">请选择<%=action%>编号</div></td>
</tr>
<tr bgcolor="#C0C0C0">
<td width="10%"><div align="center">项目编号</div></td>
<td width="20%"><div align="center">课题名称</div></td>
<td width="20%"><div align="center">负责人</div></td>
<td width="20%"><div align="center">立题文件</div></td>
<td width="20%"><div align="center">经济目标</div></td>
<td width="10%"><div align="center">删除</div></td>
</tr>
<%for i=0 to x%>
<tr>
<td width="10%"><div align="center"><a href="<%=aspname%>.asp?aspname=<%=aspname%>&bh=<%=choosers(1)%>&name=<%=name%>&xin=0" target="form1"><%=choosers(1)%></a></div></td>
<td width="20%"><div align="center"><%=choosers(2)%></div></td>
<td width="20%"><div align="center"><%=choosers(11)%></div></td>
<td width="20%"><div align="center"><%=choosers(12)%></div></td>
<td width="20%"><div align="center"><%=choosers(20)%></div></td>
<td width="10%"><div align="center"><input type=submit name=ok value="删除" onClick="return set(this.form)" style="background-color: #DDDDDD; background-repeat: repeat; background-attachment: scroll; font-size: 9pt; height: 16; width: 40; border: 0px groove #000000; background-position: 0% 50%" ></div>
</td>
</tr>
<%choosers.movenext
next
%>
<tr>
<td bgcolor="#C0C0C0" colspan="6">
<table align="right" width="50%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="20%"><div align="center">
<a href="choosexm.asp?aspname=<%=aspname%>" target="list1">刷新</a></div></td>
<td width="20%"><div align="center">上一页</div></td>
<td width="20%"><div align="center">下一页</div></td>
<td width="30%"><div align="center">最后页</div></td>
</tr>
</table></td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -