Question

如何用VB6.0打开已知路径下的WORD文档，谢谢，最好给出代码

我的程序界面上有一个按钮，当点击时要求打开一个WORD文档（文档路径已知），请问如何实现？谢谢！请求给出代码，本人VB新手。
我的WORD地址是用一个变量address表示的（因为我想在不同情况下打开不同的WORD）
我做独立软件，路径是相对路径,存放在数据库表中，数据库连接没有问题。
同学用OLE控件可以实现，但我复制过来就不行了。

Answer 1

Shell "d:\Program Files\Microsoft Office\OFFICE11\Winword.exe d:\唐海林.doc"
其中d:\Program Files\Microsoft Office\OFFICE11\Winword.exe是启动word的路径，d:\唐海林.doc是想要打开的路径
你把路径保存在address中
address = "d:\唐海林.doc"
Shell "d:\Program Files\Microsoft Office\OFFICE11\Winword.exe " & address & ""

Answer 2

'引用microsoft office object 对象
private sub command1_click()
dim wordApp As object
Set wordApp = CreateObject("Word.Application")
'打开word文档
wordApp.Visible = True
wordApp.Documents.Open fileName
wordApp.Documents(fileName).Activate
end sub

此法可通过vb来操控doc文档对象.

Answer 3

Shell "rundll32.exe url.dll,FileProtocolHandler " & "c:\1.doc"

把c:\1.doc换成你的路径就行了.

Answer 4

Shell("explorer.exe /n,D:\报告.doc", AppWinStyle.NormalFocus)