📄 modifysalarymodule.asp

📁 一个VB的p2p聊天系统

💻 ASP

字号:

<!--#include file="headfiles/Connection.inc"-->
<%
dim SMName,smid
smid=request("smid")
SMName=request.form("SModule_Name")
set rs = server.CreateObject("adodb.recordset")
if SMName="" then
	sqlStr="select * from SalaryModuleTable where SModule_ID="&cint(smid)
	rs.open sqlStr,conn,3,1	
'	response.Write(smid)
else
	SqlStr="select * from SalaryModuleTable where SModule_ID="&cint(smid)
	rs.open SqlStr,conn,3,2
	rs("SModule_Name")=SMName
	rs.update
	rs.close
	response.Write(chr(13)&chr(10)&"<script language='javascript'>")
	response.Write(chr(13)&chr(10)&"function itok(){")
	response.Write(chr(13)&chr(10)&"alert('修改成功！');")
	response.Write(chr(13)&chr(10)&"window.close();")
	response.Write(chr(13)&chr(10)&"}")
	response.Write(chr(13)&chr(10)&"itok();")
	response.Write(chr(13)&chr(10)&"</script>")
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新增帐套</title>
<link href="headfiles/style.css" rel="stylesheet" type="text/css">
<link href="headfiles/text.css" rel="stylesheet" type="text/css">
<script language='javascript'>
function InsertSalaryModuleTable(){
	if(frmAddSM.SModule_Name.value==""){
		alert ("请输入工资账套名称！");
		frmAddSM.SModule_Name.focus();
		return false;
	}
	frmAddSM.submit();
}
function Open(){
	window.close();
}
</script>
</head>

<body background="images/bg.gif">
<table width="250" height="100" border="0" cellspacing="0" cellpadding="0">
<form id="frmAddSM" name="frmAddSM"  action="ModifySalaryModule.asp?smid=<%=smid%>" method="post">
<tr>
<td valign="middle" align="center"  height="50" colspan="2">请输入模块名
<input type="text" name="SModule_Name"  height="25" width="180"  value="<%=rs("SModule_Name")%>"></td></tr>
   <tr>
   <td valign="middle" align="center"  width="125">
<input type="button" id="addNew" name="addNew" style="width:60px" value="确定" onClick="InsertSalaryModuleTable();return false"></td>
<td valign="middle" align="center"  width="125">
 <input type="button" id="addNew" name="addNew" style="width:60px" value="取消" onClick="Open();"></td>
</tr>
</form>
</table>

</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C

搜索代码 Ctrl + F

全屏模式 F11

切换主题 Ctrl + Shift + D

显示快捷键 ?

增大字号 Ctrl + =

减小字号 Ctrl + -