作者vernc (cralvin)
看板Visual_Basic
标题[VBA ] [请问] vbs程序呼叫或引数不正确
时间Sat Apr 15 13:22:21 2023
Dim fso, folder, files
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder("R:\e") ' 取代为目标目录的路径
Set files = folder.Files
msgbox files.Count
If files.Count > 0 Then ' 检查目录下是否有档案
files(files.Count - 1).Delete ' 删除目录下最後一个档案
End If
Set files = Nothing
Set folder = Nothing
Set fso = Nothing
GPT写的，第8行出问题
WScript.Echo files.Item(0).Name
上面这行也"程序呼叫或引数不正确"
那位教教是那出错？
GPT&BING怎麽问都说没错
thx
--
※ 发信站: 批踢踢实业坊(ptt.cc), 来自: 114.40.232.232 (台湾)
※ 文章网址: https://webptt.com/cn.aspx?n=bbs/Visual_Basic/M.1681536143.A.BDB.html
1F：→ MOONRAKER: 继续问ChatGPT问到他招供阿 04/16 09:59