📄 ic_group.asp

📁 进销存软件源代码

💻 ASP

字号:

<!-- #include virtual="/eB3KTransaction.asp" --><!-- #include file = "../Common.asp" --><!-- #include file = "../stdlib.asp" --><!-- #include file = "../oalib.asp" --><%
dim pagepos,MaxItem,TotalCount,temppage

if isnumeric(request("id"))=false then Response.Redirect "default.asp"
%>
<html>
<head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><style type="text/css"><!-- TD { font-size: 10.5pt } A {text-decoration: none;} A:hover {text-decoration: underline;} --></style></head>
<script src="/Client/jsBBS.js"></script><script src="/Client/jsBBSGroup.js"></script>
<center><table cellpadding=0 cellspacing=0 border=0 width=98%>
<tr><td height="10"></td></tr>
<script>
var testUndefine,rooturl='IC';
<%
if len(request("pageno"))>0 and IsNumeric(request("pageno")) then pagepos=CInt(request("pageno")) else pagepos=1
MaxItem = 16

oajsGetGroupInfo "dh",CLng(request("id"))

TotalCount=oajsGetMessageTitle("d",request("id"),MaxItem,pagepos-1,0,request("find"))

temppage=int((TotalCount+MaxItem-1)/MaxItem)
%>
de();
document.write(CreatePageCtrl(rooturl+'_Group.asp',<%=request("id")%>,<%=temppage%>,<%=pagepos%>,'<%=replace(request("find"),"'","\'")%>'));
document.write('<tr><td align=left>'+CreateWindow('发布','<table border=0 cellpadding=0 cellspacing=1>'+CreatePost(rooturl+'_Post.asp',<%=request("id")%>)+'</table>',2,1,'','')+'</td></tr>');
</script>
</table></center></BODY></HTML>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -