📄 cgalmore.asp

📁 北京商务网
💻 ASP
字号:
<%@ codepage ="936" %><!--#include file="head.asp"--><LINK href="../job/image/main.css" rel=stylesheet type=text/css><style><!--.navtext1 {FILTER: dropshadow(color=#FCDDAB,offx=1,offy=1); FONT-SIZE: 12px}TABLE {FONT-SIZE: 9pt}--></style><title><%=WebName%>.成功案例</title><body bgcolor="#FFFFFF" marginheight=0 marginwidth=0 leftmargin=0><SCRIPT>function view2(url){ var url; window.open(url,'_blank','status=no,scrollbars=yes,top=20,left=110,width=600,height=460'); }</SCRIPT><div align="center"><center><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="750" id="AutoNumber1"><tr><td width="100%"><CENTER><DIV align=center><TABLE bgColor=#cccccc border=0 cellPadding=0 cellSpacing=0 width=750 style="border-collapse: collapse; font-size:9pt" bordercolor="#111111"><FORM action=../newsmore.asp method=POST name=search_form ><TBODY><TR bgColor=#E8F1F9><TD align=middle bgColor=#E8F1F9 background="../images/search_back3.gif"><DIV align=center><TABLE border=0 cellSpacing=0 width="539" height="30" style="border-collapse: collapse; font-size:9pt" bordercolor="#111111" cellpadding="0"><TBODY><TR><TD class=M height="32" width="131"><DIV align=left><FONT color=#336666>查询信息动态 ：</FONT></DIV></TD><TD width="142" height="32"><input type="text" name="txtitle" size="25" style="font-size: 9pt"> </TD><TD width="89" height="32"><DIV align=center><SELECT id=Select1 name=type> <OPTION selected value=0>标题检索</OPTION> <OPTION value=1>全文检索</OPTION></SELECT> </DIV></TD><TD width="103" height="32"><select style="font-size: 9pt" name="bz"><option value=1>本站信息动态</option><option value="8">人才市场动态</option></select> </TD><TD width="74" height="32"><DIV align=center><INPUT align=bottom border=0 name=I10 src="../hyxx/images/CreditDynamic_index_search.gif" type=image ></DIV></TD></TR></TBODY></TABLE></DIV></TD></TR></TBODY></FORM></TABLE></DIV><TABLE border=0 cellPadding=0 cellSpacing=0 width=750 style="font-size: 9pt"><TBODY><TR><TD height=8 width="573"></TD><TD height=241 width="8" valign="top" background="../images/CreditDynamic_zxqy_03.gif" bgcolor="#3787CA" rowspan="2"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber8" bgcolor="#FFFFFF" height="15"><tr><td width="100%" height="15">　</td></tr></table></TD><TD height=8 width="169" rowspan="2" valign="top"><div align="center"><center><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber9"><tr><td width="100%">　</td></tr><tr><td width="100%"><p align="center"><a href="../banner.asp"><img border="0" src="../hyxx/images/fw10.gif"></a></td></tr><tr><td width="100%"><p align="center"><iframe src="../ads/sxgg.asp" width=160 height=421 border=0 frameborder=0 framespacing=0 marginheight=1 marginwidth=1 noResize scrolling=no vspace="0" name="I5"></iframe></td></tr><tr><td width="100%">　</td></tr><tr><td width="100%">　</td></tr></table></center></div></TD></TR><TR><TD vAlign=top width="573"><TABLE border=0 cellPadding=0 cellSpacing=0 width=581 style="font-size: 9pt"><TBODY><TR><TD width="581"><b><FONT color=#4e68a4>&nbsp;当前位置:<a href="../default.asp"><FONT color=#4e68a4>首页</FONT></a>&gt;&gt;成功案例</FONT></b></TD></TR><TR><TD width="581"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; font-size:9pt" bordercolor="#111111" width="100" id="AutoNumber3"><tr><TD width=520 style="font-size: 12px; font-family: 宋体; color: #000; line-height:150%"><IFRAME frameBorder=0 height=92 marginHeight=1 marginWidth=1 scrolling=no src="../ads/bl.asp" width=538 BORDERCOLOR="#000000" name="I4"></IFRAME></TD><TD align=left style="font-size: 12px; font-family: 宋体; color: #000; line-height:150%"><a target="_blank" href="../../banner.asp"><IMG border=0 src="../images/520bannernotes.gif"></a></TD></tr></table></TD></TR><TR><TD width="581">　</TD></TR></TBODY></TABLE><TABLE border=0 cellPadding=0 cellSpacing=0 width=560 style="font-size: 9pt"><TBODY><TR><TD height=22><TABLE border=0 cellPadding=0 cellSpacing=0 width=550 style="font-size: 9pt"><%const MaxPerPage=12dim totalPut dim CurrentPagedim TotalPagesdim i,jif not isempty(request("page")) thencurrentPage=cint(request("page"))elsecurrentPage=1end ifdim rsdim sqldim bzbz=request("bz")if not isempty(request("selAnnounce")) thenidlist=request("selAnnounce")if instr(idlist,",")>0 thendim idarridArr=split(idlist)dim idfor i = 0 to ubound(idarr)id=clng(idarr(i))call deleteannounce(id)nextelsecall deleteannounce(clng(idlist))end ifend if set rs=server.createobject("adodb.recordset") sql="select * from cgal order by NewsID desc"rs.open sql,conn,1,1 if rs.eof and rs.bof then response.write"<SCRIPT language=JavaScript>alert('对不起，没有您要查询的信息！');"response.write"javascript:history.go(-1)</SCRIPT>"else %><TBODY><TR><TD background=../newsmore.asp height=20 width=25></TD><TD class=M vAlign=bottom><font face="Arial" size="2" color="#3E5282">成功案例</font></TD><TD width=80></TD></TR></TBODY></TABLE></TD></TR><TR><TD height=20><DIV align=center><TABLE border=0 cellPadding=0 cellSpacing=0 width=560 style="font-size: 9pt"><TBODY><TR><TD height=8 width=560><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber6"><tr><td width="100%"><% totalPut=rs.recordcount if currentpage<1 then currentpage=1 end if if (currentpage-1)*MaxPerPage>totalput then if (totalPut mod MaxPerPage)=0 then currentpage= totalPut \ MaxPerPage else currentpage= totalPut \ MaxPerPage + 1 end if end if if currentPage=1 then showContent totalput,MaxPerPageshowpage totalput,MaxPerPage,"cgalmore.asp"else if (currentPage-1)*MaxPerPage<totalPut then rs.move (currentPage-1)*MaxPerPage dim bookmark bookmark=rs.bookmark showContent totalput,MaxPerPageshowpage totalput,MaxPerPage,"cgalmore.asp"else currentPage=1 showContent totalput,MaxPerPageshowpage totalput,MaxPerPage,"cgalmore.asp"end if end if rs.close end if set rs=nothingsub showContent (totalput,MaxPerPage)%><CENTER><CENTER><TABLE border="0" cellspacing="1" width="549" cellpadding="4" bgcolor="#E8F1F9" style="border-collapse: collapse"><%do while not rs.eof%><TR height="20" bgcolor="#ffffff"> <TD width="458">·<a href="javascript:view2('show_cgal.asp?newsid=<%=rs("newsid")%>')"><%=rs("Newstitle")%></a>　</td><TD width="72" align="center"><%=rs("date")%>　</TD></TR><% i=i+1if i>=MaxPerPage then exit dors.movenextloop%><%end subfunction showpage(totalnumber,maxperpage,filename) dim n if totalnumber mod maxperpage=0 then n= totalnumber \ maxperpage else n= totalnumber \ maxperpage+1 end if if CurrentPage<2 then response.write "<table border=0 width=98% cellspacing=0 cellpadding=0>" response.write "<tr height=40>"response.write "<td align=left>"response.write "共<font color=#ff6600><b>"&n&"</b></font>页&nbsp;第<font color=#ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共检索到<font color=#ff6600><b>"&totalnumber&"</b></font>条相关信息</td>" response.write "<td align=right>"response.write "【最前页】【上一页】" else response.write "<table border=0 width=98% cellspacing=0 cellpadding=0>"response.write "<tr height=40>"response.write "<td align=left>"response.write "共<font color=#ff6600><b>"&n&"</b></font>页&nbsp;第<font color=#ff6600><b>"&CurrentPage&"</b></font>页&nbsp;共检索到<font color=#ff6600><b>"&totalnumber&"</b></font>条相关信息</td>" response.write "<td align=right>"response.write "【<a href="&filename&"?page=1&search="&search&"&txtitle="&request("txtitle")&">最前页</a>】" response.write "【<a href="&filename&"?page="&CurrentPage-1&"&search="&search&"&txtitle="&request("txtitle")&">上一页</a>】&nbsp;" end if if n-currentpage<1 then response.write "【下一页】【最后页】" else response.write "【<a href="&filename&"?page="&(CurrentPage+1)&"&search="&search&"&txtitle="&request("txtitle")&">" response.write "下一页</a>】【<a href="&filename&"?page="&n&"&search="&search&"&txtitle="&request("txtitle")&">最后页</a>】" end if response.write "</td>"response.write "</tr>"response.write "</table>"%><% end function%></TABLE></CENTER></td></tr></table></TD></TR></table></td></tr></table></table></TD></tr></table></TBODY></TABLE></DIV></TD></TR><TR><TD background=../images/CreditDynamic_zxqy_02.gif height=1></TD></TR><TR><TD background=../images/CreditDynamic_zxqy_02.gif height=1></TD></TR><TR><TD>　</TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></CENTER><CENTER><TABLE border=0 cellPadding=0 cellSpacing=0 width=750 style="font-size: 9pt"><TBODY><tr><TD vAlign=top width="750"><table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse; font-size:9pt" bordercolor="#111111" width="100%" id="AutoNumber5"><tr><td width="100%" background="../images/bt1.gif">　</td></tr></table></TD></tr></TBODY></TABLE></CENTER></td></tr></table></center></div><!--#include file="../inc/end.asp"-->
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -