Code:
;-- 2005-02-23 test1.ahk
;-- edit,correct,overwrite,save
F1=URL.TXT
I=0
loop,7
{
I+=1
FileReadLine, line, %F1%, %i%
If Errorlevel <> 0
GoTo,EX3
A%I%=%LINE%
}
EX3:
Gui, Add, Text, x130 y62 w100 h30, Link 1
Gui, Add, Text, x130 y97 w100 h20, Link 2
Gui, Add, Text, x130 y137 w100 h20, Link 3
Gui, Add, Text, x130 y177 w100 h20, Link 4
Gui, Add, Text, x130 y217 w100 h20, Link 5
Gui, Add, Text, x130 y257 w100 h20, Link 6
Gui, Add, Text, x130 y297 w100 h20, Link 7
Gui, Add, Edit, x166 y57 w250 h30 vA1,%A1%
Gui, Add, Edit, x166 y97 w250 h30 vA2,%A2%
Gui, Add, Edit, x166 y137 w250 h30 vA3,%A3%
Gui, Add, Edit, x166 y177 w250 h30 vA4,%A4%
Gui, Add, Edit, x166 y217 w250 h30 vA5,%A5%
Gui, Add, Edit, x166 y257 w250 h30 vA6,%A6%
Gui, Add, Edit, x166 y297 w250 h30 vA7,%A7%
Gui, Add, Button, x50 y337 w100 h30, Save
Gui, Add, Text, x196 y7 w140 h30,Link Editor
Gui, Show, x249 y99 h388 w452, Link Editor
Return
buttonsave:
gui,submit,nohide
FILEDELETE %F1%
ifNotExist, %A_ScriptDir%\%F1%
fileappend,%A1%`r`n%A2%`r`n%A3%`r`n%A4%`r`n%A5%`r`n%A6%`r`n%A7%`r`n,%F1%
GuiClose:
ExitApp