📄 jladd.asp
字号:
<%
'网络022班孙超的毕业设计
'网络022班孙超的毕业设计
dim name,comid
name = Request("com")
comid = Request("comid")
%>
<HTML>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<style type="text/css">
<!--
.style1 {font-size: 14px}
.style2 {font-size: 16px}
-->
</style>
<BODY BGCOLOR="LightYellow">
<!-- #include file="../conn.asp" -->
<%
if session("user")="" then
Response.write("<center>使用错误,请先登陆")
Response.End
end if
%>
<%
dim rs,rs1,sql
Set rs=Server.CreateObject("Adodb.RecordSet")
sql="select * from jl"
rs.Open sql,conn,1,3
ID = Session("id")
set Rs1 = Conn.Execute("select * from userinfo where user='"&session("user") &"'")
if rs1.eof then
Response.write("<center>您还没有登记资料,不能操作,请先登记资料!")
Response.End
end if
dim add
Set add = Conn.Execute("Select user,com from jl where com='"&Request.QueryString("com")&"' and user='"&session("user")&"'")
If Not add.Eof then
response.write " <html><head><link rel='stylesheet' href='style.css'></head><body>"
response.write " <br><br><br>"
response.write " <table align='center' width='300' border='0' cellpadding='4' cellspacing='0' class='border'>"
response.write " <tr > "
response.write " <td class='title' colspan='2' height='15'> "
response.write " <div align='center'><span class='style1'>您已经投递过了!</span></div>"
response.write " </td>"
response.write " </tr>"
response.write " <tr> "
response.write " <td class='tdbg' colspan='2' height='23'> "
response.write " <div align='center'><br><br>"
response.write " <span class='style1'>请选择新的单位!!!</span><br><br>"
response.write " <a href='javascript:onclick=history.go(-1)'><span class='style2'>返回</span></a>"
response.write " <br><br></div></td>"
response.write " </tr></table></body></html>"
Response.End
End If
RS.AddNew Array("com", "user", "userid","comid","time"), _
Array(name, Session("user"), session("id"),comid,Now())
RS.Update
'关闭数据库连接并释放对象
RS.Close
Set RS = Nothing
Conn.Close
Set Conn = Nothing
%>
<CENTER>
<P class="style1">此人已经成功录用
<P>
<P class="style1">返回查看录用统计情况</P>
</CENTER>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -