📄 teacher_register3_5.asp
字号:
<!-- Created: 2001-06-03 0:31:16 -->
<HTML>
<HEAD>
<META NAME="GENERATOR" Content="ASP Express 1.9">
<TITLE>教工资料注册</TITLE>
<STYLE type=text/css>
TD,p,b,font,pre,BODY {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px
}
FORM {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px; MARGIN-BOTTOM: 0px; MARGIN-TOP: 0px
}
A {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 12px; TEXT-DECORATION: none
}
H4 {
FONT-FAMILY: "Verdana", "Arial", "Helvetica", "sans-serif", "宋体"; FONT-SIZE: 14px
}
HR {
COLOR: #000000; HEIGHT: 1px
}
</STYLE>
</HEAD>
<BODY>
<%
function change(s)
change = replace(replace(s, "'","''"),"""","""""")
end function
%>
<%
dim t5_workcard,t5_name,t5_thesis,t5_publishdate,t5_xth,t5_publishmagazine,t5_grade,t5_note,rs
t5_workcard=change(request.form("t5_workcard"))
t5_name=change(request.form("t5_name"))
t5_thesis=change(request.form("t5_thesis"))
t5_publishdate=change(request.form("t5_publishdate"))
t5_xth=change(request.form("t5_xth"))
t5_publishmagazine=change(request.form("t5_publishmagazine"))
t5_grade=change(request.form("t5_grade"))
%>
<%
set conn = server.createobject("adodb.connection")
conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & server.mappath("./math_department.mdb")
Set rs=Server.CreateObject("ADODB.RecordSet")
rs.open"thesis_inf",conn,1,3
rs.addnew
rs("工作证号")=t5_workcard
rs("姓名")=t5_name
rs("论文名称")=t5_thesis
rs("日期")=t5_publishdate
rs("第几作者")=t5_xth
rs("杂志")=t5_publishmagazine
rs("级别")=t5_grade
rs("备注")=t5_note
rs.update
rs.close
%>
<%
response.Write "资料成功录入。<p>"
response.Write date() & "<p>"
%>
<table border="0" width="100%">
<tr>
<td width="56%">
<hr>
</td>
<td width="44%"></td>
</tr>
<tr>
<td width="56%"><a href="teacher_register2_5.htm">教工发表论文情况录入系统----进入</a></td>
<td width="44%"></td>
</tr>
<tr>
<td width="56%"><a href="student_register1.htm">教工资料录入总系统-----------进入</a></td>
<td width="44%"></td>
</tr>
<tr>
<td width="56%">
<hr>
</td>
<td width="44%"></td>
</tr>
</table>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -