?? empmain_edu_edit.asp
字號:
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/EmpMain.asp" -->
<!--#include file="EmpMain_CheckRight.asp"-->
<%if fncheckupart(1)=true or fncheckupart(2)=true or fncheckupart(3)=true then
else
call fnCheckRight1("發貨記錄","2")
end if%>
<%
Dim MM_editAction
Dim MM_abortEdit
Dim MM_editQuery
Dim MM_editCmd
Dim MM_editConnection
MM_editAction = CStr(Request.ServerVariables("SCRIPT_NAME"))
If (Request.QueryString <> "") Then
MM_editAction = MM_editAction & "?" & Request.QueryString
End If
If (Request.QueryString("fID") <> "") Then
edu__MMColParam = Request.QueryString("fID")
Dim edu
Dim edu_numRows
isEditOK=0
if request("re")="reset_edu" then
id=request("fid")
Set edu = Server.CreateObject("ADODB.Recordset")
edu.ActiveConnection = MM_EmpMain_STRING
edu.Source = "SELECT * FROM T_BuyRecord WHERE F_Id = " + Replace(id, "'", "''") + ""
edu.CursorType = 0
edu.CursorLocation = 3
edu.LockType = 3
edu.Open()
edu("F_ProductName")=request("cp")
edu("F_Count")=request("count1")
edu("F_Contect")=request("content")
edu("F_IsOf")=request("isof")
edu("F_SpecialNote")=request("zhum")
edu("F_Date")=request("startdate")
edu.update
edu.close
set edu=nothing
isEditOK=1
end if
Set edu = Server.CreateObject("ADODB.Recordset")
edu.ActiveConnection = MM_EmpMain_STRING
edu.Source = "SELECT * FROM T_BuyRecord WHERE F_Id = " + Replace(edu__MMColParam, "'", "''") + ""
edu.CursorType = 0
edu.CursorLocation = 2
edu.LockType = 1
edu.Open()
edu_numRows = 0
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>購買經歷</title>
<link rel="stylesheet" href="CSS/SellWellWeb.css" type="text/css">
<script language="javascript" src="s_Lib/fnCheckForm.js"></script>
<script language="javascript" src="Js_Lib/Calendar.js"></script>
<%if isEditOK = 1 then%>
<script>
alert("編輯成功!")
window.history.back()
</script>
<%end if%>
<script>
function fnDoDelete(){
if(confirm("您確定要刪除？")){
window.location = "EmpMain_Edu_Delete.asp?EduID=<%=request("ID")%>&EmpID=<%=request("EmpID")%>"
}
}
function showopen(obj,w,h){
var arr = showModalDialog(obj, window, "dialogWidth:"+w+"px; dialogHeight:"+h+"px; help: no; scroll: no; status: no");
if ((arr != null))
{
insertHTML(str);
}
}
</script>
</head>
<body class="body">
<form method="POST" action="empMain_Edu_edit.asp?fid=<%=edu("F_Id")%>" name="myform">
<fieldset style="padding: 2" class="fiedset"> <legend>購買記錄</legend>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#111111" class="table">
<tbody id="FileNewComm">
<tr >
<td width="14%" align="center" class="listTitle">購買日期</td>
<td width="15%" align="center" class="listTitle">產品</td>
<td width="12%" align="center" class="listTitle">金額</td>
<td width="24%" align="center" class="listTitle">聯系人</td>
<td width="11%" align="center" class="listTitle">老客戶</td>
<td width="24%" align="center" class="listTitle" onclick="fnAddNewComm('File')" style="cursor:hand">備注</td>
</tr>
<tr class="ListValueGray" id="FileorgComm" type="Comm">
<td ><input name="startdate" type="text" class="text" id="startdate" value="<%=edu("F_Date")%>" onclick="getDate(this,'2')" readonly style="cursor:hand"></td>
<td ><input type="text" id="cp" name="cp" readonly onClick="showopen('Empmain_cp_info.asp?Empid=<%=request("Empid")%>',400,400)" value="<%=edu("F_ProductName")%>"></td>
<td >
<input name="count1" type="text" class="text" id="count1" value="<%=edu("F_Count")%>"></td>
<td >
<input name="content" type="text" class="text" id="content" value="<%=edu("F_Contect")%>"></td>
<td > <select name="isof" class="Text" id="select"><option />
<option value="否" <%if edu("F_IsOf")="否" then response.write("selected")%>>否</option>
<option value="是" <%if edu("F_IsOf")="是" then response.write("selected")%>>是</option>
</select></td>
<td style="cursor:hand"><input name="zhum" type="text" class="text" id="zhum" value="<%=edu("F_SpecialNote")%>"></td>
</tr>
</tbody>
</table>
</fieldset>
<div align="right">
<input type="hidden" value="<%=request("EmpID")%>" name="EmpID" >
<input type="hidden" name="re" value="reset_edu">
<input type="submit" value="更新" name="B1" class="button">
<input type="button" value="返回" name="B1" class="button" onclick="window.history.back()">
</div>
</form>
</body>
</html><%edu.close
set edu=nothing
else
response.redirect("EmpMain_Edu_Disp.asp?id="&request.QueryString("id"))
End If
%>
?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -