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

📄 workinfo.asp

📁 一个VB的p2p聊天系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="headfiles/Connection.inc"-->
<%
	'定义变量
	dim EmpID,EmpComeTime,EmpType,EmpDegree,EmpJobTitle,EmpDepart1,EmpPosition,EmpDepart2,EmpDepart3,EmpSchool,EmpMajor,EmpGraTime,EmpWorkTime
	dim flag
	
	'接受表单信息
	EmpID=Request("Eid")
'	Response.Write EmpID
	if EmpID="" then
		EmpID=Request.Form("txtEmpID")
		EmpComeTime=Request.Form("txtComeTime")
		EmpType=Request.Form("sltType")
		EmpDegree=Request.Form("sltDegree")
		EmpJobTitle=Request.Form("sltJobTitle")
		EmpDepart1=Request.Form("sltDepart1")
		EmpPosition=Request.Form("sltPosition")
		EmpDepart2=Request.Form("txtDepart2")
		EmpDepart3=Request.Form("txtDepart3")
		EmpSchool=Request.Form("txtSchool")
		EmpMajor=Request.Form("txtMajor")
		EmpGraTime=Request.Form("txtGradTime")
		EmpWorkTime=Request.Form("txtWorkTime")
		flag=1
	end if
	
	'定义并打开记录集
	set rsWorkInfo=server.CreateObject("ADODB.RECORDSET")
	set rsWordInfo=server.CreateObject("ADODB.RECORDSET")
	set rsType=server.CreateObject("ADODB.RECORDSET")
	set rsDegree=server.CreateObject("ADODB.RECORDSET")
	set rsJobTitle=server.CreateObject("ADODB.RECORDSET")
	set rsDepart=server.CreateObject("ADODB.RECORDSET")
	set rsPosition=server.CreateObject("ADODB.RECORDSET")
	strSql="select * from EmployeeTypeTable order by EmployeeType_ID"
	rsType.Open strSql,Conn,3,1
	strSql="select * from EduDegreeTable order by EduDegree_ID"
	rsDegree.Open strSql,Conn,3,1
	strSql="select * from JobTitleTable order by JobTitle_ID"
	rsJobTitle.Open strSql,Conn,3,1
	strSql="select * from Depart1Table order by Depart_ID"
	rsDepart.Open strSql,Conn,3,1
	strSql="select * from PositionTable order by Position_ID"
	rsPosition.Open strSql,Conn,3,1
	strSql="select * from EmployeeBasicTable where Employee_ID="&cint(EmpID)
	rsWordInfo.Open strSql,Conn,3,1
	
	'修改数据库信息
	if flag=1 then
		strSql="select * from EmployeeWorkTable where Employee_ID="&cint(EmpID)
		rsWorkInfo.Open strSql,Conn,3,2
		if EmpComeTime<>"" then
			rsWorkInfo("Employee_ComeTime")=EmpComeTime
		end if
		rsWorkInfo("Employee_PayType")=EmpType
		rsWorkInfo("Employee_Degree")=EmpDegree
		rsWorkInfo("Employee_JobTitle")=EmpJobTitle
		rsWorkInfo("Employee_Depart1")=EmpDepart1
		rsWorkInfo("Employee_Position")=EmpPosition
		if EmpDepart2<>"" then
			rsWorkInfo("Employee_Depart2")=EmpDepart2
		end if
		if EmpDepart3<>"" then
			rsWorkInfo("Employee_Depart3")=EmpDepart3
		end if
		if EmpSchool<>"" then
			rsWorkInfo("Employee_School")=EmpSchool
		end if
		if EmpMajor<>"" then
			rsWorkInfo("Employee_Major")=EmpMajor
		end if
		if EmpGraTime<>"" then
			rsWorkInfo("Employee_GradTime")=EmpGraTime
		end if
		if EmpWorkTime<>"" then
			rsWorkInfo("Employee_WorkTime")=EmpWorkTime
		end if
		rsWorkInfo.Update
		rsWorkInfo.Close()
	end if
	
	'重新打开视图
	strSql="select * from EmployeeWorkView where Employee_ID="&cint(EmpID)
	rsWorkInfo.open strSql,Conn,3,1
'	Response.Write rsWorkInfo.RecordCount 
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="headfiles/text.css" rel="stylesheet" type="text/css">
<title></title>
<SCRIPT language=JavaScript>
<!--
<!--
if (navigator.appName.indexOf("Internet Explorer") != -1)
document.onmousedown = noSourceExplorer;
function noSourceExplorer(){if (event.button == 2 | event.button == 3)
{
//alert("版权所有,严禁拷贝!");
}}
// -->

