📄 l_jl.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="sub/conn.asp"-->
<!--#include file="sub/rightnav.asp"-->
<!--#include file="sub/fenye.asp"-->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>计量单位</title>
<link href="cbody.css" rel="stylesheet" type="text/css" />
<link href="nav.css" rel="stylesheet" type="text/css" />
<script language="javascript">
function AXzhz(hideme)
{
var a1=document.all(hideme); //声明一个变量
a1.style.display=a1.style.display=="none"?"":"none"; //判断是否隐藏
}
function del() {
var isok=true;
isok=confirm("确定要删除吗？")
return isok;
}
</script>
</head>
<body>
<!--#include file="sub/mheader.asp"-->
<div id="abody">
<div id="lbody">
<div class="zh1">
<h5>费用计量单位:</h5>
<p style="text-align:right" onClick="AXzhz('a1')"><a href="#">添加新的费用项目</a></p>
<%
set rs=Server.CreateObject("ADODB.RecordSet")
sql="select * from l_danjia"
rs.open sql,conn,1,1
dim m,readed,cur_page,url
url="l_jl.asp?"
m=rs.recordcount
readed=1
rs.pagesize=10
%>
<% call page() %>
<table class="browser">
<tr>
<th width="30" class="b1">ID</th>
<th width="125">各种费用</th>
<th width="125">计量单位</th>
<th width="140">更新日期</th>
<th>修改</th>
<th class="b2">删除</th>
</tr>
<% do while (readed<=rs.pagesize) and (not rs.eof) %>
<tr>
<td class="b1"><%= rs(0) %></td>
<td><%= rs(1) %></td>
<td><%= rs(2) %></td>
<td><%= rs(3) %></td>
<td class="b2"><a href="l_jl.asp?id=<%= rs(0) %>">修改</a></td>
<td class="b2"><a href="del.asp?id=<%= rs(0) %>&tname=l_danjia" onClick="return del()">删除</a></td>
</tr>
<%
rs.movenext
readed=readed+1
loop
%>
</table>
<% call fenye() %>
<%
rs.close
'set rs=nothing
%>
<%
dim id
id=Request.QueryString("id")
if id<>"" then
sql="select * from l_danjia where id="&id
rs.open sql,conn,1,1
%>
<form id="form1" name="form1" method="post" action="l_jl_do.asp">
<input name="id" type="hidden" value="<%= rs(0) %>" />
<%= rs(1) %>
<input name="danjia" type="text" value="<%= rs(2) %>" />
<input type="submit" name="B1" value="修改" />
</form>
<%
rs.close
set rs=nothing
end if
%>
<div id="a1" style="display:none">
<form id="form1" name="form1" method="post" action="l_jl_do.asp">
费用类别：<input name="fb" type="text" />
单价：<input name="dj" type="text" />
<input type="submit" name="B1" value="添加" />
</div>
</div>
</div>
<!-- 右边-->
<div id="rbody">
<% call rightnav() %>
</div>
</div>
<!--#include file="sub/cbottom.asp"-->
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -