书签 分享 收藏 举报 版权申诉 / 80

类型库存管理系统 管理信息系统.docx

  • 文档编号:27985049
  • 上传时间:2023-07-07
  • 格式:DOCX
  • 页数:80
  • 大小:535.76KB

密码:

库存管理:

--#includefile="admin_protect.inc"-->

--#includefile="../opendb.inc"-->

库存管理页面

--

functioncheck()

{

if(isnan(go2to.page.value))

alert("请正确填写转到页数!

");

elseif(go2to.page.value=="")

{

alert("请输入转到页数!

");

}

else

go2to.submit();

}

//-->

<%

'--------------------------------------

%>

<%

SetConn=Server.CreateObject("ADODB.Connection")

Conn.Open(sqlOpenDB)'打开数据库

SetRs=Server.CreateObject("ADODB.RecordSet")

Key=Request("Findproduct")

IfKey=""Then

Sql="Select*FromProduct"

Else

Sql="Select*FromProductWhereNameLike'"&Key&"'"

EndIf

Rs.OpenSql,Conn,1,3

IfRs.EofAndRs.BofThen

Response.Write"
"

Response.Write"("

Response.Write"===暂无==="

Response.Write"

)"

%>

添加新的商品

<%

Response.Write"

"

%>

返回

<%

Response.End

EndIf

%>

<%

Rs.PageSize=10

IfNotIsEmpty(Request("Page"))Then

PageCount=Cint(Request("Page"))

Else

PageCount=1

EndIf

IfPageCount>Rs.PageCountOrPageCount<=0Then

PageCount=1

EndIf

Rs.AbsolutePage=PageCount%>

<%IfRs.pagecount=1Then%>

共有[<%=Rs.recordcount%>]商品

以下是[1~<%=Rs.recordcount%>]个

<%else%>

<%

Page_Start=(PageCount-1)*Rs.PageSize

IfPageCount=1ThenPage_Start=1

Page_End=Rs.PageSize*PageCount

IfPageCount*Rs.PageSize=>Rs.RecordcountThenPage_End=Rs.RecordcountEndIf%>

共有[<%=Rs.recordcount%>]商品

以下是[<%=page_start%>~<%=page_end%>]

<%Response.Write"

Key="+Key+"'>"

Response.Write"◆ "

IfPageCount=1Then

Response.Write"首页上一页 "

Else

Response.Write"

Page=1&Key="+Key+">首页 "

Response.Write"

Page="+Cstr(PageCount-1)+"&Key="+Key+">上一页 "

EndIf

IfRs.PageCount-PageCount<1Then

Response.Write"下一页末页"

Else

Response.Write"

Page="+Cstr(PageCount+1)+"&Key="+Key+">下一页 "

Response.Write"

Page="+Cstr(Rs.PageCount)+"&Key="+Key+">末页"

EndIf

Response.Write" 页次:

"&PageCount&"/"&Rs.PageCount&"页"

Response.Write"转到第

9Pt;Color:

#00006A;Position:

Relative;Height:

18'Value="&PageCount&">页    "

Response.Write"

宋体;font-size:

9pt;color:

#000073;position:

relative;height:

19'>"

%>

<%End

举报
举报
版权申诉
版权申诉
word格式文档无特别注明外均可编辑修改;预览文档经过压缩,下载后原文更清晰! 立即下载
配套讲稿:

如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。

特殊限制:

部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。

关 键  词:
库存管理系统 管理信息系统 库存 管理 系统
提示  冰豆网所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
关于本文
本文标题:库存管理系统 管理信息系统.docx
链接地址:https://www.bdocx.com/doc/27985049.html
关于我们 - 网站声明 - 网站地图 - 资源地图 - 友情链接 - 网站客服 - 联系我们

copyright@ 2008-2022 冰点文档网站版权所有

经营许可证编号:鄂ICP备2022015515号-1

收起
展开