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

📄 update_chuku_certain.asp

📁 oracle9i程序事例集
💻 ASP
字号:
<%@LANGUAGE="VBSCRIPT" %>
<html>
<%
  dim conn
  dim connstr
  Set conn=Server.CreateObject("ADODB.Recordset")
  connstr="Driver={Microsoft ODBC for Oracle};server=mylink;uid=system;pwd=system;"
%>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>修改出库清单</title>
<style type="text/css">
<!--
.style1 {
	font-size: 24px;
	font-weight: bold;
	font-family: "黑体";
}
-->
</style>
<link href="../../MYDZSW/Css/bd_font_size.css" rel="stylesheet" type="text/css">
</head>

<body>
<%
  dim rs,sql
  set rs=server.CreateObject("adodb.recordset")
  sql="select * from GSCOTT.stock_management_table where sm_id='"&request.QueryString("id")&"'"
  rs.open sql,connstr,3,3
%>
<div align="center">
<center>
<form action="update_chuku_sav.asp?id=<%=request.querystring("id")%>" method="post">
<table width="515" height="500" border="0" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr>
    <td height="77" colspan="2" align="center" valign="middle"><span class="style1">请输入出库清单修改信息</span></td>
    </tr>
  <tr>
    <td width="205" height="27" align="right" valign="middle" class="bd_font_size">出库产品型号:</td>
    <td width="310" align="left" valign="middle">
	  &nbsp;
	  <select name="outPID" id="outPID">
              <%  
        sql="select distinct product_kindnum from GSCOTT.product_info_table"
        set rs1=server.CreateObject("adodb.recordset")
		rs1.open sql,connstr,1,1
		do while not rs1.eof
	  %>
              <option value="<%=rs1("product_kindnum")%>"><%=rs1("product_kindnum")%></option>
              <%
	    rs1.movenext
		loop
		rs1.close
	  %>
      </select></td>
    </tr>
  <tr>
    <td height="27" align="right" valign="middle" class="bd_font_size">销售项号:</td>
    <td align="left" valign="middle">
&nbsp;	<input name="salenum" type="text" id="salenum" maxlength="10" value="<%=rs("sm_salenum")%>">    </td>
  </tr>
  <tr>
    <td height="27" valign="middle" class="bd_font_size"><div align="right"> 出库地点:</div></td>
    <td align="left" valign="middle">
&nbsp;	<input name="Place" type="text" id="Place" maxlength="20" value="<%=rs("sm_outplace")%>">    </td>
    </tr>
  <tr>
    <td height="27" valign="middle" class="bd_font_size"><div align="right">出库日期:</div></td>
    <td align="left" valign="middle">
&nbsp;	<input name="Date" type="text" id="Date" value="<%=rs("sm_outdate")%>" maxlength="20">    </td>
  </tr>
  <tr>
    <td height="27" valign="middle" class="bd_font_size"><div align="right"> 出库数量:</div></td>
    <td align="left" valign="middle">
&nbsp;	<input name="Num" type="text" id="Num" maxlength="5" value="<%=rs("sm_outnum")%>"></td>
    </tr>
  <tr>
    <td height="27" valign="middle" class="bd_font_size"><div align="right"> 出库单价:</div></td>
    <td align="left" valign="middle">
&nbsp;	<input name="Price" type="text" id="Price" maxlength="8" value="<%=rs("sm_outprice")%>">    </td>
  </tr>
  <tr>
    <td height="27" valign="middle" class="bd_font_size"><div align="right"> 经手人:</div></td>
    <td align="left" valign="middle">
&nbsp;	<input name="Handle" type="text" id="Handle" maxlength="10" value="<%=rs("sm_handle")%>">    </td>
    </tr>
  <tr>
    <td height="27" valign="middle" class="bd_font_size"><div align="right">是否欠款: </div></td>
    <td align="left" valign="middle"><%=rs("sm_arrearage")%>
	  <% if rs("sm_arrearage")="是" then %>
	  <a href="qiankuan_certain.asp?id=<%=rs("sm_id")%>">欠款核销</a>
	  <% end if %>	</td>
  </tr>
  <tr>
    <td height="27" align="right" valign="middle" class="bd_font_size">欠款数量:</td>
    <td align="left" valign="middle">
&nbsp;	<input name="owenum" type="text" id="owenum" value="<%=rs("sm_num")%>" maxlength="13"></td>
    </tr>
  <tr>
    <td height="27" align="right" valign="middle" class="bd_font_size">信用时间:</td>
    <td align="left" valign="middle">
&nbsp;	<input name="ctime" type="text" id="ctime" value="<%=rs("sm_credittime")%>" size="5" maxlength="10">
      天</td>
  </tr>
  <tr>
    <td height="146" valign="top" class="bd_font_size"><div align="right">备注(可不填):</div></td>
    <td valign="top">
&nbsp;	<textarea name="Remark" cols="40" rows="10" id="Remark"><%=rs("sm_remark")%></textarea></td>
  </tr>
  <tr align="center" valign="middle">
    <td height="27" colspan="2"><input type="submit" name="Submit" value="确定">
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
      <input name="Reset" type="reset" id="Reset2" value="重置"></td>
  </tr>
  <tr align="right" valign="middle" class="bd_font_size">
    <td height="27" colspan="2"><a href="javascript:history.go(-1)">返回上一页</a></td>
    </tr>
  <tr>
    <td height="18">&nbsp;</td>
    <td>&nbsp;</td>
    </tr>
</table>
</form>
</center>
</div>
</body>
</html>

⌨️ 快捷键说明

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