
wordvba無(wú)法創(chuàng)建bat文件工作原因,需要臨時(shí)創(chuàng)建bat文件,之前沒問題,這兩天發(fā)現(xiàn)一直報(bào)運(yùn)行時(shí)錯(cuò)誤75,路徑/文件訪問錯(cuò)誤,沒有權(quán)限,不知道是不是更新wps后的原因?甚至直接嘗試將一個(gè)bat文件使用Name語(yǔ)句重命名為txt文件,沒問題,倒過(guò)來(lái),改成bat也報(bào)錯(cuò),請(qǐng)大神們看看是什么原因?
nclick="copycode($('code0'));">復(fù)制代碼
- Dim tempBatchPath As String' 聲明一個(gè)字符串變量tempBatchPath,用于存儲(chǔ)臨時(shí)批處理文件的路徑
- tempBatchPath = d:temp_call_script.bat' 臨時(shí)批處理文件的路徑,并賦值給tempBatchPath變量
- ' 創(chuàng)建臨時(shí)批處理文件
- Dim fileNum As Integer' 聲明一個(gè)整數(shù)變量fileNum,用于獲取一個(gè)未使用的文件號(hào)
- fileNum = FreeFile()' 調(diào)用FreeFile函數(shù)獲取一個(gè)未使用的文件號(hào),并賦值給fileNum變量
- Open tempBatchPath For Output As fileNum' 打開tempBatchPath指定的文件,用于寫入,并指定文件號(hào)為fileNum
- Print #fileNum, @echo off
- Print #fileNum, ExtractDriveLetter(macroPath) '向臨時(shí)批處理文件寫入盤符,確保盤符與cd的路徑一致
- Print #fileNum, cd & macroPath' 向臨時(shí)批處理文件寫入命令cd,后面跟上macroPath變量表示的路徑,用于改變工作目錄到VBA宏所在目錄
- Print #fileNum, call & batchPath & ' 向臨時(shí)批處理文件寫入命令call,后面跟上batchPath變量表示的批處理腳本路徑,用于調(diào)用該腳本
- Close fileNum' 關(guān)閉文件號(hào)為fileNum的文件

