[maxd2007]

попробовал так:

Код:

$txt = FileRead(@ScriptDir & "\1.txt")
$aLines = StringSplit($txt, 1)
Local $n=0
while $n=$aLines

For $i = 1 To $aLines[0]
    Send($aLines[$i])
    Send("{TAB 2}")
Next
$n=$n+1
WEnd

но не работает (((