②班1⒏號 15:22:29
CL_dzb = Excel.Workbooks.Open("D:TDKK耕地开垦项目前后地类对照表模版.xls")
ECLapp.Visible = True
'''''''''''''''''''''''''''''''''''''''''''''''''''以上打开文请教:为什么第一次运行时能打开,第二次运行就打不开文档了呢
'''''''''''''''''''''''''''''''''''''''''''''''''''
Dim WORDapp As Word.Application
Dim WORD_bgs As Word.Document
Dim WORD_tkb As Word.Document
Dim UserFile As String
Set WORDapp = New Word.Application
Set WORD_bgs = Word.Documents.Open("D:TDKK耕地开垦复核报告书模版.doc")
Set WORD_tkb = Word.Documents.Open("D:TDKK耕地开垦复核踏勘情况表模版.doc")
WORDapp.Visible = True
Dim ECLapp As Excel.Application
Dim ECL_dzb As Excel.Workbook
Set ECLapp = New Excel.Application
Set E
[VB&.NET]ppyyff 15:25:24
第二次打开时,处于只读方式,应该是会出错 |