<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% if session("user")="" or request("pass")="" then session("user")="" session.timeout= 600 %> <% set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};dbq="&server.mappath("/data/renrong.mdb") %> LOYER.Mod简易库存查询系统，更新时间每天11:00-12:00
容悦/loyer.mod库存查询
输入产品名称/货号

非实时更新，以下资料仅供参考，最终数量以出货单为准，请见谅。（说明：因系统原因，暂无法给出确切数量，实际数量按：库存充足>少量库存>库存紧张>暂时缺货）更新时间每天中午11:00-12:00

※提示※:最近新品上架时间:2010年11月20日:

1，缺货商品未注明生产中的，请勿下单。

2，下架货品不再提供更换服务，非人为质量问题可提供免费修补服务。

<% if request.querystring("page")="" then ipagecurrent=1 else ipagecurrent=cint(request.querystring("page")) end if set rs=server.createobject("adodb.recordset") if request("pname")="" then sql="select * from prod order by tim desc" elseif request("pname")<>"" then sql="select top 50 * from prod where pname like '%"&Trim(Request("pname"))&"%' order by tim desc" end if if Request("pname")="nostock" then sql="select top 50 * from prod where shu=-1 order by tim desc" end if if Request("pname")="less" then sql="select top 50 * from prod where shu=0 order by tim desc" end if shuliang=30 rs.pagesize = shuliang rs.cachesize = shuliang rs.open sql,conn,1,1 ipagecount = rs.pagecount If ipagecurrent > ipagecount Then ipagecurrent = ipagecount If ipagecurrent < 1 Then ipagecurrent = 1 if ipagecount=0 then response.write "

您查询的商品不存在！

" else rs.absolutepage = ipagecurrent irecordsshown = 0 piccount=rs.RecordCount %> <% i=1 do while irecordsshown <% irecordsshown = irecordsshown +1 i=i+1 rs.movenext loop end if rs.close set rs=nothing%>
ID 品名 库存状态 最后更新 颜色 尺码 吊牌价 备注 相关网页
<%=RS("id")%> <%= rs("pname") %> <%shu= rs("shu") %> <% If shu=-1 Then response.Write "下架货品" %> <% If shu=0 Then response.Write "暂时缺货" %> <% If shu>=15 Then response.Write "库存充足" %> <% If shu>0 and shu<=5 Then response.Write "库存紧张" %> <% If shu>5 and shu<15 Then response.Write "少量库存" %> <%= rs("tim") %> <%= rs("yanse") %> <%= rs("chima") %> <%= rs("diaopai") %> <%= rs("bak") %> -index.html" target="_blank">查看
共有 <%= piccount %> 条 <% Response.Write"每页"&shuliang&" 件 共"&ipagecount&"页 "'当前为第 "&ipagecurrent&" 页 " %> ">|<< <% for pi=ipagecurrent-5 to ipagecurrent+5 if pi=ipagecurrent then%> [<%=pi%>] <% Elseif pi>0 and pi<=ipagecount then %> ["><%=pi%>] <%end if next %> ">>>|
<% else %>
<% end if %>