📄 searchdate.asp
字号:
<!--
=========================================================
重庆杰诺软件开发研究所开发制作
(http://www.cnkami.com)
诚信，创新，你的最好选择。。。。。。。。。。。
==========================================================
解压密码：www.cnkami.com
==========================================================
我们是重庆杰诺软件开发研究所。现由我们开发研究的主要针对教育培训机构，为用户提供认证证书的单位的证书查询系统以功能强大，使用方便等特点受到广大客户的爱待。为了让您更多的了解我们的证书查询系统。我们推出在线测试地址：
后台地址：http://www.cnkami.com/search/admin.asp
前台地址: http://www.cnkami.com/search/
本系统针对培训行业用户所以统-定价：200元/套 ，付费用户享受免费一年升级服务。系统现在为ACCESS版，注册用户可免费升级为SQL版
本系统功能：管理学生所获得的证书资料，如果在网上可方便用人单位查询学生的资料，从而杜绝不法分子以在贵培训机构的受培训并获得证书到处毁坏贵培训机构名誉！商业版在此功能上增加了一些功能。欲知详情请联系：QQ:1801099
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++
有意请联系！：
QQ:199148195
QQ:171476439
邮件：flycomesoho@hotmail.com
电话：63700285 13608336048
如转载，请不要删除此信息！
+++++++++++++++++++++++++++++++++++++++++++++++++++++++++
--><%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<html>
<head>
<%searchdate=replace(request("searchdate"),", ","-")
%>
<title>于 <%=year(searchdate)&"年"&month(searchdate)&"月"&day(searchdate)&"日"%> 获得证书的学生资料</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="CCS/Style.css" rel="stylesheet" type="text/css">
</head>
<body>
<table width="503" height="151" border="1" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#E1E1E1" class="xuxian">
<tr align="center">
<td height="27"><font color="#000000">查询于 <font color="#FF0000"><strong><%=year(searchdate)&"年"&month(searchdate)&"月"&day(searchdate)&"日"%>
</strong></font> 获得证书的学生资料</font></td>
</tr>
<%
'searchdate=right(year(searchdate),2)&"-"&month(searchdate)&"-"&day(searchdate)
sql="select * from bookinfo where getbookdate='"&searchdate&"' order by id desc"
pmcount=5
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,1,1
rcount=rs.recordcount
if pmcount="" or isempty(pmcount) or pmcount<1 then
pmcount=5
end if
rs.pagesize=pmcount
mpage=rs.pagecount
pageno=request("pageno")
if isempty(pageno) or cint(pageno)<1 or cint(pageno)>mpage then
pageno=1
end if
if rs.eof or rs.bof then
%>
<tr align="center" bgcolor="#FFFFFF">
<td height="29">还没有证书类别!</td>
</tr>
<%else
rs.absolutepage=pageno
loopno=pmcount
%>
<%
do while not rs.eof and loopno>0
%>
<tr align="center" bgcolor="#FFFFFF">
<td height="29" valign="middle">
<%studentid=rs("studentid")
sqlr="select * from studentinfo where id=" & studentid
set rsstudent=conn.execute(sqlr)
%>
<table width="534" height="121" border="1" align="center" cellpadding="1" cellspacing="1" bordercolor="#FFFFFF" bgcolor="#E1E1E1">
<tr>
<td height="24" colspan="2" class="tl150"><strong><font color="#FF0000">[学生信息]</font></strong></td>
</tr>
<tr>
<td width="151" height="28" class="tl150">学生姓名：</td>
<td width="370" class="tl150"><%=rsstudent("studentname")%></td>
</tr>
<tr>
<td height="30" colspan="2" class="tl150">于<font color="#000000"> <font color="#FF0000"><strong><%=year(searchdate)&"年"&month(searchdate)&"月"&day(searchdate)&"日"%></strong></font> 获得的证书是：<font color="#FF0000"><strong>
<%=rs("bookclass")%></strong></font></font></td>
</tr>
</table>
<br> </td>
</tr>
<%
rs.movenext
loopno=loopno-1
loop
%>
<tr align="center">
<td height="29">
<%
if cint(pageno)<2 then
response.write " 首页 | 上一页"
else
response.write "<a href=searchdate.asp?pageno=1&searchdate="&searchdate&">首页</a> | "
response.write "<a href=searchdate.asp?pageno="&pageno-1&"&searchdate="&searchdate&">上一页</a>"
end if
%>
|
<%
if cint(mpage-pageno)<1 then
response.write "下一页 | 尾页"
else
response.write "<a href=searchdate.asp?pageno="&pageno+1&"&searchdate="&searchdate&">下一页</a> | "
response.write "<a href=searchdate.asp?pageno="&mpage&"&searchdate="&searchdate&">尾页</a>"
end if
%>
| 共计<%=cstr(rcount)%>主题<%=cstr(pageno)&"/"&cstr(mpage)&"页"%></td>
</tr>
<tr align="center">
<td height="29"><a href="javascript:window.self.close()">关闭窗口</a></td>
</tr>
<%
rs.close
end if%><%closeconn%>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -