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

📄 register.asp

📁 sdf
💻 ASP
字号:
<% Response.Buffer=True %>
<!--#include file="../inc/company.inc"-->
<!--#include file="../inc/html.inc"-->
<% uname=session("cuid")
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from company where uname='"&uname&"'"
rs.open sql,conn,1,1 %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../inc/register.css" type="text/css">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>矿大在线→人才招聘 →等录公司资料</title>
</head>
<SCRIPT language=JavaScript src="../inc/validate.js"></SCRIPT>
<SCRIPT language=JavaScript src="../inc/companyreg.js"></SCRIPT>
<FORM name=register action=register.asp method=post><body topmargin="0" leftmargin="0"> 
  <div align="center"> <center> 
    <table border="0" cellpadding="0" cellspacing="0" width="760" height="61" align="center">
      <tr> 
        <td width="760" height="18" valign="top" colspan="5" bgcolor="#396BA5"> 
            </td>
      </tr>
      <tr> 
        <td width="139" valign="top" bgcolor="#396BA5">   
          
        <div align="center"> 
          <table border="0" cellpadding="0" cellspacing="0" width="118" height="280">
            <tr> 
              <td width="100%" height="163" background="../images/PERSON.GIF" valign="top"> 
                <p align="center"><br>
				  <a href="../default.asp">返回首页</a><br>
				  <br>
                  <a href="main.asp">登录公司首页</a><br>
                  <br>
                  <a href="register.asp">登录/更新公司资料</a><br>
                  <br>
                  <a href="publish.asp">发布/更新招聘信息</a><br>
                  <br>
                  <a href="../changepwd.asp?stype=company" target="_blank">修改登录密码</a><br>
                  <br>
                  <a href="search.asp">全部求职列表</a> </td>
            </tr>
            <tr> 
              <td width="100%" height="117"   valign="top"> <p align="center"><br>
                  <br>
                  <a href="../exit.asp">退出登录</a> </td>
            </tr>
          </table>
        </div>
          
        <p align="center"><img src="../IMAGES/warning.gif" width="40" height="40"> 
      </td>
        
      <td width="31" height="325" valign="top">&nbsp;</td>
      </center>
        <td width="481" height="325">   
          <div align="left"> 
            <table border="1" cellpadding="0" cellspacing="0" width="94%" height="263" bordercolor="#FFFFFF" bordercolorlight="#FFFFFF" bordercolordark="#FFFFFF">
              <tr> 
                <td width="100%" height="18" valign="bottom" bgcolor="#C6CEDE" bordercolor="#000000" bordercolorlight="#000000" bordercolordark="#FFFFFF"> 
                  <p align="center">=== 公司详细资料 ===
                </td>
              </tr>
              <tr> 
                <td width="100%" height="20" valign="bottom"> &nbsp;用户名:<FONT COLOR="#FF0000"><%=uname%></FONT> &nbsp;</td>
              </tr>
              <tr> 
                <td width="100%" height="22" valign="bottom" bgcolor="#F3F3F3"> 
                  &nbsp;公司名称:
                  <%if rs("cname")<>"" then%>
                  <%=rs("cname")%>
                  <%else%>
                  <input type="text" name="cname" size="40" maxLength=40 value="<%=rs("cname")%>">
                  <%end if%>
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom"> 
                  <p align="left">&nbsp;所属行业:
                  <INPUT maxLength=8 
				  size=17 name=trade value="<%if rs("trade")<>" " then Response.Write(rs("trade"))%>">
             
                  </p>
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom" bgcolor="#F3F3F3"> 
                  &nbsp;企业性质:
                  <INPUT maxLength=8 
				  size=17 name=cxz value="<%if rs("cxz")<>" " then Response.Write(rs("cxz"))%>">
             
                  </B> </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom" bgcolor="#F3F3F3"> 
                  &nbsp;成立日期:
                  <input type="text" name="fdate" size="10" maxLength=10 value="<%=rs("fdate")%>">
                </td>
              </tr>
              
            
              <tr> 
                <td width="100%" height="28" valign="bottom" bgcolor="#F3F3F3"> 
                  &nbsp;通讯地址:
                  <input type="text" name="address" size="30" maxLength=40 value="<%=rs("address")%>">
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom"> &nbsp;邮政编码;<input type="text" name="zip" size="6" size="6" maxLength=6 value="<%=rs("zip")%>"> 
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom" bgcolor="#F3F3F3"> 
                  <p align="left">&nbsp;联系人:&nbsp; 
                    <input type="text" name="pname" size="20" maxLength=20 value="<%=rs("pname")%>">
                  </p>
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom"> &nbsp;联系电话:
                  <input type="text" name="phone" size="20" maxLength=40 value="<%=rs("phone")%>">
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom" bgcolor="#F3F3F3"> 
                  <p align="left">&nbsp;传真号码:
                    <input type="text" name="fax" size="20" maxLength=40 value="<%=rs("fax")%>">
                  </p>
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom"> &nbsp;电子信箱:
                  <input type="text" name="email" size="20" maxLength=40 value="<%=rs("email")%>">
                </td>
              </tr>
              <tr> 
                <td width="100%" height="28" valign="bottom" bgcolor="#F3F3F3"> 
                  &nbsp;公司网站:<input type="text" name="http" size="20" maxLength=40 
		   <% if rs("http") <>"" then%> value="<%=rs("http")%>" <%else%> value="http://"<%end if%>> 
                </td>
              </tr>
              <tr> 
                <td width="100%" valign="top"> 
                  <p align="center"><br>
                    公司简介:<br>
                    <br>
                    <%if rs("cname")<>"" then 
			  kjianj=replace(rs("jianj"),"<br>",chr(13))
              kjianj=replace(kjianj,"&nbsp;"," ")
			  else
			  kjianj="" %>
                    <%end if%>
                    <textarea rows="9" name="jianj" cols="62" style="background-color: #F3F3F3; color: #000060"><%=kjianj%></textarea>
                  </p>
                  <p align="center">
                    <input type="button" value="确 定" <%if rs("cname")<>"" then%>onClick="checkmod()"<%else%>onClick="check()"<%end if%>>
                    <br>
                    <br>
                  </p>
                </td>
              </tr>
            </table>
          </div>
        </td><center>
        <td width="1" height="325" valign="top" bgcolor="#00006A"></td>
        <td width="122" height="325" valign="top" bgcolor="#F3F3F3"> </td>
      </tr>
      <tr> 
        <td width="760" height="1" valign="top" colspan="5" bgcolor="#396BA5"> 
          <p align="center"> 
        </td>
      </tr>
    </table>
    
  </div>
</form>
</body>

</html>

<% pname=request("pname") 
if pname="" then Response.End
trade=request("trade")
cxz=request("cxz")
area=request("area")
fdate=request("fdate")
fund=request("fund")
cname=request("cname")
address=request("address")
zip=request("zip")
phone=request("phone")
fax=request("fax")
email=request("email")
http=request("http")
jianj=htmlencode2(request("jianj"))
if fund="" then fund="未知" end if
if cname="" then cname=rs("cname") end if
if fax="" then fax="未知" end if
if http="" then http="http://" end if
rs.close
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from company where uname='"&uname&"'"
rs.open sql,conn,3,3
rs("trade")=trade
rs("cxz")=cxz
rs("area")=area
rs("fdate")=fdate
rs("cname")=cname
rs("pname")=pname
rs("address")=address
rs("zip")=zip
rs("phone")=phone
rs("fax")=fax
rs("email")=email
rs("http")=http
rs("jianj")=jianj
rs.update
rs.close
Response.Redirect "main.asp" %>

⌨️ 快捷键说明

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