在紀兄的網站有一個介紹複製鎖住檔案的方法
過去在使用時沒問題.但最近卻發生了錯誤.
錯誤訊息是 Automation 錯誤.找不到指定的模組
Private Sub Command1_Click()
Dim fso As FileSystemObject
  Set fso = CreateObject("Scripting.FileSystemObject")
  fso.copyfile source_file, target_file
End Sub
錯誤是發生在 這個命令:
Set fso = CreateObject("Scripting.FileSystemObject")
系統專案已經有加入 【Microsoft
Scripting Runtime】
不清楚如何解決這個狀況.
求教於紀兄與其他先進.謝謝
創作者介紹
創作者 vbqa 的頭像
vbqa

小吳 VBQA 程式設計討論

vbqa 發表在 痞客邦 留言(0) 人氣()