Autohotkey → Autoit Please help me.

[doter]

This is a source of AutoHotkey.

This source or can be converted to the AutoIt?

 

Please help me.

myPath=%A_Dir%\AllowChk.txt
UrlDownloadToFile, http://www.myserver.com/ExecAllowChk.txt, %myPath%
Sleep, 1000
FileRead, Contents, %myPath%
if not ErrorLevel
{
       Sort, Contents
       if Contents != Allow
       {
              filedelete AllowChk.txt
              MsgBox %Contents%
              Exit
       }
}

[bogQ]

think it can, opet autoit help file and read about next references

 

InetGet

Sleep

FileRead

If...ElseIf...Else...EndIf

MsgBox

FileDelete

examples for them are on bottom

Edited June 9, 2014 by bogQ

[Bert]

Yes. This code is pretty straight forward. Take a look at the help file and the post your attempt at converting it.

[doter]

I not make a program of this degree ...

I seems to be a fool...

Error occurs in Inetget.

I'm not sure.

Hope you help please.

[Bearpocalypse]

Post the code you have so far.

[JLogan3o13]

doter, as is being pointed out by several members, this is not a forum where you put in a request and we barf up code for you. You must show some effort if you expect help. You have been directed to the relevant sections of the help file, now let's see what you have tried on your own.

[AutID]

I don't know autohotkey but looking at ur code maybe something like this?

Local $myPath = @DesktopDir & "\AllowChk.zip"
Local $UrlDownloadToFile = "http://download.thinkbroadband.com/10MB.zip"
Local $hDownload = InetGet($UrlDownloadToFile, $myPath, 1, 1)
; Wait for the download to complete by monitoring when the 2nd index value of InetGetInfo returns True.
; It is better than Sleep(1000)
$hTimer = TimerInit()
Do
 Sleep(250)
Until InetGetInfo($hDownload, 0) Or TimerDiff($hTimer) > 10000 ; avoid infinity loop in case of corrupted file.
Local $Open = FileOpen($myPath)
Local $Read = FileRead($Open)
If Not @error Then
 $hTimer = TimerInit()
 While FileExists($myPath)
  If TimerDiff($hTimer) > 10000 Then ExitLoop ;avoid infinity loop in case of error
  FileDelete($myPath)
  Sleep(500)
 WEnd
 MsgBox(0, "", $Read)
 ;Exit
EndIf