📄 cangku.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../Inc/syscode.asp"-->
<html>
<head>
<title>基础资料维护--仓库</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../inc/body.css" rel="stylesheet" type="text/css">
<link href="../css/test.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
window.open(theURL,winName,features);
}
//-->
function ckmodi(id){
window.open("cangku_modi.asp?id=" +id,"_blank","height=250,width=390,resizable=no,scrollbars=no,statue=no,toolbar=no,menubar=no,location=no,left=150,top=80");
}
function ckdel(id){
if (confirm('你确定要删除吗?')){
window.open("cangku_del.asp?id=" +id,"_blank","height=150,width=450,resizable=no,scrollbars=no,statue=no,toolbar=no,menubar=no,location=no,left=150,top=80");
}
}
</script>
</head>
<body>
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td height="20"><a href="javascript:;" onClick="MM_openBrWindow('cangku_add.asp','','width=390,height=250')">增加记录</a></td>
<td> </td>
<td> </td>
</tr>
</table>
<%
dim curpage
if request("curpage")="" then
curpage=1
else
curpage=request("curpage")
end if
if not isnumeric(trim(request("curpage"))) then
curpage=1
end if
if cint(curapge)<1 then
curpage=1
end if
const numperpage=9
set rs=server.createobject("adodb.recordset")
sql="select * from ht_Storehouse"
rs.open sql,conn,1,1
if rs.eof then
response.write "<table><tr><td><br></br><center>暂无数据,请添加!</center><br></br></td></tr></table>"
response.end
end if
if not rs.eof then
rs.pagesize=numperpage
dim totalpages
totalpages=rs.pagecount
if cint(curpage)>cint(totalpages) then
curpage=totalpages
end if
rs.absolutepage=curpage
end if
dim count
count=0
i=1
%>
<table width="100%" border="0" cellspacing="0">
<tr>
<td width="4%" class="borderon"> <div align="center">编号</div></td>
<td width="27%" class="borderon"> <div align="center"> 仓库名称</div></td>
<td width="27%" class="borderon"> <div align="center"> 仓库地址 </div></td>
<td width="16%" class="borderon"><div align="center">仓库管理员</div></td>
<td width="12%" class="borderon"><div align="center">
<p>仓库电话</p>
</div></td>
<td width="20%" class="borderon"><div align="center">操作</div></td>
</tr>
</table>
<table id="masterdiv" width="100%" border="0" cellspacing="1" bgcolor="#999999">
<%
do while not rs.eof and count<numperpage
%>
<tr bgcolor="#FFFFFF">
<td width="4%" bgcolor="#E0E0E0"><div align="center"><%=trim(rs("storehouse_id"))%></div></td>
<td width="27%" ><div align="center"><%=trim(rs("storehouse_name"))%></div></td>
<td width="27%"><div align="center"><%=trim(rs("Storehouse_address"))%></div></td>
<td width="16%"><div align="center"><%=trim(rs("Storehouse_manager"))%></div></td>
<td width="12%"><div align="center"><%=trim(rs("Storehouse_tel"))%></div></td>
<td width="20%"><div align="center"><a href="javascript:;" onClick="ckmodi('<%=rs("number")%>');">修改</a> <a href="javascript:;" onClick="ckdel('<%=rs("number")%>');">删除</a></div></td>
</tr>
<%
rs.movenext
i=i+1
count=count+1
loop
rs.close
set rs=nothing
closedataconn
%>
</table>
<table width="100%" border="0" align="center">
<tr>
<td><div align="center">
<% call PageNum(curpage,totalpages,"?curpage=") %>
</div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -