⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 newtax.asp

📁 1 除掉了 时间 限制 2 除掉了 人数 限制 改为 500人 原为5人 3 发现一点小缺陷 增加人员的时候没有判断 登陆名是否重复! 自己写吧~~~:) 4 又 是一点缺陷
💻 ASP
字号:
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%
if request("id")<>"" then
	dim connq
	dim rsq
	set connq=server.CreateObject("adodb.connection")
	set rsq=server.CreateObject("adodb.recordset")
	connq.Open connstring
	rsq.Open "select * from tax where taxid="&request("id"),connq,2,3,1
	strtaxcode=rsq("taxcode")
	strtaxrate=rsq("taxrate")
	strdescription=rsq("description")
	strclosed=rsq("closed")
	rsq.Close
	set rsq=nothing
	connq.Close
	set connq=nothing
end if

if request("taxcode")<>"" then
	dim conn
	dim rs
	set conn=server.CreateObject("adodb.connection")
	set rs=server.CreateObject("adodb.recordset")
	conn.Open connstring
	if request("id")="" then
		rs.Open "select * from tax",conn,2,3,1
		rs.AddNew
	else
		rs.Open "select * from tax where taxid="&request("id"),conn,2,3,1
	end if

	rs("taxcode")=request("taxcode")
	rs("taxrate")=request("taxrate")
	rs("description")=request("description")
	if request("closed")=1 then
		rs("closed")=1
	else
		rs("closed")=0
	end if
	rs.Update 
	rs.Close 
	set rs=nothing
	conn.Close 
	set conn=nothing
%>
<script language=javascript>
	window.opener.location.reload();
	window.close();
</script>
<%
end if
%>
<script language="javascript">
function save(){
	if (form1.taxcode.value==''){
		alert('请输入名称!');
		form1.taxcode.focus();
		return;
	}
	if (form1.taxrate.value==''){
		alert('请输入税率!');
		form1.taxrate.focus();
		return;
	}
	if (isNaN(form1.taxrate.value)){
		alert('请输入数字!');
		form1.taxrate.focus();
		return;
	}
form1.submit();
}
</script>

<HTML><HEAD><TITLE>税率</TITLE>
<LINK href="../global.css" rel=STYLESHEET type=text/css>
 <form name=form1  method="post"  id=form1>
  <table width="100%" height="20" border="0" cellpadding="0" cellspacing="0">
   <tr> 
    <td height="25"><strong><font size="2" class=title><b><%if request("id")="" then%>新建税率<%else%>编辑税率<%end if%></b></font></strong></td>
      <td>&nbsp;</td>
    </tr>
    <tr > 
      <td height="16" colspan="2" background="../images/title.gif">&nbsp;</td>
    </tr>
    <tr>
      <td height=4></td>
    </tr>
	<tr><td>
	<div align="center" style="cursor:hand"><a onclick="save();"><img src="../images/button_save.gif"></a>&nbsp;&nbsp;&nbsp;&nbsp;<a onclick="window.close();"><img src="../images/button_cancel.gif"></a> 
    </div></td>
    </tr>
 </table>
  <table width="100%" align="center" cellspacing="1" bgcolor="#FFFFFF">
      <td width="40%" bgcolor="DEDFDE" > <div align="center"><font color=red>*&nbsp;</font>名称</div></td>
      <td width="60%" bgcolor="EFEFEF"> <input type=text size="15" name=taxcode value="<%=strtaxcode%>"></td>
    </tr>
    <tr> 
      <td width="40%" bgcolor="DEDFDE" > <div align="center"><font color=red>*&nbsp;</font>税率</div></td>
      <td width="60%" bgcolor="EFEFEF"> <input type=text name="taxrate" size="5" value="<%=strtaxrate%>">%</td>
    </tr>
    <tr> 
      <td width="40%" bgcolor="DEDFDE" > <div align="center">描述</div></td>
      <td width="60%" bgcolor="EFEFEF"> <textarea name="description" cols="30" rows="4"><%=strdescription%></textarea></td>
    </tr>
    <tr> 
      <td width="40%" bgcolor="DEDFDE" > <div align="center">失效</div></td>
      <td width="60%" bgcolor="EFEFEF"> <input type=checkbox name=closed value=1 <%if strclosed then Response.Write "checked"%>></td>
    </tr>
  </table>
</form>

⌨️ 快捷键说明

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