📄 choosetcmx.asp

📁 数据结构课程设计之最小生成数的K算法的实现简短简洁

💻 ASP

字号:

<!--#include file="../conn.asp"-->

<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 20 * from zxxmtc order by zxxmtc_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
	action1="y"
end if
%>
<%if action1="n" then%>  
<table width="75%" 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="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="20%"><div align="center">提取人</div></td>
	
  </tr>
  <%for i=0 to x%>
  <tr> 
	<td width="20%"><div align="center"><%=choosers(1)%></div></td>
	<td width="20%"><div align="center"><a href="kj.asp?aspname=<%=aspname%>&bh=<%=choosers(1)%>&name=<%=choosers(10)%>"><font  color="#CC0000"><%=choosers(10)%></font></a></div></td>
    <td width="20%"><div align="center"><%=choosers(5)%></div></td>
    <td width="20%"><div align="center"><%=choosers(8)%></div></td>
    <td width="20%"><div align="center"><%=choosers(9)%></div></td>
  </tr>
  <%choosers.movenext
next
%>
  <tr> 
    <td bgcolor="#C0C0C0" colspan="5">
      <table align="right" width="50%" border="0" cellpadding="0" cellspacing="0">
        <tr>
          <td width="30%"><div align="center">上一页</div></td>
		  <td width="30%"><div align="center">下一页</div></td>
		  <td width="40%"><div align="center">最后页</div></td>
        </tr>
      </table></td>
  </tr>
</table>
<%elseif action1="y" then%>
<script>
  alert('提成基本信息为空，请先录入基本信息！');
</script>
<%end if%>
<p></p>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -