access能实现这个功能吗？

crazyboss · 发表于 2003-1-7 05:15:00

利用Microsoft Word 先编写好这些文书的模板，并在需要插入资料内容的插入点做上标记，然后将模板保存起来。需要生成文书时由程序调用Word，并根据预先定义的模板名称搜索基本名称与模板名称相同的模板，并引用这些模板生成文档，再在插入点插入相应的资料内容。

[此贴子已经被作者于2003-1-6 21:15:24编辑过]

crazyboss · 发表于 2003-2-12 23:01:00

新年好！

crazyboss · 发表于 2003-1-18 22:31:00

其实我是想在access里输入数据，比如名字，替换word文件里所以的name，但全部在access里面完成。并能打开指定路径的word模板，修改后保存到指定的路径。这样就比较完美了。我不想去动word

binbow_z · 发表于 2003-1-18 06:47:00

做WORD中用宏录制你的操作，再查看源代码可省很多事

crazyboss · 发表于 2003-1-18 06:26:00

谢谢binbow

binbow_z · 发表于 2003-1-16 04:57:00

我只会在ACCESS中调用WORD模板并设置WORD文件名，如果要在模板中进行进一步操作，需要进一步进行WORD编程，需引用microsoft word 10.0 object library,ACCESS2000是，你可看以下代码：
templatepath = CurrentProject.Path & "\templates\" & 合同类型.Value & ".dot"
myfilename = xjwjmc.Value & ".doc"
appword.Documents.Add Template:=templatepath, NewTemplate:=False, DocumentType:=0
appword.ChangeFileOpenDirectory mypath
appword.ActiveDocument.SaveAs FileName:=myfilename, FileFormat:=wdFormatDocument _
      , LockComments:=False, Password:="", AddToRecentFiles:=True, _
      WritePassword:="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
      SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
      False
appword.Visible = True

crazyboss · 发表于 2003-1-16 03:35:00

帮帮忙啦～～～～～～～～·急阿～～～～·

crazyboss · 发表于 2003-1-10 05:49:00

我要word里的自动排版功能阿

willnow · 发表于 2003-1-9 05:20:00

不如將模板轉換成圖片作為報表的背景來試試,這樣比較簡單,如果用vba的話，的確要費手腳，但是隨時更換模板到需要考慮

crazyboss · 发表于 2003-1-9 05:14:00

高手进来阿

帐号		自动登录	找回密码
密码			注册

群介绍
Access培训群 (792054000)
Access免费培训2群 (163530137)
Access免费培训群 (833510950)
Access免费培训群2 (792054000)
Access交流总群 (5004108)

主题相关群

地区相关群[您还没设置居住地]

access能实现这个功能吗？

群介绍
主题无相 (随机显示版	同地区群块其他地区)