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

📄 compedit.asp

📁 本程序所有数据库文件都以.sql文件保存在Database文件夹里； 2、首先在SQL查询分析器中运行CreateDatabase.sql文件创建数据库； 3、运行其他所有的.sql文件即可创建好了本
💻 ASP
字号:
🔍 
<!--#include file="isUser.asp"-->
<html>
<head>
<title>编辑企业信息</title>
<link rel="stylesheet" href="../style.css">
<Script Language="JavaScript">
// 域校验
function CheckFlds(){
if (document.form1.company.value==""){
   alert("请输入公司名称！");
   form1.company.focus;
   return false;
 } 
return true;
}
</Script>
</head>
<%
  Set rs = Server.CreateObject("ADODB.RECORDSET")
  sql = "Select * From Person Where UserName='" & Session("user_id") & "'"
  rs.Open sql, Conn, 1, 3
%>
<body topmargin=0 leftmargin="2">
<form name="form1" method="POST" action="CompSave.asp" onsubmit="return CheckFlds()">
  <table border="1" cellspacing="0" width="100%" bordercolor="#64B9E1" bordercolorlight="#64B9E1" bordercolordark="#FFFFFF">
    <tr>
      <td bgcolor="#CEE7FF">用户名</td>
      <td width="80%" colspan=3><%=rs("Cname")%></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">公司名称</td>
      <td colspan=3><input type="text" name="company" size="50" value="<%=rs("Company")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">类型</td>
      <td><select name="type"> 
       <option selected value="<%=rs("Type")%>"><%=rs("Type")%></option>
        <option value="外资企业">外资企业</option>
        <option value="国有企业">国有企业</option>
        <option value="民营企业">民营企业</option>
        <option value="合资企业">合资企业</option>
      </select>
      </td>
      <td bgcolor="#CEE7FF">成立时间</td>
      <td><input type="text" name="formdate" size="20" value="<%=rs("FormTime")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">联系人</td>
      <td><input type="text" name="contactor" size="20" value="<%=rs("Contactor")%>"></td>
      <td bgcolor="#CEE7FF">员工人数</td>
      <td><input type="text" name="emplnum" size="20" value="<%=rs("EmplNum")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">省份</td>
      <td><input type="text" name="location" size="20" value="<%=rs("Location")%>"></td>
       <td bgcolor="#CEE7FF">Email</td>
      <td><input type="text" name="email" size="20" value="<%=rs("Email")%>"></td>
   </tr>
    <tr>
      <td bgcolor="#CEE7FF">电话</td>
      <td><input type="text" name="telephone" size="20" value="<%=rs("Telephone")%>"></td>
      <td bgcolor="#CEE7FF">传真</td>
      <td><input type="text" name="fax" size="20" value="<%=rs("Fax")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">联系地址</td>
      <td colspan=3><input type="text" name="address" size="50" value="<%=rs("Address")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">邮政编码</td>
      <td colspan=3><input type="text" name="zipcode" size="20" value="<%=rs("ZipCode")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">HTTP网址</td>
      <td colspan=3><input type="text" name="http" size="50" value="<%=rs("Http")%>"></td>
    </tr>
    <tr>
      <td bgcolor="#CEE7FF">公司简介</td>
      <td colspan=3><textarea rows="4" name="introduce" cols="50"><%=rs("Introduce")%></textarea></td>
    </tr>
  </table>
  <p align="center"><input type="submit" value=" 提 交 " name="B1">
  <input type="reset" value=" 重 写 " name="B2"></p>
</form>
</body>
</html>

⌨️ 快捷键说明

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