我正在使用Appword.documents.open打開word文檔並使用appword.quit關閉它們。然後在一個名爲ProcessData的函數中,應用程序重命名文檔。如何確定文件在重命名之前已關閉
我得到的問題是在代碼嘗試重命名之前文件未關閉。在嘗試重命名之前,如何確保單詞文檔已關閉?
WordDoc = AppWord.Documents.Open(filepath + filename)
txtFileContents.Text = WordDoc.Content.Text
AppWord.Quit()
ProcessData(txtFileContents.Text, filepath, filename)
這是重命名文件的過程數據功能:
My.Computer.FileSystem.RenameFile(fPath + fName, NewName + ".doc")
這是奇怪的代碼。無論如何,你檢查錯誤,如果有一個你重試該命令,直到它的工作。 Do while err.number = 0:My.Computer.FileSystem.RenameFile(fPath + fName,NewName +「.doc」):如果err.number <> 0那麼:err.clear:else:exit do:Loop: –
Looks像VB.Net代碼,而不是VB6。 – Bob77