共6 条记录, 每页显示 10 条, 页签:
[1]
[浏览完整版]
标题：datalist汇总出了红XX,请老师检查代码...
1楼
菜鸟foxtable 发表于：2009/2/26 20:28:00模式窗口,只有一个DataList控件,窗口事件AfterLoad代码如下:执行出错....
Dim cmd As New SQLCommand
cmd.C
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
Dim day As date = date.today
cmd.CommandText = "select * from [H_ZYXX] where 状态 = 3 and 结算日期 = '" & day & "'"
dst.DataTable = cmd.ExecuteReader()
dst.ColumnList = "住院号|姓名|结算日期|fa piao号|合计|记帐金额|个人缴费金额|收费员|审核员|西药|中成药|中草药|床位费|诊查|X光|B超|心电图|护理|治疗|手术|检验|其他|特需服务"
dst.Build()
dst.GrandTotal(AggregateEnum.Sum,"总计","合计","记帐金额","个人缴费金额","西药","中成药","中草药","床位费","诊查","X光","B超","心电图","护理","治疗","手术","检验","其他","特需服务")
此主题相关图片如下：001.jpg
Dim cmd As New SQLCommand
cmd.C
Dim dst As WinForm.DataList = e.Form.Controls("DataList1")
Dim day As date = date.today
cmd.CommandText = "select * from [H_ZYXX] where 状态 = 3 and 结算日期 = '" & day & "'"
dst.DataTable = cmd.ExecuteReader()
dst.ColumnList = "住院号|姓名|结算日期|fa piao号|合计|记帐金额|个人缴费金额|收费员|审核员|西药|中成药|中草药|床位费|诊查|X光|B超|心电图|护理|治疗|手术|检验|其他|特需服务"
dst.Build()
dst.GrandTotal(AggregateEnum.Sum,"总计","合计","记帐金额","个人缴费金额","西药","中成药","中草药","床位费","诊查","X光","B超","心电图","护理","治疗","手术","检验","其他","特需服务")
此主题相关图片如下：001.jpg2楼
czy 发表于：2009/2/26 21:16:00代码没有问题，是老六有问题了。
3楼
狐狸爸爸 发表于：2009/2/26 21:17:00看看列名是否正确。
4楼
狐狸爸爸 发表于：2009/2/26 21:22:00有bug，我去搞定
5楼
菜鸟foxtable 发表于：2009/2/26 22:31:00
应该不是列名问题....一般有BUG才有红XX
6楼
狐狸爸爸 发表于：2009/2/27 2:15:00已经搞定，请下载27日更新
共6 条记录, 每页显示 10 条, 页签:
[1]