小弟,做一个发票报表,现在遇到两个问题不知怎么做了,王各位大侠能给与帮助。
1,rptinv as actRptInvoice 'actRptInvoice是报表名
Dim rst As New ADODB.Recordset
Set rptinv = New actRptInvoice2
.....
rptinv.sprcold = rst("prcold") 'prcold的内容为0.5
在报表显示时这个sprcold 为 “ .5 “ ,我用outformat格式化为#,##0.00,prcold在数据库中是以货币格是存储的。
请那位大侠能指点谜经!
2,
怎样产生六位联号,如何产生?用数据库还是有其他的办法?
谢谢!
1,rptinv as actRptInvoice 'actRptInvoice是报表名
Dim rst As New ADODB.Recordset
Set rptinv = New actRptInvoice2
.....
rptinv.sprcold = rst("prcold") 'prcold的内容为0.5
在报表显示时这个sprcold 为 “ .5 “ ,我用outformat格式化为#,##0.00,prcold在数据库中是以货币格是存储的。
请那位大侠能指点谜经!
2,
怎样产生六位联号,如何产生?用数据库还是有其他的办法?
谢谢!
解决方案 »
- 求拚接n个矩形的边长
- 如何取得MP3文件的文件属性
- SOS!vb如何访问web服务器上的acess数据库?在线等!送100分!
- Visual Basic Project Workspace是什么文件类型,扩展名为VBW
- 如何把数据库中编号相同的记录列出来?
- 请教一个数据库的简单问题。
- ACCESS文件如何转换为HTML文件?(急!急!急!)
- 如何从一个记录集中统计出符合某种条件的记录有多少?请进!
- 在bitblt函数的使用过程中的问题讨教!急!!
- 如何将文件保存到SQL Sever7.0中?
- 请教,北京时转换成国际时程序如何编,特急,在线等,100求解。
- 怎样将普通窗体变为MDIform的父form?
第二个问题,用数据库来记录报表的打印次数,每打印一次num+1,然后更新数据库。
第二个问题我在更新数据库时遇到了一个低级的错误,就是找不到原因!
现象如下:
数据库是只有一个记录的表;rptnum表的num字段
更新数据库的语句:
num = num +1'纪录次数
rs as new adodb.recordset
sql= "select * from rptnum"
If dbADO.State = adStateOpen Then dbADO.Close 'dbado是
dbADO.Open
If rs.State = adStateOpen Then rs.Close
rs.Open sql, dbADO, adOpenDynamic
rs("num") = num
rs.Update
rs.Close
我用with rs
.fileds("num")= num
.update
.close
end with
也不行
如上没法更新??什么原因呢??