function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->

<!--

function OpenNew(Url){
	window.navigate (Url+"?Eid="+frmWorkInfo.txtEmpID.value);
}

function employeeSave(){
	var msg;
	msg=confirm("您的操作将修改"+frmWorkInfo.txtEmpID.value+"("+frmWorkInfo.txtEmpName.value+")的信息!\n\n确实要保存吗?")
	if(msg==false){
		return false;
	}
//	alert (isNumeric(frmWorkInfo.txtComeTimeY.value));
	if((frmWorkInfo.txtComeTimeY.value).length<4&&(frmWorkInfo.txtComeTimeY.value).length>0){
		alert ("请把年份写全!\n\n如:1986");
		frmWorkInfo.txtComeTimeY.focus();
		return false;
	}
	if(frmWorkInfo.txtComeTimeY.value!=""){
		frmWorkInfo.txtWorkAgeH.value=frmWorkInfo.txtYear.value-frmWorkInfo.txtComeTimeY.value;
	}
	if((frmWorkInfo.txtComeTimeM.value).length<2){
		frmWorkInfo.txtComeTimeM.value="0"+frmWorkInfo.txtComeTimeM.value;
	}
	frmWorkInfo.txtComeTime.value=frmWorkInfo.txtComeTimeY.value+"/"+frmWorkInfo.txtComeTimeM.value;
	
	if((frmWorkInfo.txtGradTimeY.value).length<4&&(frmWorkInfo.txtGradTimeY.value).length>0){
		alert ("请把年份写全!\n\n如:1986");
		frmWorkInfo.txtGradTimeY.focus();
		return false;
	}
	if((frmWorkInfo.txtGradTimeM.value).length<2){
		frmWorkInfo.txtGradTimeM.value="0"+frmWorkInfo.txtGradTimeM.value;
	}
	frmWorkInfo.txtGradTime.value=frmWorkInfo.txtGradTimeY.value+"/"+frmWorkInfo.txtGradTimeM.value;
	
	if((frmWorkInfo.txtWorkTimeY.value).length<4&&(frmWorkInfo.txtWorkTimeY.value).length>0){
		alert ("请把年份写全!\n\n如:1986");
		frmWorkInfo.txtWorkTimeY.focus();
		return false;
	}
	if(frmWorkInfo.txtWorkTimeY.value!=""){
		frmWorkInfo.txtWorkAge.value=frmWorkInfo.txtYear.value-frmWorkInfo.txtWorkTimeY.value;
	}
	if((frmWorkInfo.txtWorkTimeM.value).length<2){
		frmWorkInfo.txtWorkTimeM.value="0"+frmWorkInfo.txtWorkTimeM.value;
	}
	frmWorkInfo.txtWorkTime.value=frmWorkInfo.txtWorkTimeY.value+"/"+frmWorkInfo.txtWorkTimeM.value;
	frmWorkInfo.txtEmpID.disabled=false;
	frmWorkInfo.submit();
}

//-->
</SCRIPT>

</head>

<BODY bgColor=#ffffff leftMargin=0 topMargin=0 marginwidth="0" marginheight="0" onLoad="MM_preloadImages('images/new1.gif','images/del1.gif')">
<div align="center">
<form id="frmWorkInfo" name="frmWorkInfo" action="WorkInfo.asp" method="post">
    <table width="600" height="360" background="images\bg.gif" class="title3" border="0" cellspacing="0" cellpadding="0">
      <tr> 
        <td align='right' height='30' bgcolor='#62b0ff' background='images\item2.gif'><a class='detail' onmouseover="this.className='red'" onmouseout="this.className='detail'" onClick='OpenNew("BasicInfo.asp");'>基本信息</a></td>
        <td rowspan="11" align="center">
		<table width=520 height="350" border="0" cellpadding="0" cellspacing="0">
		  <tr><td align="center" style="BORDER-RIGHT: 1px outset; BORDER-TOP: 1px outset; BORDER-LEFT: 1px outset; BORDER-BOTTOM: 1px outset">
		  	<table cellspacing="5" cellpadding="0" width="510" height="340" border="0" class="title2">
				<tr>
                    <td align="right" width="110" height="35">职工号:</td>
                    <td width="250" colspan="2"><input type=text id="txtEmpID" name="txtEmpID" style="width:150px" disabled></td><td width="150"></td></tr>
				<tr>
                    <td align="right" width="110">姓名:</td>

⌨️ 快捷键说明

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