VBWORD模版数据库来制作格式合同的方法.docxVIP

精选 用 VB ＋ WORD 模版＋数据库来制作格式合同的方法 步骤一、 word 模版制作 : 在第一行是合同标题 【书签 1 合同标题 xxxxxxxx 合同】 第二行 ****************************** 合同编号 : 【书签 2 合同编号】 签约单位 : 【书签 3 签约单位】 签约地址 : 【书签 4 签约地址】 签约日期 : 【书签 5 签约日期】 ..... 表格第一行 表格第一行第一列中插入 书签 4 表格第二行 ... 货物名称 数量 规格 【书签 6 货物清单】 可编辑 精选 实现代码如下 Dim cn As New ADODB.Connection Dim AdoRs As New ADODB.Recordset Dim WordTemps As New Word.Application Private Sub Form_Load() If cn.State = 1 Then cn.Close End If cn.CursorLocation = adUseClient cn.Open Provider=Microsoft.Jet.OLEDB.4.0;Data Source= App.Path \db1.mdb End Sub 开始导出数据 Private Sub Command1_Click() Dim st