adding numbers...i cant add

[InternalError]

hey, I have this prob, I'm making an app that renames file and the files are name abc-001s.jpg, abc-002s.jpg, etc. So this is what i have:


Dim a as string

a = "001"

do:
filecopy "A:\abc-" & a & "s.jpg", "A:\" & text1.text & ".jpg"
a = a + 1



it makes a turn to 2 when it adds it. so what can i do??!?!?!

[chrisjk]

Originally posted by InternalError
it makes a turn to 2 when it adds it. so what can i do??!?!?!

Isn't that what you want?

[Static]

i think he means ..its 2 instead of 002

try this:

a = 1
Do:
FileNm = "abc-" & Format(a, "000") & "s.jpg"
Filecopy "A:\" & FileNm , "A:\" & text1.text & ".jpg" 
a = a + 1