问题描述
我修改了下面的代码以尝试让我的列表显示转到 URL 并将结果写入列表的结果,然后我可以(手动)在 excel 中进行匹配。
Set objFSO = CreateObject("Scripting.FileSystemObject")
File = "C:\Users\212708488\Desktop\Project Bacon\Excellist.txt"
Set objFile = objFSO.OpenTextFile(File)
FileNumber = 0
Do Until objFile.AtEndOfStream
URLFromList = objFile.ReadLine
FileNumber = FileNumber + 1
if download(URLFromList,"test" & FileNumber & ".txt",false) then
wscript.echo "download ok for " & URLFromList
else
wscript.echo "download did not work for " & URLFromList
end if
Loop
objFile.Close
objFSO = nothing
如果您能将我引向正确的方向,我将不胜感激。 谢谢!!
解决方法
暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!
如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。
小编邮箱:dio#foxmail.com (将#修改为@)