?? creatreportwhs.asp
字號(hào):
<!--#include file="../config.ini" -->
<!--#include file="../commfunction.inc" -->
<%Dim objcheck
Set objcheck=Server.CreateObject("SmartSales.CheckFunction")
objcheck.CheckUserFunction "report","read"
%>
<html>
<head>
<LINK href="../global.css" rel=STYLESHEET type=text/css>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>creatreportaccount</title>
</head>
<script language="javascript">
function selcondition1()
{
opensubwinwithsearch('../report/selectconditon.asp','form1','condition1','',form1.selmethod1.value);
}
function selcondition2()
{
opensubwinwithsearch('../report/selectconditon.asp','form1','condition2','',form1.selmethod2.value);
}
function selcondition3()
{
opensubwinwithsearch('../report/selectconditon.asp','form1','condition3','',form1.selmethod3.value);
}
function selcancelsel1()
{
form1.condition1.value="";
form1.condition1name.value="";
}
function selcancelsel2()
{
form1.condition2.value="";
form1.condition2name.value="";
}
function selcancelsel3()
{
form1.condition3.value="";
form1.condition3name.value="";
}
function runreport()
{
form1.action="whsreport.asp";
form1.submit();
}
function ExportToExcel()
{
form1.action="ExportToExcelwhs.asp";
target='_blank'
form1.submit();
}
</script>
<body leftmargin="10" rightmargin="0" topmargin="10">
<form name="form1" method="post" action="whsreport.asp" target="_blank">
<table width="100%" height="30" border="0" cellpadding="0" cellspacing="0">
<tr>
<td height="25"><strong><font class=title>創(chuàng)建庫(kù)存報(bào)表</font></strong></td>
</tr>
<tr >
<td height="16" colspan="3" background="../images/title.gif"> </td>
</tr>
<tr>
<td height=4></td>
</tr>
<tr><td><div align="center" style="cursor:hand"><img src="../images/button_run.gif" language=javascript onClick="return runreport()"></a>
<%if objcheck.CheckUserFunction2("Excel","edit") or objcheck.CheckUserFunction2("Excel","read") then%><img src="../images/button_excel.gif" language=javascript onClick="return ExportToExcel()"><%end if%></DIV></td>
</tr>
</table>
<table width="100%" cellpadding="2" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td width="15%" bgcolor="DEDFDE"> <div align="center">倉(cāng)庫(kù)</div></td>
<td width="18%" bgcolor="EFEFEF"><select name="whse">
<option value="">--選擇倉(cāng)庫(kù)--</option>
<%
set conn=server.CreateObject("adodb.connection")
conn.open connstring
set rsw=conn.execute("select * from warehouse")
do while not rsw.eof
%>
<option value=<%=rsw("whseid")%>><%=rsw("whse")%></option>
<%
rsw.movenext
loop
%>
</select></td>
<td width="15%" bgcolor="DEDFDE"><div align="center">貨位類型</div></td>
<td width="19%" bgcolor="EFEFEF"> <div align="left">
<select name="locationtype">
<option value="">--選擇貨位類型--</option>
<%getdefine "貨位類型",""%>
</select>
</div></td>
<td bgcolor="DEDFDE"><div align="center">非凈貨位</div></td>
<td bgcolor="EFEFEF"><select name="nonnet">
<option value="">--選擇貨位屬性--</option>
<option value=1>是</option>
<option value=0>否</option>
</select></td>
</tr>
<tr>
<td width="15%" bgcolor="DEDFDE"><div align="center">制造商</div></td>
<td colspan="3" bgcolor="EFEFEF"> <input name="account" type="hidden" size="8">
<input name="accountname" type="text" size="40" readonly> <input type="button" name="bnaccount" onClick="JavaScript:opensubwin2('form1','account')" value=... class=black>
<div align="center"></div></td>
<td width="15%" bgcolor="DEDFDE"><div align="center">產(chǎn)品類型</div></td>
<td width="18%" bgcolor="EFEFEF"><select name="producttype">
<option value="">--選擇產(chǎn)品類型--</option>
<%getdefine "產(chǎn)品類型",""%>
</select></td>
</tr>
<tr>
<td bgcolor="DEDFDE"><div align="center">型號(hào)包含</div></td>
<td bgcolor="EFEFEF"><input name=Contain size="20" value=""></td>
<td bgcolor="DEDFDE"><div align="center">庫(kù)存時(shí)間</div></td>
<td bgcolor="EFEFEF"><select name="storedays">
<option value="">--選擇庫(kù)存時(shí)間--</option>
<option value=7>1周以上</option>
<option value=14>2周以上</option>
<option value=30>一個(gè)月以上</option>
<option value=60>二個(gè)月以上</option>
<option value=90>三個(gè)月以上</option>
<option value=180>6個(gè)月以上</option>
<option value=365>1年以上</option>
</select></td>
<td bgcolor="DEDFDE"><div align="center">最近銷售時(shí)間</div></td>
<td bgcolor="EFEFEF"><select name="recentsaledays">
<option value="">--選擇庫(kù)存時(shí)間--</option>
<option value=7>1周以上</option>
<option value=14>2周以上</option>
<option value=30>一個(gè)月以上</option>
<option value=60>二個(gè)月以上</option>
<option value=90>三個(gè)月以上</option>
<option value=180>6個(gè)月以上</option>
<option value=365>1年以上</option>
</select></td>
</tr>
<tr>
<td bgcolor="DEDFDE"><div align="center">排序字段</div></td>
<td bgcolor="EFEFEF"><select name="orderby">
<option value="" selected>--選擇排序字段--</option>
<option value=recentsaledays>最近銷售時(shí)間</option>
<option value=days>在庫(kù)時(shí)間</option>
<option value=qty>數(shù)量</option>
<option value=averagecost>平均成本</option>
<option value=name>名稱</option>
<option value=model>型號(hào)</option>
</select></td>
<td bgcolor="DEDFDE"><div align="center">排序方法</div></td>
<td bgcolor="EFEFEF"><select name="orderbymethod">
<option value=desc>降序</option>
<option value=asc>升序</option>
</select></td>
<td bgcolor="DEDFDE"> </td>
<td bgcolor="EFEFEF"> </td>
</tr>
</table>
</form>
</body>
</html>
<%set objcheck=nothing%>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -