📄 tmpmfi5dxxp6.htm
字号:
<html>
<head>
<title>无标题文档</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../CssLib/CssLink.css">
</head>
<body bgcolor="#FFFFFF" text="#000000">
<table width="767" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="26" height="11"></td>
<td width="79"></td>
<td width="116"></td>
<td width="17"></td>
<td width="90"></td>
<td width="113"></td>
<td width="36"></td>
<td width="86"></td>
<td width="113"></td>
<td width="91"></td>
</tr>
<tr>
<td height="18"></td>
<td valign="top">[项目编码]</td>
<td valign="top"> </td>
<td></td>
<td valign="top">[项目名称]</td>
<td valign="top"> </td>
<td></td>
<td valign="top">[体系分类]</td>
<td valign="top"> </td>
<td></td>
</tr>
<tr>
<td height="9"></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="95" colspan="10" valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="101" height="24" valign="middle"><font color="#FF0000"><b>专家列表>></b></font></td>
<td width="604"></td>
<td width="62" valign="top">
<p><img src="images/JS_back.gif" width="19" height="22">删除</p>
</td>
</tr>
<tr>
<td colspan="3" height="71" valign="top">
<table width="100%" border="0" cellspacing="1" cellpadding="0" bordercolor="#0099FF" align="center" bgcolor="#006699">
<tr bordercolor="#0099FF">
<td width="31" bgcolor="#6699CC">
<div align="center"><a href="#">
<input type="checkbox" name="SelAll" onclick ="SelAll_onclick()"value="checkbox">
</a></div>
</td>
<td width="45" align="center" bgcolor="#6699CC">
<div align="center">序号</div>
</td>
<td width="72" bgcolor="#6699CC" align="center">
<div align="center">专家编码</div>
</td>
<td width="82" bgcolor="#6699CC" align="center">
<div align="center">专家姓名</div>
</td>
<td width="99" bgcolor="#6699CC" align="center">专家类别</td>
<td width="37" bgcolor="#6699CC" align="center">性别</td>
<td width="105" bgcolor="#6699CC" align="center">学位</td>
<td width="139" bgcolor="#6699CC" align="center">现从事专业</td>
<td width="81" bgcolor="#6699CC" align="center">职称</td>
<td width="61" bgcolor="#6699CC" align="center">详细介绍 </td>
</tr>
<%
' if Request.QueryString("strsql")="" then Response.End
if objres.RecordCount >pagesize*curpage then thispagerecords=pagesize else thispagerecords=objres.RecordCount-pagesize*(curpage-1)
recordcode=10*(curpage-1)
if objres.RecordCount >0 then
objres.MoveFirst
objres.Move((curpage-1)*10)
else
%>
<tr bgcolor="#FFFFFF">
<td colspan="10"> 对不起，没有符合要求的记录！ </td>
</tr>
<%
Response.End
end if
for i=1 to thispagerecords
recordcode=recordcode+1
%>
<tr bgcolor="#FFFFFF">
<td width="31">
<div align="center">
<input type="checkbox" name="checkCon"onclick="checkCon_onclick()" value=<% =objres.Fields("专家编码").Value %>/<% =objres.Fields("专家姓名").Value %>>
</div>
</td>
<td width="45" align="center">
<% =recordcode%>
</td>
<td width="72">
<% = objres.Fields("专家编码").Value %>
</td>
<td width="82">
<% = objres.Fields("专家姓名").Value %>
</td>
<td width="99">
<% = objres.Fields("专家类别").Value %>
</td>
<td width="37">
<% = objres.Fields("性别").Value %>
</td>
<td width="105">
<% = objres.Fields("学位").Value %>
</td>
<td width="139">
<% = objres.Fields("专业名称").Value %>
</td>
<td width="81">
<% = objres.Fields("专业技术职称").Value %>
</td>
<td width="61">
<div align="center"><a href="vbscript:check_onclick(<%=i%>,<% =thispagerecords%>)"><img src="../User/Images/more.jpg" width="47" height="16" border="0"></a></div>
</td>
</tr>
<%
objres.MoveNext
next
%>
<tr bgcolor="#6699CC">
<td colspan="10">
<div align="right">
<%
if curpage>1 then Response.Write ("<a href="+"ProjectPSFP_EditList.asp?page=1"+"&strsql="+server.URLEncode(strsql)+"> 首页</a>"+" | ") else Response.Write "首页 | "
if recordcode>pagesize then Response.Write ("<a href="+"ProjectPSFP_EditList.asp?page="+cstr(curpage-1)+"&strsql="+server.URLEncode(strsql)+"> 上一页</a>"+" | ") else Response.Write "上一页 | "
if recordcode<objres.RecordCount then Response.Write ("<a href="+"ProjectPSFP_EditList.asp?page="+cstr(curpage+1)+"&strsql="+server.URLEncode(strsql)+"> 下一页</a>"+" | ") else Response.Write "下一页 | "
if recordcode<objres.RecordCount then Response.Write ("<a href="+"ProjectPSFP_EditList.asp?page="+cstr (pagesum)+"&strsql="+server.URLEncode(strsql)+"> 末页</a>"+" ") else Response.Write "末页 "
%>
第
<% =curpage %>
页／共
<% =pagesum %>
页／共
<% =objres.RecordCount %>
条记录 </div>
</td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -