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

📄 editok.asp

📁 林林网络招聘系统(源码+毕业论文+开题报告)使用ASP技术,数据库使用Access,不错的网络招聘系统
💻 ASP
字号:
<%
'毕业设计:林林在线网络招聘系统
'毕业设计:林林在线网络招聘系统
  dim name,com,want1,want2,phone,id,email,addr,introduce,classid
  name = Request("comname")   
  com = Request("user")   
  want1 = Request("want1") 
  want2 = Request("want2")  
  phone = Request("phone")
  id = Request("id")
  email = Request("email")
  addr = Request("addr")
  introduce = Request("introduce")
  classid = Request("classid")
%>
<HTML>
<style type="text/css">
<!--
.style1 {font-size: 14px}
.style3 {color: #FF0000}
-->
</style>
  <BODY BGCOLOR="LightYellow">
    <!-- #include file="conn.asp" -->
	<%
if session("user")="" then
      Response.write("<center>使用错误,请先登陆")  
      Response.End
end if
%>
    <%
    '新增记录	
    dim rs,cid,sql
    Set rs=Server.CreateObject("Adodb.RecordSet")   
    sql="select * from cominfo where com='"&session("user")&"'"   
    rs.Open sql,conn,1,3
	
	if request.Form("comname")="" or request.Form("addr")="" or request.Form("want1")="" or request.Form("phone")="" or _
	request.Form("introduce")="" then
		Response.write "<CENTER><P><span class='style2'>带 <span class='style3'>*</span> 都不能为空!</span></p>" & _
		"<P><a href='javascript:onclick=history.go(-1)'><span class='style2'>返回</span></a></P></CENTER>" 
		Response.End
        end if
		
	RS.Move cid=("select comid from cominfo where com='"&session("user")&"'")
    RS.Update Array("comname", "addr","want1","want2","time","email","phone","introduce","classid"), _
              Array(name,addr,want1,want1,Now(),email,phone,introduce,classid)  
       
    '关闭数据库连接并释放对象
    RS.Close         
    Set RS = Nothing 
    Conn.Close         
    Set Conn = Nothing 
    %>
    <CENTER>
    <P class="style1"><span class="style3">*</span>修改资料成功<span class="style3">*</span><br>
    <P class="style1">返回</P>
    </CENTER>                                                                               
  </BODY>
</HTML>

⌨️ 快捷键说明

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