dear all, untuk edit dan run file bat dari excel VBA nya seperti apa ya

setelah saya googling di internet ketemu VBA seperti ini

Sub WriteAndRunBatFile()
Dim fs As Scripting.FileSystemObject
Dim file As TextStream
Dim retVal
Dim strFilePath As String

strFilePath = "C:\AKU\aku.bat"

Set fs = New Scripting.FileSystemObject 'Requires a reference to
Microsoft Scripting Runtime
'Set fs = CreateObject("Scripting.FileSystemObject") 'does not require
the reference

Set file = fs.CreateTextFile(strFilePath)

file.WriteLine "blah-blah"
file.WriteLine "blah-blah"
file.Close

retVal = Shell(strFilePath)

End Sub

nah ketika dijalankan, error pada bagian
Scripting.FileSystemObject
"user defined type not defined"

kira-kira solusinya seperti apa

Reply via email to