Hi petrbury,
Is it possibble to do this so that files will not overwritten?
tmp = selectedfolder & "*.jpg /resize(800,600) /aspectratio /convert=*"&"-resized"&".jpg"
Shell("i_view32.exe",tmp)
or
tmp = selectedfolder & "*.jpg /resize(800,600) /aspectratio /convert=*.png"
Shell("i_view32.exe",tmp)
then use...
FileSearch (Arraylistjpg,selectedfolder & "*"&"-resized"&".jpg") 'to gather all jpg on the folder and assigned value to array list 'arraylistjpg'
Obviously you have already return file names and count.
Maybe try 'filesearch' to gather all files and assign to arraylist.
and use arraylist to resize your pictures one by one.
FileSearch (Arraylistjpg,selectedfolder & "*.jpg")
for i=0 to arraylistjpg.count-1
tmp = selectedfolder & arraylistjpg.item(i)&".jpg /resize(800,600) /aspectratio /convert=& arraylistjpg.item(i)
Shell("i_view32.exe",tmp)
next i
but shell could be exhausted..
Regards,
__________________
Rioven
DEVICE: Motorola ATRIX (Dual Core) Android 2.2.1
DESKTOP: Intel Pentium Dual-core E5200; Microsoft® Windows® Vista Home (Basic); Hard Disk:320GB; Memory:4096MB
Last edited by Rioven : 10-16-2007 at 11:27 AM.
Reason: text added
|