?? siainsearch.asp
字號:
<%@language=vbscript%>
<%
response.buffer=true
Response.Expires = 0
Response.CacheControl = "Private"
%>
<%'On Error Resume Next%>
<%const title="入庫報告查詢"%>
<!-- #include file=../data/username.inc-->
<!-- #include file=../data/connect.asp-->
<!--#include file=../data/myPrg.asp-->
<!-- #include file=../data/flag.inc-->
<html>
<head>
<title><%=title%></title>
<link rel=stylesheet type=text/css href=../data/forum.css>
<meta http-equiv="Content-Type"content="text/html; charset=gb_2312-80">
<%
if flag = 6 then
elseif flag < 4 then
sql = "select prod_id,prod_no,prod_type,prod_danwei,prod_flag,prod_pinming from product where prod_companyid = "&newcompanyid&" and prod_disabled = 0 and prod_dir_flag = 0 order by prod_no asc"
sql2 = "select distinct prod_type,prod_flag from product where prod_flag in (select prod_flag from product where prod_companyid = "&newcompanyid&" group by prod_flag) and prod_dir_flag = 0 order by prod_flag asc"
sql3 = "select distinct prod_danwei,prod_flag from product where prod_flag in (select prod_flag from product where prod_companyid = "&newcompanyid&" group by prod_flag) and prod_dir_flag = 0 order by prod_flag asc"
end if
%>
<script language="JavaScript">
<!--
function db2excel()
{
document.hamier2.action='userdb2excel_in.asp';
document.hamier2.submit();
}
// -->
</script>
</head>
<body topmargin="0">
<%
showtitle(title)
year_now =year(date())
month_now = month(date())
day_now = day(date())
%>
<font color=blue>
<form method="POST" action="siabaobiao_in_view.asp" name="hamier2">
<p align=center><font color=red>請在以下的表格中選擇相關的查詢條件</font>
<p> <table align=center border=0>
<tr>
<td nowrap>進倉編號SIA：</td>
<td><input class=smallInput type="text" name="sia" size="27" maxlength="20">
</td>
</tr>
<td>
<td><br>
<input class=buttonface type=hidden name=companyid value=<%=newcompanyid%>>
<input class=buttonface type=submit name=ok value=" 查 詢 ">
<input class=buttonface type=button name=ok2 value="報表生成" onclick="javascript:db2excel();">
</tr>
</table>
</form>
<!--#include file=../data/copyright.asp-->
<script LANGUAGE="javascript">
changelocation(document.hamier2.biglocation.options[document.hamier2.biglocation.selectedIndex].value);
</script>
</body>
</html>
<%
call closedatabase
%>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -