在Access中打开一个指定的word文档！

Question

在Access的窗体中放置一个按钮，按该按钮自动打开一个word文档，这个word文档的路径不用变换，也就是不必弹出对话框询问word的路径，只要直接打开就可以。该按钮如何编程？我对文件操作不是很清楚！谢谢！

Answer 1

access的窗体中放置一个按钮．
是不是在说胡话啊．
要不就是我糊涂了？

Answer 2

没有说胡说，是可能实现的，不过，需要引用Microsoft Word 10.0 object Library 对象库才可以

Answer 3

Option Compare DatabasePrivate Sub Command6_Click()
        Dim objWord As Word.Application
        Dim objDoc As Word.Document
        
        Set objWord = CreateObject("Word.Application")
        objWord.Visible = True
        
        Set objDoc = objWord.Documents.Open("C:\a.doc")
        
        objDoc.Content.Text = "aaaaaaaaa"
        
        
End Sub

Answer 4

楼主要求：
在Access的窗体中哈
吃了饭再来看

Answer 5

呵呵。和楼上的差不多.
Option Compare DatabasePrivate Sub Command0_Click()
On Error GoTo Err_Command0_Click    Dim oApp As Object
    Dim oDoc As Object
    Set oApp = CreateObject("Word.Application")
    oApp.Visible = True
    Set oDoc = oApp.Documents.Open("C:\1.doc")
Exit_Command0_Click:
    Exit SubErr_Command0_Click:
    MsgBox Err.Description
    Resume Exit_Command0_Click
    
End Sub在win2000srv+sp4+wordxp测试后无误

Answer 6

cslf(cs) ( ) 信誉：100 
      谢谢~!!      谢谢~!!      谢谢~!!      谢谢~!!