以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请老师检查代码,临时统计表为何不能填充?(已解决)  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=1883)

--  作者:菜鸟foxtable
--  发布时间:2009/2/21 10:49:00
--  请老师检查代码,临时统计表为何不能填充?(已解决)
其中数据接收表"结算表"为外部SQL表,有一列int自动增量列"ID".其余为:住院ID,类别,项目,规格,单位,单价,用量
代码如下:

Dim sql As string
Dim dt As DataTable
Dim cmd As New SQLCommand
cmd.C
sql = "select 住院ID,项目,规格,类别,单位,单价,用量*天数 AS 用量,round(单价*用量*天数,2) AS 金额 from [H_YIZ] where 住院ID = 200900201"
cmd.CommandText = sql
dt = cmd.ExecuteReader()

Dim g As New GroupTableBuilder("清单",dt)
g.Groups.AddDef("住院ID")
g.Groups.AddDef("类别")
g.Groups.AddDef("项目")
g.Groups.AddDef("规格")
g.Groups.AddDef("单位")
g.Groups.AddDef("单价")
g.Totals.AddDef("用量")
g.Totals.AddDef("金额")
g.Build()

dim f As New Filler
f.SourceTable = DataTables("清单")
f.SourceCols = "住院ID,类别,项目,规格,单位,单价,用量"
f.DataTable = DataTables("结算")
f.DataCols = "住院ID,类别,项目,规格,单位,单价,用量"
f.Fill()


执行出错...

图片点击可在新窗口打开查看此主题相关图片如下:001.jpg
图片点击可在新窗口打开查看
[此贴子已经被作者于2009-2-21 11:03:20编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/2/21 10:51:00
--  
你应该安装上.net frameWork的中文语言包呢,这样你就可以看懂错图提示了。

这个提示是:字符“/”是不能转换为日期的,这么说,你就知道怎么分析原因了。
--  作者:菜鸟foxtable
--  发布时间:2009/2/21 10:53:00
--  
我晕,重新检查了一下,原来设计SQL表时有一列数据类型搞错了...

麻烦提供中文语言包下载地址..图片点击可在新窗口打开查看
[此贴子已经被作者于2009-2-21 10:53:35编辑过]

--  作者:狐狸爸爸
--  发布时间:2009/2/21 13:31:00
--  

http://www.microsoft.com/downloads/details.aspx?familyid=39C8B63B-F64B-4B68-A774-B64ED0C32AE7&displaylang=zh-cn

[此贴子已经被作者于2009-2-21 13:31:31编辑过]