Thread Rating:
  • 0 Vote(s) - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
IntGetFile Multiple File Progress
#11
I was able to tweak the main macro to fit exactly what I need to save the files with specified names. It's a little gritty, but does the trick Wink

Function IngGetCSV
Code:
Copy      Help
function ~CSV

;EXAMPLE
;str CSV=
;;http://www.quickmacros.com/images/ss/qm.png,$desktop$\qm.png
;;http://www.quickmacros.com/images/ss/debug.png,$desktop$\debug.png
;IngGetCSV CSV

ICsv v=CreateCsv()
v.FromString(CSV)
for int'r 0 v.RowCount
,str s.addline(v.Cell(r 0))
str saveFolder="$temp$\temp download"
del- saveFolder;err
ARRAY(str) a
IntGetFileMultiProgress s saveFolder a 0x10000

Dir d
foreach(d F"{saveFolder}\*" FE_Dir)
,str sPath=d.FileName(1)
,str fName=d.FileName
,for r 0 v.RowCount
,,str uName.getfilename(v.Cell(r 0) 1)
,,if fName=uName
,,,cop sPath v.Cell(r 1)
del- saveFolder


Messages In This Thread

Forum Jump:


Users browsing this thread: 4 Guest(s)