📄 xiaoshojia.asp
字号:
<!--#include file="../conn.asp"-->
<!--#include file="../Inc/syscode.asp"-->
<%set rs=server.createobject("adodb.recordset")
sql = "select * from ht_marktype ma,ht_Trademark tr where tr.Trademark_id=ma.Marktype_tr_id order by ma.marktype_name asc "
rs.open sql,conn,1,1
%>
<script language = "JavaScript">
var onecount;
subcat = new Array();
<%
count = 0
do while not rs.eof
%>
subcat[<%=count%>] = new Array("<%= trim(rs("marktype_name"))%>","<%= trim(rs("Marktype_Tr_id"))&","&trim(rs("Trademark_name"))%>","<%= trim(rs("marktype_name"))%>");
<%
count = count + 1
rs.movenext
loop
rs.close
%>
onecount=<%=count%>;
function changelocation(locationid)
{
document.form1.xinhao.length = 1;
var locationid=locationid;
var i;
for (i=0;i < onecount; i++)
{
if (subcat[i][1] == locationid)
{
document.form1.xinhao.options[document.form1.xinhao.length] = new Option(subcat[i][0], subcat[i][2]);
}
}
}
</script>
<html>
<head>
<title>销售价输入</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/test.css" rel="stylesheet" type="text/css">
<link href="../css/body.css" rel="stylesheet" type="text/css">
<link href="../css/calendar-blue.css" rel="stylesheet" type="text/css">
<script src="../Js/Calendar.js"></script>
<script language="JavaScript">
<!--
<!--
function SwitchMenu(obj,ckid){
if(document.getElementById){
var el = document.getElementById(obj);
var ar = document.getElementById("masterdiv").getElementsByTagName("tr"); //DynamicDrive.com change
for (var i=0; i<ar.length; i++){
ar[i].className= "";
}
el.className= "over";
}
document.form1.id.value=ckid;
}
function ckmodi(){
if (document.form1.id.value==""){
alert('请选择要修改的记录！');
return false;
}
window.open("xiaoshojia_modi.asp?id=" + document.form1.id.value,"opener","width=500,height=385,resizable=no,scrollbars=no,statue=no,toolbar=no,menubar=no,location=no,left=150,top=80");
}
//-->
</script>
<style type="text/css">
<!--
.STYLE1 {color: #FF0000}
-->
</style>
</head>
<body topmargin="0" leftmargin="0">
<table width="100%" border="0" bgcolor="#E8E8E8">
<form name="form1" method="post" action="">
<tr>
<td width="10%" bgcolor="#FFFFFF"><span class="STYLE1">销售价列表</span></td>
<td width="90%" bgcolor="#FFFFFF">品牌
<%
dim seltrademark
seltrademark=""
set rs=conn.execute("select * from ht_Trademark order by Trademark_id desc")
if not rs.eof then
seltrademark=seltrademark&"<option value="&rs("Trademark_id")&","&rs("trademark_name")&">"&rs("Trademark_name")&"</option>"
selclass=rs("Trademark_id")&","&rs("trademark_name")
rs.movenext
do while not rs.eof
seltrademark=seltrademark&"<option value="&rs("Trademark_id")&","&rs("trademark_name")&">"&rs("Trademark_name")&" </option>"
rs.movenext
loop
end if %>
<select name="pinpainame"onChange="changelocation(document.form1.pinpainame.options[document.form1.pinpainame.selectedIndex].value)">
<%=seltrademark%>
</select>型号
<select name="xinhao" id="xinhao">
<option value="">选择型号</option>
<%
selclass1=split(selclass,",")
set rs=server.createobject("adodb.recordset")
sql="select * from ht_marktype where Marktype_Tr_id="&selclass1(0)
rs.open sql,conn,1,1
if not(rs.eof and rs.bof) then
%>
<option value="<%=rs("marktype_name")%>"><%=trim(rs("marktype_name"))%> </option>
<%
rs.movenext
do while not rs.eof
%>
<option value="<%=rs("marktype_name")%>"><%=trim(rs("marktype_name"))%> </option>
<%
rs.movenext
loop
end if
rs.close
%>
</select>
时间查询
<input name="fromtime" type="text" id="fromtime" readonly size="10" value="<%
if request("fromtime")="" then
response.Write date-30
else
response.Write request("fromtime")
end if
%>">
<span class="font"><A onClick="return showCalendar('fromtime', 'y-mm-dd');" href="#"><img src="../Images/Button.gif" id="IMG2" align="absMiddle" border="0" /></A></span> 到：
<input name="totime" type="text" readonly id="totime" size="10" value="<%
if request("totime")="" then
response.Write date()
else
response.Write request("totime")
end if
%>">
<span class="font"><A onClick="return showCalendar('totime', 'y-mm-dd');" href="#"><img src="../Images/Button.gif" id="IMG2" align="absMiddle" border="0" /></A></span>
<input name="chaxun" type="submit" id="chaxun" value="查询">
<input type="button" name="Submit" value="全部" onClick=location.href="xiaoshojia.asp">
<input name="id" type="hidden" id="id">
</td><td bgcolor="#FFFFFF">
<input type="button" name="Submit2" value="修改销售价" onClick="ckmodi();"></td>
</tr>
</form>
</table>
<table width="100%" height="24" border="0" align="center" cellspacing="0">
<tr align="center" class="borderon">
<td width="6%" class="borderon">品种</td>
<td width="6%" class="borderon"> 品牌 </td>
<td width="6%" class="borderon"> 型号</td>
<td width="5%" class="borderon"> 进价 </td>
<td width="7%" class="borderon">空机价</td>
<td width="7%" class="borderon">入网价</td>
<td width="9%" class="borderon">活动价</td>
<td width="7%" class="borderon">批发价</td>
<td width="7%" class="borderon">颜 色</td>
<td width="8%" class="borderon">数量</td>
<td width="10%" class="borderon">进仓明细编号</td>
<td width="14%" class="borderon">配件</td>
<td width="4%" class="borderon">上限</td>
<td width="4%" class="borderon">下限</td>
</tr>
</table>
<table width="100%" border="0" align="center" cellspacing="1" bgcolor="#E8E8E8" id="masterdiv">
<%
dim curpage,fromtime,totime
fromtime=request("fromtime")
totime=request("totime")
pinpainame=trim(request("pinpainame"))
if pinpainame<>"" then
pinpainame=split(pinpainame,",")(1)
end if
' response.write pinpainame
xinhao=trim(request("xinhao"))
if xinhao="" then
sql1=" and trademark='"&pinpainame&"'"
else
sql1=" and trademark='"&pinpainame&"' and marktype='"&xinhao&"'"
end if
if fromtime>totime then
response.Write("对不起，查询日期出错，请重新选择")
end if
if request("curpage")="" then
curpage=1
else
curpage=request("curpage")
end if
if not isnumeric(trim(request("curpage"))) then
curpage=1
end if
if cint(curpage)=0 then
curpage=1
end if
const numperpage=25
set rs=server.createobject("adodb.recordset")
if request("fromtime")<>"" then
sql="select * from ht_Stockdetail where indatetime>=#"&fromtime&"# and indatetime<=#"&totime&"#"&sql1
else
sql="select * from ht_Stockdetail"
end if
rs.open sql,conn,1,1
if rs.eof then
response.write "<table><tr><td><br></br><center>暂无数据，请添加！</center><br></br></td></tr></table>"
end if
if not rs.eof then
rs.pagesize=numperpage
dim totalpages
totalpages=rs.pagecount
if cint(curpage)>cint(totalpages) then
curpage=totalpages
end if
rs.absolutepage=curpage
end if
dim count
count=0
i=1
do while not rs.eof and count<numperpage
%>
<tr id=<%=i%> bgcolor="#FFFFFF" onClick="SwitchMenu(<%=i%>,<%=trim(rs("stockdetail_number"))%>);">
<td width="6%"><div align="center"><%=trim(rs("goodstype"))%></div></td>
<td width="6%"><div align="center"><%=trim(rs("trademark"))%></div></td>
<td width="6%"><div align="center"><%=trim(rs("marktype"))%></div></td>
<td width="5%"><div align="center"><%=trim(rs("inprice"))%></div></td>
<td width="7%"><div align="center"><%=trim(rs("saleprice"))%></div></td>
<td width="7%"><div align="center"><%=trim(rs("netprice"))%></div></td>
<td width="9%"><div align="center"><%=trim(rs("specialprice"))%></div></td>
<td width="7%"><div align="center"><%=trim(rs("wholesaleprice"))%></div></td>
<td width="7%"><div align="center"><%=trim(rs("color"))%></div></td>
<td width="8%"><div align="center"><%=trim(rs("quantity"))%></div></td>
<td width="10%"><div align="center"><%=trim(rs("stockdetail_number"))%></div></td>
<td width="14%"><div align="center"><%=trim(rs("appendant"))%></div></td>
<td width="4%"><div align="center"><%=trim(rs("upquantity"))%></div></td>
<td width="4%"><div align="center"><%=trim(rs("lowerquantity"))%></div></td>
</tr>
<%
rs.movenext
i=i+1
count=count+1
loop
rs.close
set rs=nothing
closedataconn
%>
</table>
<table width="100%" border="0" align="center">
<tr>
<td> <div align="center"><% call PageNum(curpage,totalpages,"?curpage=") %></div></td>
</tr>
</table>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -