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

📄 provider_add.asp

📁 oa办公系统asp程序
💻 ASP
字号:
<!--#include file="../title.asp"-->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title></title>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<link rel="stylesheet" type="text/css" href="../css/css.css">
</head>

<body topmargin="0" leftmargin="0" bgcolor=#468ea3>
<br><br>
<form method="POST" action="save_provider.asp?action=add" >
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1" height="371">
  <tr>
    <td align="center" valign="top" height="371" >
    <table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="619" id="AutoNumber2" height="272">
        <tr>
    <td colspan="6" height="48" width="617">
    <p align="center"><b><font size="7">客户资料卡</font></b>
    </td>
  </TR>
      <tr>
        <td width="80" height="19">公司名称:</td>
        <td colspan="5" width="536" height="19">

<input type="text" name="name_provider" size="70"></td>
      </tr>
      <tr>
        <td width="80" height="19">公司地址:</td>
        <td  colspan="5" width="536" height="19">
        <input type="text" name="address_provider" size="70"></td>
      </tr>
      <tr>
        <td width="80" height="18">公司性质:</td>
        <td width="124" height="18" >
<select size="1" name="kind">
<%
	sql2 = "select * from kind "
	rs2.open sql2,conn
While (NOT rs2.EOF)
%>
<OPTION value=<%=rs2("kind_id")%>><%=rs2("kind_name")%></OPTION>

<%
  rs2.MoveNext()
Wend
If (rs2.CursorType > 0) Then
  rs2.MoveFirst
Else
  rs2.Requery
End If
rs2.close
%>
</select></td>
        <td width="73" height="18" >公司规模:</td>
        <td width="70" height="18" >
<select size="1" name="size">
<%
	sql3 = "select * from size "
	rs3.open sql3,conn
While (NOT rs3.EOF)
%>
<OPTION value="<%=rs3("size_id")%>"><%=rs3("size_name")%></OPTION>

<%
  rs3.MoveNext()
Wend
If (rs3.CursorType > 0) Then
  rs3.MoveFirst
Else
  rs3.Requery
End If
rs3.close
%>
</select></td>
        <td width="72" height="18" >行业分类:</td>
        <td width="193" height="18" >
<select size="1" name="trade">
<%
	sql4 = "select * from trade "
	rs4.open sql4,conn
While (NOT rs4.EOF)
%>
<OPTION value="<%=rs4("trade_id")%>"><%=rs4("trade_name")%></OPTION>

<%
  rs4.MoveNext()
Wend
If (rs4.CursorType > 0) Then
  rs4.MoveFirst
Else
  rs4.Requery
End If
rs4.close
%>
</select></td>
      </tr>
      <tr>
        <td width="80" height="19">负 责 人:</td>
        <td width="124" height="19" ><input type="text" name="linkman" size="15"></td>
        <td width="73" height="19" >区&nbsp;&nbsp;&nbsp; 域:</td><td width="70">


<select size="1" name="corner">
<%
	sql5 = "select * from corner "
	rs5.open sql5,conn
While (NOT rs5.EOF)
%>
<OPTION value="<%=rs5("corner_id")%>"><%=rs5("corner_name")%></OPTION>

<%
  rs5.MoveNext()
Wend
If (rs5.CursorType > 0) Then
  rs5.MoveFirst
Else
  rs5.Requery
End If
rs5.close
%>
</select>
        </td>
        <td width="72" height="19" >邮&nbsp;&nbsp;&nbsp; 编:</td>
        <td width="193" height="19" >
   <input type="text" name="post" size="8"></td>
      </tr>
      <tr>
        <td width="80" height="19">电&nbsp;&nbsp;&nbsp; 话:</td>
        <td width="124" height="19" ><input type="text" name="phone" size="15"></td>
        <td width="73" height="19" >分&nbsp;&nbsp;&nbsp; 机:</td>
        <td width="70" height="19" ><input type="text" name="extonsion" size="8"></td>
        <td width="72" height="19" >传&nbsp;&nbsp;&nbsp; 真:</td>
        <td width="193" height="19" ><input type="text" name="fax" size="8"></td>
      </tr>
      <tr>
        <td width="80" height="19" >联 系 人:</td>
        <td width="124" height="19" ><input type="text" name="linkman" size="15"></td>
        <td width="73" height="19" >性&nbsp;&nbsp;&nbsp; 别:</td>
<td width="73" height="19" >
        <select size="1" name="sex">
        <option value="true">男</option>
        <option value="false">女</option>
</select>
        </td>
         <td width="70" height="19" >职&nbsp;&nbsp;&nbsp; 务:</td>
        <td width="72" height="19" ><input type="text" name="function" size="8"></td>
      </tr>

      <tr>
        <td width="80" height="19" >网&nbsp;&nbsp;&nbsp; 址:</td>
        <td  colspan="2" width="198" height="19"><input type="text" name="www" size="26"></td>
        <td width="70" height="19" >E-mail:</td>
        <td  colspan="2" width="266" height="19"><input type="text" name="mail" size="31"></td>
      </tr>
      <tr>
        <td width="80" height="19" >开 户 行:</td>
        <td  colspan="2" width="198" height="19"><input type="text" name="bank" size="26"></td>
        <td width="70" height="19" >账&nbsp; 号:</td>
        <td colspan="2" width="266" height="19"><input type="text" name="accounts" size="31"></td>
      </tr>
      <tr>
        <td width="617" colspan="6" height="12">主要业务:</td>
      </tr>
      <tr>
        <td width="617" colspan="6" height="51">
        <textarea rows="3" name="operation" cols="79" ></textarea></td>
      </tr>
    </table>
    <table>
    <tr><br>
    <td><input type="submit" value="提交" name="B1">&nbsp;
    <input type="reset" value="重置" name="B1">

    </td>
    </tr>
    </table>
    </td>
  </tr>
</table>
</from>
</body>

<!--#include file="../copyright.asp"-->

⌨️ 快捷键说明

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