关于如何用VB把数据库的内容向WORD添加

wzj1321 2002-05-13 09:30:51

我想把ACCESS数据库中的内容，通过VB传输到WORD，多条记录的，哪位能给个列子吗？谢谢了

...全文

68 1 打赏收藏转发到动态举报

写回复

1 条回复

切换为时间正序

请发表友善的回复…

发表回复

scarlet 2002-05-14

打赏
举报

回复

ole方式，需要对利用Word的对象模型进行编程

VB6.0 将数据库数据传给Word，将数据库内容发送给Word，在Word中打开Access中的数据内容：　　'创建word应用程序，这一句话打开word2000 　　Set wdapp = CreateObject("Word.Application") 　　'在word中添加一个新文档　　Set wddoc = wdapp.Documents.Add 　　With wdapp 　　.Visible = True 　　.Activate 　　'在word中增加一个表格　　Set atable = .ActiveDocument.Tables.Add(.Selection.Range, irecordcount 1, ifieldcount) 　　For i = 0 To ifieldcount - 1 　　 atable.Cell(1, i 1).Range.InsertAfter DataGrid1.Columns(i).Caption 　　Next i 　　'指定表格内容　　For i = 0 To irecordcount - 1 　　For j = 0 To ifieldcount - 1 　　 DataGrid1.Row = i 　　 DataGrid1.Col = j 　　 atable.Cell(i 2, j 1).Range.InsertAfter DataGrid1.Text 　　Next j 　　Next i 　　End With 　　'清除word对象

VB将MDB数据库生成Word、Excel、HTML报表源代码

vb将access数据库中数据高出到Word中。 数据库文件exmple.mdb置于E:\下！

VB数据库源码，非常全面，有VB Excel ，有VB Word，有VB Access，值得学习

VB处理Access数据库为Word、Excel、HTML报表格式

数据库(包含打印，安装，报表)

1,217

社区成员

55,952

社区内容

发帖

与我相关

我的任务

社区管理员

加入社区

近7日
近30日
至今

加载中

查看更多榜单

社区公告

暂无公告

试试用AI创作助手写篇文章吧

+ 用AI写文章