but not success.Var FirstFreeLetter
${For} $0 A Z
IfFileExists $0\*.* 0 Done
StrCpy $FirstFreeLetter $0
${ExitFor}
Done:
${Next}
Thanks.
5 posts
but not success.Var FirstFreeLetter
${For} $0 A Z
IfFileExists $0\*.* 0 Done
StrCpy $FirstFreeLetter $0
${ExitFor}
Done:
${Next}
StrCpy $0 'ABCDEFGHIJKLMNOPQRSTUVWXYZ'
StrCpy $1 0
start:
StrCpy $2 $0 1 $1
StrCmp $2 '' end
IntOp $1 $1 + 1
;MessageBox MB_OK '$$0={$0}$\n$$1={$1}$\n$$2={$2}'
${If} ${FileExists} '$2:\*'
Goto start
${Else}
StrCpy $0 '$2:'
Goto end
${EndIf}
end:
MessageBox MB_OK|MB_USERICON '$0'