?? staff_add.asp
字號(hào):
<!-- #include file="Include/Chk.asp" -->
<!-- #include file="Conn.asp" -->
<%
if Request.QueryString("Action")="add" then
dim bid,name,sid,cate,dep,source,bs,sj,cname
bid= Trim(Request.Form("bid"))
name= Trim(Request.Form("name"))
cate= Trim(Request.Form("cate"))
dep= Trim(Request.Form("dep"))
source= Trim(Request.Form("source"))
bs= Trim(Request.Form("bs"))
sj= Trim(Request.Form("sj"))
cname= Trim(Request.Form("cname"))
if bid="" or name="" or sid="" or cate="" or dep="" or source="" or bs="" or sj="" or cname="" then
Response.Write "<script language='javascript'>alert('帶*號(hào)的必須填寫!');history.go(-1);</script>"
Response.End()
else
set rs2=server.createobject("Adodb.Recordset")
SQL2="Select * from Staff where bid='"&bid&"'"
rs2.open SQL2,conn,1,1
if not rs2.eof then
rs2.Close
Set rs2=Nothing
Response.Write "<script language='javascript'>alert('系統(tǒng)中已存在您輸入的證書編號(hào)!');history.go(-1);</script>"
Response.End()
else
rs2.Close
Set rs2=Nothing
end if
end if
SQL="Select * from Staff"
set rs=server.createobject("Adodb.Recordset")
rs.open SQL,conn,1,3
rs.AddNew
rs("bid")=bid
rs("name")=name
rs("sid")=sid
rs("cate")=cate
rs("dep")=dep
rs("source")=source
rs("bs")=bs
rs("sj")=sj
rs("cname")=cname
rs.Update
rs.Close
Set rs=Nothing
Response.Write "<script language='javascript'>alert('成功添加了一條證書記錄 !');document.location.href('Staff_Manage.asp');</script>"
Response.End()
end if
%>
<!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="Images/default.css" rel="stylesheet" type="text/css" />
</head>
<body>
<form id="form1" name="form1" method="post" action="?Action=add">
<table width="100%" border="0" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td height="24" colspan="2"><table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="82" height="24" align="center" valign="middle" background="Images/t_1.gif" class="AddGoods"><a href="#">添加證書信息</a></td>
<td width="1" align="center" valign="middle"></td>
<td width="88" height="24" align="center" valign="bottom" class="AddGoods"><table width="88" height="22" border="0" cellpadding="0" cellspacing="0">
<tr>
<td align="center" valign="middle" background="Images/t_2.gif"><a href="Staff_Manage.asp" class="AddGoods">管理證書信息</a></td>
</tr>
</table></td>
<td> </td>
</tr>
</table></td>
</tr>
<tr>
<td height="5" colspan="2" background="Images/topnav.gif"></td>
</tr>
<tr>
<td height="5" colspan="2"></td>
</tr>
<tr>
<td width="11%" height="25" align="right" valign="middle" bgcolor="#efefef">證書編號(hào)：</td>
<td width="89%" height="25" align="left" valign="middle">
<input name="bid" type="text" id="bid" size="15" maxlength="15" style="ime-mode:disabled"/>
* 不能與現(xiàn)有記錄重復(fù)，1-15位數(shù)字</td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">學(xué)員姓名：</td>
<td height="25" align="left" valign="middle">
<input name="name" type="text" id="name" size="15" maxlength="5" />
* 不能超過5個(gè)字 </td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">身份證號(hào)：</td>
<td height="25" align="left" valign="middle">
<input name="sid" type="text" id="sid" size="15" maxlength="18" style="ime-mode:disabled" />
* 必須為數(shù)字</td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">認(rèn)證專業(yè)：</td>
<td height="25" align="left" valign="middle">
<input name="dep" type="text" id="dep" size="15" maxlength="20" />
* 不能超過20個(gè)字</td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">證書名稱：</td>
<td height="25" align="left" valign="middle">
<input name="cname" type="text" id="cname" size="15" maxlength="20" />
* 不能超過20個(gè)字</td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">證書類別：</td>
<td height="25" align="left" valign="middle">
<select name="Cate" id="Cate">
<%
set fs=server.createobject("adodb.recordset")
fs.open "select * from Cate",conn,1,1
If fs.RecordCount=0 Then
Response.Write "<option value=''>未設(shè)置證書類別</option>"
Else
Do While Not fs.EOF
%>
<option value="<%=Trim(fs("id"))%>"><%=Trim(fs("Catename"))%></option>
<%
fs.MoveNext
Loop
End If
fs.Close
Set fs=nothing
%>
</select>
*</td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">總 成 績(jī)：</td>
<td height="25" align="left" valign="middle">
<input name="source" type="text" id="source" size="15" maxlength="10" style="ime-mode:disabled" />
* </td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">筆試成績(jī)：</td>
<td height="25" align="left" valign="middle">
<input name="bs" type="text" id="bs" size="15" maxlength="10" style="ime-mode:disabled" />
* </td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef">上機(jī)成績(jī)：</td>
<td height="25" align="left" valign="middle">
<input name="sj" type="text" id="sj" size="15" maxlength="10" style="ime-mode:disabled" />
* </td>
</tr>
<tr>
<td height="25" align="right" valign="middle" bgcolor="#efefef"> </td>
<td height="25" align="left" valign="middle">
<input type="submit" name="Submit" value="添 加" />
<span class="C_Title">帶
* 的項(xiàng)目為必填內(nèi)容</span> </td>
</tr>
</table>
</form>
</body>
</html>
?? 快捷鍵說明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -