📄 k_u_addx.asp
字号:
<%@LANGUAGE="JAVASCRIPT" CODEPAGE="936"%>
<!--#include file="config.txt" -->
<!--#include file="forbidon.asp" -->
<!--#include file="conn.asp" -->
<%
if(String(Request("nameid")) != "undefined"){ nameid = String(Request("nameid"));}
if(String(Request("vt")) != "undefined"){ vt = String(Request("vt"));}
if(String(Request("vi")) != "undefined"){ vi = String(Request("vi"));}
if(String(Request("vh")) != "undefined"){ vh = String(Request("vh"));}
%>
<%
var rs = Server.CreateObject("ADODB.Recordset");
rs.ActiveConnection = MM_conn_STRING;
rs.Source = "SELECT nameid, name, vt, vi,vh, departmentid FROM all_user where nameid="+nameid+"";
rs.CursorType = 0;
rs.CursorLocation = 2;
rs.LockType = 1;
rs.Open();
var rs_numRows = 0;
var vts,vis,vhs,vtx,vtsx,vix,visx,vhx,vhsx;
vtx=rs.Fields.Item("vt").Value+parseInt(vt)
vix=rs.Fields.Item("vi").Value+parseInt(vi)
vhx=rs.Fields.Item("vh").Value+parseInt(vh)
vts=(parseInt(vtx))*pvts;
vis=(parseInt(vix))*pvis;
vhs=(parseInt(vhx))*pvhs;
%>
<%
var cmd = Server.CreateObject("ADODB.Command");
cmd.ActiveConnection = MM_conn_STRING;
cmd.CommandText = "UPDATE all_user SET vt='"+vtx+ "', vts='"+vts+"', vi='"+vix+ "', vis='"+vis+"', vh='"+ vhx+ "', vhs='"+vhs+"' WHERE nameid="+nameid+ "";
cmd.CommandType = 1;
cmd.CommandTimeout = 0;
cmd.Prepared = true;
cmd.Execute();
%>
<% var MM_paramName = ""; %>
<%
// *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters
// create the list of parameters which should not be maintained
var MM_removeList = "&index=";
if (MM_paramName != "") MM_removeList += "&" + MM_paramName.toLowerCase() + "=";
var MM_keepURL="",MM_keepForm="",MM_keepBoth="",MM_keepNone="";
// add the URL parameters to the MM_keepURL string
for (var items=new Enumerator(Request.QueryString); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepURL += "&" + items.item() + "=" + Server.URLencode(Request.QueryString(items.item()));
}
}
// add the Form variables to the MM_keepForm string
for (var items=new Enumerator(Request.Form); !items.atEnd(); items.moveNext()) {
var nextItem = "&" + items.item().toLowerCase() + "=";
if (MM_removeList.indexOf(nextItem) == -1) {
MM_keepForm += "&" + items.item() + "=" + Server.URLencode(Request.Form(items.item()));
}
}
// create the Form + URL string and remove the intial '&' from each of the strings
MM_keepBoth = MM_keepURL + MM_keepForm;
if (MM_keepBoth.length > 0) MM_keepBoth = MM_keepBoth.substring(1);
if (MM_keepURL.length > 0) MM_keepURL = MM_keepURL.substring(1);
if (MM_keepForm.length > 0) MM_keepForm = MM_keepForm.substring(1);
%>
<!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="../imag/cs.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
.STYLE1 {
color: #FF0000;
font-weight: bold;
}
-->
</style>
</head>
<body>
<!--#include file="top.asp" -->
<table width="80%" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" class="atable">
<tr>
<td bgcolor="#FFFFFF"><div align="center" class="lushe1">
<p> </p>
<p>对[<span class="STYLE1"><%=rs.Fields.Item("name").Value%></span>]的信息添加成功！<A HREF="k_s_u.asp?<%= Server.HTMLEncode(MM_keepNone) + ((MM_keepNone!="")?"&":"") + "departmentid=" + rs.Fields.Item("departmentid").Value %>">返回继续添加其他人的信息</A></p>
<p> </p>
</div></td>
</tr>
</table>
</body>
</html>
<%
rs.Close();
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -