www.gusucode.com > ASP+ACCESS在线人才招聘网(源代码+论文) > ASP+ACCESS在线人才招聘网(源代码+论文)\source_\company_per_toper.asp
<!--#include file="inc/conn.asp"--> <!--#include file="com_session.asp"--> <!--#include file="resultred.asp"--> <% per_id=Request("per_id") dim content,sql if per_id="" then resultred"意外出错,你可能不是在正常的方式下进入本页面" end if Set Rs=Server.CreateObject("Adodb.RecordSet") sql = "select * from job_com_per where ep_id=" & session("ep_id") &" and per_id="& per_id Rs.Open sql,conn,3,3 if not rs.eof then content=Rs("content") end if if Request("Submit1")<>"" then content=Request("content") if not rs.eof then Rs("content").value=content Rs.Update else Rs.addnew Rs("ep_id").value= session("ep_id") Rs("per_id").value= per_id Rs("content").value= content Rs.Update end if Rs.Close end if %> <html> <head> <title>发送招聘意向</title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <link rel="stylesheet" href="../inc/map028.css" type="text/css"> </head> <body bgcolor="#FFFFFF" text="#000000"> <%if Request("Submit1")="" then %> <form name="form1" method="post" action=""> <table width="378" border="0" cellspacing="1" cellpadding="0" height="153"> <tr> <td height="33" align="center" bgcolor="#AFD0E4">给个人发送招聘意向</td> </tr> <tr> <td align="left" valign="top"> <br> 你想说的话: <input type="hidden" name="per_id" value="<%=Request("per_id")%>"> </td> </tr> <tr> <td align="center" valign="top"> <textarea name="content" cols="50" rows="6" ><%=content%></textarea> </td> </tr> <tr> <td valign="middle" height="46" align="center"> <input type="submit" name="Submit1" value="提交"> <input type="submit" name="Submit2" value="关闭本窗口" onclick="javascript:window.close()"> </td> </tr> </table> </form> <%else%> <table width="378" border="0" cellspacing="1" cellpadding="0" height="153"> <tr> <td height="31" align="center" bgcolor="#AFD0E4">已经成功向该个人发送了招聘意向</td> </tr> <tr> <td valign="middle" height="16" align="center"> <input type="submit" name="Submit22" value="关闭本窗口" onClick="javascript:window.close()"> </td> </tr> </table> <% end if%> </body> </html>