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

📄 selfcheck_publish.asp

📁 北京华信东方网络办公系统
💻 ASP
字号:
<%@ Language=VBScript %>
<!--#include file= "../dbase.asp"-->
<!--#include file= "../function.asp"-->
<!--#include file= "../department/department_function.asp"-->
<html>
	<head>
		<meta name="vs_targetSchema" content="http://schemas.microsoft.com/intellisense/ie5">
		<meta name="GENERATOR" Content="Microsoft Visual Studio.NET 7.0">
		<link href="../mstyle.css" rel="stylesheet" type="text/css">
	
</head>
	<body bgcolor="#f1f1f1">
		<form action="selfcheck_deal.asp?way=AddNew" method="post" name="Form1" LANGUAGE="javascript" onsubmit="return Form1_onsubmit();" >
			<table width="500" border="0" align="center" cellpadding="0" cellspacing="0">
				<tr>
					
      <td width="60%" height="35" align="center" valign="middle"><b><font size="+1" face="楷体_GB2312, 宋体, 隶书, 黑体">自 
        检 报 告 发 布</font></b></td>
				</tr>
				<tr>
					<td height="22" align="left"><p> 
          <strong>报告主题:</strong>
		  <input name="SCTitle" type="text" id="SCTitle" style="width: 400px; font-size: 9pt; " maxlength="200">
          <br>
          (必填) 工程督导-工程名称-工程号-自检日期(****-**-**)-软件/硬件自检表 </p>
       </td>
				</tr>
				<tr>
					<td height="22" align="left"><p><strong>工 程 号:</strong> 
          <input name="SCProjectCode" type="text" id="SCProjectCode" style="width: 400px; font-size: 9pt; " maxlength="50">
          <br>
          (必填) </p></td>
				</tr>
				<tr>
					<td height="22" align="left"><p><strong>合 同 号:</strong> 
          <input name="SCPactCode" type="text" id="SCPactCode" style="width: 400px; font-size: 9pt; " maxlength="50">
          <br>
          (可选)</p></td>
				</tr>
				<tr>
					<td height="22" align="left"><p><strong>产品类型:</strong><%
								if request("UserID")="" then
								UserID=Session("UID")
								else
								UserID=request("UserID")
								end if
								selfcheckKindTemp=userRight("t_selfcheckKind",UserID)%>
								<select name="SCKind" id="SCKind" >
                <%if not isnull(selfcheckKindTemp) then
										selfcheckKind=split(selfcheckKindTemp(0,0),",")
										for i= 0 to ubound(selfcheckkind)
		Response.Write("<option value='"&selfcheckkind(i)&"' >"&selfcheckkind(i)&"</option>")
			next
			end if
	  %>
              </select><br>
          (必选) 如果所负责的类型有多个,请选择相应的类型</p></td>
				</tr>
				<tr>
					<td height="22" align="left"><p><strong>得&nbsp; &nbsp; 分:</strong> 局点
<input name="SCObject" type="text" id="SCObject" style="width: 100px; font-size: 9pt; " maxlength="50">
<br>(必填)    软件得分<select name="SCSoftScore" id="SCSoftScore" style="width: 60px">
			<option value='0'>0</option><%for i= 1 to 50 
		  response.Write("<option value='"&(i-0.5)&"'>"&(i-0.5)&"</option>")
		  response.Write("<option value='"&i&"'>"&i&"</option>")
		  next%>
		  </select>
		  硬件得分<select name="SCHardScore" id="SCHardScore" style="width: 60px">
		  			<option value='0'>0</option><%for i= 1 to 40 
		  response.Write("<option value='"&(i-0.5)&"'>"&(i-0.5)&"</option>")
		  response.Write("<option value='"&i&"'>"&i&"</option>")
		  next%>
		  </select>
		  满 意 度<select name="SCSatisfyScore" id="SCSatisfyScore" style="width: 60px">
			<option value='0'>0</option>
		  <%for i= 1 to 10 
		  response.Write("<option value='"&(i-0.5)&"'>"&(i-0.5)&"</option>")
		  response.Write("<option value='"&i&"'>"&i&"</option>")
		  next%>
		  </select>
</p>
          </td>
				</tr>
				<tr>
					<td align="left">
					<p><strong>附件选择:</strong> 
          <INPUT type="text" ID="Accessories" NAME="Accessories" style="width:300px" readonly><INPUT type="button" value="选" onclick="MM_openBrWindow('fj.asp','fj','width=450,height=300')"><INPUT type="button" value="清" onclick="Accessories.value='';"><br>
(可选)</p>
		</td>
				</tr>
								<tr>
					<td height="23" align="left"><p>
					<strong>备注信息:</strong><br>
					<textarea name="SCContent" wrap="soft" id="SCContent" style="width: 470px; height: 100px; font-size: 9pt; "></textarea></p></td>
				</tr>
				<tr>
					<td height="30" align="center">
					<input id="ShowOfferManY" name="ShowOfferMan" type="hidden" value="y"> <input type="submit" value=" 发 布 "> <input type="reset" value=" 重 置 "></td>
				</tr>
			</table>
		</form>
	</body>
</html>

<script language="JavaScript">
<!--
function Form1_onsubmit() {
	if(window.Form1.SCTitle.value == ''){
		alert('报告主题 不能为空');
		window.Form1.SCTitle.focus();
		return false;
		}
	else if (window.Form1.SCProjectCode.value  == ''){
	   alert('工程号 不能空');
		window.Form1.SCProjectCode.focus();
		return false;
		}
	else if (window.Form1.SCObject.value  == ''){
	   alert('局点 不能为空');
	   window.Form1.SCObject.focus();
		return false;
		}
	else return true;		
}

function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</script>

⌨️ 快捷键说明

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