My点评网 - 中国IT产业点评门户 | 将IT产业透明化! | 加入收藏 
MY(我)点评网
欢迎访客访问
[ 登录 | 注册:建论坛/写日志/说评论 ]
会员控制台 | 群组 | (BLOG)资讯 | 论坛
 
大众点评网
导行:
IDC 广告联盟 域名 建站CMS 网络游戏 投资网站 潜质域名 IT企业 电子商务 SEO/Windows7 Script 系统 程序 电脑 交流报 安全 论坛 游戏

一份简单的日报表

Script程序语言详细资料....
首页> 群组> IT业界群组> Script程序语言论坛
返回>Script程序语言论坛 2009-4-2 15:07:11 来自:wlh0123 快速回复 添加新话题
主题内容: ~~想请教大家asp&SQL~~~~
我不知道要怎么把订单(Orderly)和菜单(Menu)结合起来成另一个数据表(这个table里要有的字段为OrdNo,OrdSum(为同样订单每笔份数*单价的总和),OrdAllow(折扣),OrdNow(订单日期)
OrdAllow及OrdNow及OrdNo都在Orderly里,OrdSum是需外另外产生的

最后需在要在网页上show出一个title为XX年XX月XX日的日报表,然后下面的表格字段有"订单编号(OrdNo)"(需用groupby,因为订单编号有很多笔相同)...及"消费金额"(消费金额的运算方式是份数(Orderly.OrdPort)*单价(Menu.MenuPri)的每一笔一样的订单
我必需产生一个资料表....栏位有"订单编号(OrdNo)"(需用groupby,因为订单编号多笔编号相同的订单)...及"消费金额"[消费金额的运算方式是份数(Orderly.OrdPort)*单价(Menu.MenuPri)的同样订单编号的总价计算..而且还要考虑"折扣问题"....要写判断的程式(为会员则有折扣=1,没有则为0)如果为会员则总价要乘以0.95,最后算出来的总价要显示在消费金额上]不用检查是否为会员,因为刚上面查询出来的折扣(OrdAllow)会显示会员=1,不是会员=0,只要单纯利用查询出来的资料表再用以判断是否有会员折扣即可如果为会员则总价要乘以0.95

以下是我的程式
<html;>
<head;>
<title;>日报表</title>
</head>
<bodybgcolor;="#FFFFFF">
<center;>
<%
response.buffer=true
%>
<%
DimstrDBDSN,strSQL,objDBConn,objRS,intFCount,intI,total
yeardata=Request("yearNo")
monthdata=Request("monthNo")
datedata=Request("dateNo")
'资料库的资料来源
strDBDSN="DSN=dbsys;UID=dbsuser;PWD=users"

'资料库查询的SQL语法
strSQL="selectOrdNoas订单编号,OrdPort*MenuPrias消费金额
fromOrderly,Menu
where(Orderly.MenuNO=Menu.MenuNo)
and(OrdNo=#"&yeardata&monthdata&datedata&"#)
groupbyOrdNo"

'建立资料库连结的物件
SetobjDBConn=Server.CreateObject("ADODB.Connection")
objDBConn.OpenstrDBDSN'开启资料库连结
'执行SQL的资料库查询
SetobjRS=objDBconn.Execute(strSQL)
'取得栏位数目
intFCount=objRS.Fields.Count-1
'检查是否有记录
IfNotobjRS.EofThen
Response.Write"&yeardata&"年"&monthdata&"月"&datedata&"日""
Response.Write"<BR;>"
Response.Write"<tableborder;=1><tr;>"
'显示资料库的栏位名称
ForintI=0tointFCount
Response.Write"<td;><b;>"&objRS(intI).Name&"</b></td>"
Next
Response.Write"</tr>"
'显示资料库内容
total=0
DoWhileNotobjRS.Eof
total=total+objRS.Fields(2).value*objRS.Fields(3).value
Loop

Response.Write"<tableborder;=1>"
Response.Write"<trbgcolor;=cyan>"
Response.Write"<td;>订单编号</td>"
Response.Write"<td;>消费金额</td>"
Response.Write"<tdcolspan;=1align=right>"
Response.Write"<b;>"
Response.Write"总额:"
Response.Write"</b>"
Response.Write"</td>"
Response.Write"<tdcolspan;=4align=right>"
Response.WriteTotal
Response.Write"</td>"
Response.Write"</tr>"
Response.Write"</table>"

EndIf
objRS.Close'关闭记录集合
SetobjRS=Nothing
objDBConn.Close'关闭资料库连结
SetobjDBConn=Nothing
%>

</center>
</body>
</html>
引用

  暂无评论,欢迎您成为第一个评论者!(仅开放注册登录会员)


 最新相关内容 10秒,快速注册会员建论坛/写日志/说评论
·请教SQL语法请的问题
·如何能在表单内插入显示网页及win文件总管
·搭配word合并列印,不能显示图形
·小数位的问题列印unit_price时会有4舍
·有关日期区间的查询
·A下拉选单,B跟着不同选择
·文件名变颜色蓝色的意思
·成功insert 到abc资料Incorrec
·日期比较后用别名
  你的回应... [仅对登录会员开放,请文明参与,注册会员能写日志、说评论、建论坛自己当版主]
  回应一下:一份简单的日报表
 
  请勿发广告或垃圾信息,请为提高内容质量做出贡献
  [Ctrl+Enter 快速回复]

返回Script程序语言论坛


来自>>IT业界群组

简介:程序员交流:Java Script、VB Script、各类Script程序语言VB.NET程序问题交流与讨论
论坛生日:2009/2/14建立
主题:一份简单的日报表
创始人版主:admin查看>>
更多分类 >返Script程序语言论坛首页
最新热门推荐帖子....
各位大大我又碰头了! [wlh0123]
(求助)有人可以教我架支持asp和access服务器吗 [wlh0123]
是否能用asp再磁盘增加一个档案 [wlh0123]
窗体制作 [wlh0123]
急件 如何解决 [wlh0123]
点解我个xp冇iis o既? [wlh0123]
请问以下敍述可以使用變數嗎? [wlh0123]
vb script 请前辈帮忙! [wlh0123]
include COOKIES [wlh0123]
何处有投票系统(可用check box 多选的)可以下载 ? [wlh0123]
长条图 [wlh0123]
关于建立数据库连结的问题 [wlh0123]
checkbox--client端的判断?? [wlh0123]
确认窗口问题:必须是陈述式的结尾? [wlh0123]
强制分辨大小写的 SQL Select [wlh0123]
透过ssl规范连接其它web server能力,必须安装什么软件组件 [wlh0123]
请问一下关于新增 [wlh0123]
求助 - 代替 form action 的写法 [wlh0123]
借个位置发问(窗体问题) [wlh0123]
封锁IP [wlh0123]

  关于我们 需要帮助 广告服务 合作伙伴 中国IT产业大众点评门户
CopyRight 2008 © My点评网 www.MyDianPing.com
粤ICP备08105915号
  My点评网简介
用户协议 隐私声明
联系方式 建议/反馈
常见问题
忘记了密码
联系我们的客服人员
联系方式
广告投放
网站地图(SiteMap)
网站合作
投资/融资
友情链接/战略伙伴