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

📄 provider_edit.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>
<%
dim pro_id,sql
pro_id=request("id")
sql="select * from provider where provider_id = "&pro_id&" "
rs.open sql,conn
%>
<body topmargin="0" leftmargin="0" bgcolor=#468ea3>
<br><br>
<form method="POST" action="save_provider.asp?id=<%=request("id")%>&action=edit">
<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" value=<%=rs("provider_name")%>></td>
      </tr>
      <tr>
        <td width="80" height="19">公司地址:</td>
        <td  colspan="5" width="536" height="19"><input type="text" name="address_provider&shy;" size="70" value=<%=rs("provider_address")%>></td>
      </tr>
      <tr>
        <td width="80" height="18">公司性质:</td>
        <td width="124" height="18" >
		<select size="1" name="kind">
<%
kind=rs("provider_kind")
if kind<>"" then
sql2="select * from kind where kind_id = "&kind&" "
rs2.open sql2,conn
%>
		<OPTION selected value="<%=rs2("kind_id")%>"><%=rs2("kind_name")%></OPTION>
<%
    rs2.close
else
end if

	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">
        <%
size=rs("provider_size")
if size<>"" then
sql3="select * from size where size_id = "&size&" "
rs3.open sql3,conn
%>
		<OPTION selected value="<%=rs3("size_id")%>"><%=rs3("size_name")%></OPTION>
<%
    rs3.close
    else
    end if
	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">
        <%
trade=rs("provider_trade")
if trade<>"" then
sql4="select * from trade where trade_id = "&trade&" "
rs4.open sql4,conn
%>
		<OPTION selected value="<%=rs4("trade_id")%>"><%=rs4("trade_name")%></OPTION>
<%
    rs4.close
    else
    end if
	sql4 = "select * from corner "
	rs4.open sql4,conn
While (NOT rs4.EOF)
%>
<OPTION value="<%=rs4("corner_id")%>"><%=rs4("corner_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="principal" size="15" value=<%=rs("provider_principal")%>></td>
        <td width="73" height="19" >区&nbsp;&nbsp;&nbsp; 域:</td><td width="70">
		<select size="1" name="corner">
<%
corner=rs("corner_id")
if corner<>"" then
sql5="select * from corner where corner_id = "&corner&" "
rs5.open sql5,conn
%>
		<OPTION selected value="<%=rs5("corner_id")%>"><%=rs5("corner_name")%></OPTION>
<%
    rs5.close
    else
    end if
	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" value=<%=rs("provider_post")%>></td>
      </tr>
      <tr>
        <td width="80" height="19">电&nbsp;&nbsp;&nbsp; 话:</td>
        <td width="124" height="19" ><input type="text" name="phone" size="15" value=<%=rs("provider_phone")%>></td>
        <td width="73" height="19" >分&nbsp;&nbsp;&nbsp; 机:</td>
        <td width="70" height="19" ><input type="text" name="extension" size="8" value=<%=rs("provider_extension")%>></td>
        <td width="72" height="19" >传&nbsp;&nbsp;&nbsp; 真:</td>
        <td width="193" height="19" ><input type="text" name="fax" size="8" value=<%=rs("provider_fax")%>></td>
      </tr>
      <tr>
        <td width="80" height="19" >联 系 人:</td>
        <td width="124" height="19" ><input type="text" name="linkman" size="15"  value=<%=rs("provider_linkman")%>></td>
        <td width="73" height="19" >性&nbsp;&nbsp;&nbsp; 别:</td>
<%
if rs("provider_sex")=true then
sex="男"
else
sex="女"
end if
%>
<td width="73" height="19" >
        <select size="1" name="sex">
		<OPTION selected value="<%=rs("provider_sex")%>"><%=sex%></OPTION>
        <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" value=<%=rs("provider_function")%>></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" value=<%=rs("provider_www")%>></td>
        <td width="70" height="19" >E-mail:</td>
        <td  colspan="2" width="266" height="19"><input type="text" name="mail" size="31"  value=<%=rs("provider_mail")%>></td>
      </tr>
      <tr>
        <td width="80" height="19" >开 户 行:</td>
        <td  colspan="2" width="198" height="19"><input type="text" name="bank" size="26" value=<%=rs("provider_bank")%>></td>
        <td width="70" height="19" >账&nbsp; 号:</td>
        <td colspan="2" width="266" height="19"><input type="text" name="account" size="31" value=<%=rs("provider_accounts")%>></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" ><%=rs("provider_operation")%></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>
</form>
<!--#include file="../copyright.asp"-->

⌨️ 快捷键说明

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