all_ruku_detail.asp

来自「oracle9i程序事例集」· ASP 代码 · 共 86 行

ASP
86
字号
<%@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="../../Css/bd_font_size.css" rel="stylesheet" type="text/css">
</head>

<body background="../img/allbg.gif">
<%
  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,1,1
%>
<div align="center">
<center>
<table width="582" height="450"border="0" cellpadding="0" cellspacing="0">
  <!--DWLayoutTable-->
  <tr bgcolor="#0281FF">
    <td height="77" colspan="2" align="center" valign="middle"><span class="style1">入库清单详细信息</span></td>
    </tr>
  <tr>
    <td width="218" height="27" align="right" valign="middle" bgcolor="#ACD6FF" class="bd_font_size">入库产品编号:</td>
    <td width="364" align="center" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><%=rs("sm_inpid")%></td>
    </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#4AA5FF" class="bd_font_size">入库类型:</td>
    <td align="center" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><%=rs("sm_intype")%></td>
  </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><div align="right"> 入库地点:</div></td>
    <td align="center" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><%=rs("sm_inplace")%></td>
    </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><div align="right">入库日期:</div></td>
    <td align="center" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><%=rs("sm_indate")%></td>
  </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><div align="right"> 入库数量:</div></td>
    <td align="center" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><%=rs("sm_innum")%></td>
    </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><div align="right"> 入库单价:</div></td>
    <td align="center" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><%=rs("sm_inprice")%></td>
  </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><div align="right"> 经手人:</div></td>
    <td align="center" valign="middle" bgcolor="#ACD6FF" class="bd_font_size"><%=rs("sm_handle")%></td>
    </tr>
  <tr>
    <td height="27" align="right" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><div align="right">备注(可不填):</div></td>
    <td align="center" valign="middle" bgcolor="#4AA5FF" class="bd_font_size"><%=rs("sm_remark")%></td>
  </tr>
  <tr bgcolor="#ACD6FF" class="bd_font_size">
    <td height="57" colspan="2" align="right" valign="middle"><a href="../change_model/update_ruku.asp?id=<%=request.QueryString("id")%>">修改</a>&nbsp;&nbsp;<a href="../change_model/del_ruku_certain.asp?id=<%=request.QueryString("id")%>">删除</a>&nbsp;&nbsp;<a href="javascript:window.close()">关闭窗口</a></td>
    </tr>
  <tr>
    <td height="100">&nbsp;</td>
    <td>&nbsp;</td>
    </tr>
</table>
</center>
</div>
</body>
<%
  rs.close
  set rs=nothing
%>
</html>

⌨️ 快捷键说明

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