#include <IE.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
 
SplashTextOn ( "Jotti - Virus Scan Onlile By Atspb", "Đang kết nối tới VN Jotti...."&@CRLF&"Please Wait! " ,300,100)
if ping("http://virusscan.jotti.org/vn",10000) <> 0 then
Msgbox(64,"","Không có kết nối...! Thoát")
exit
endif
$IE = _IECreateEmbedded ()
GUICreate("Jotti - Virus Scan Onlile By Atspb",900, 500, _
        (@DesktopWidth - 900) / 2, (@DesktopHeight - 580) / 2, _
        $WS_OVERLAPPEDWINDOW + $WS_VISIBLE + $WS_CLIPSIBLINGS + $WS_CLIPCHILDREN)
$GUIActiveX = GUICtrlCreateObj($IE,Default,Default,900, 500)
_IENavigate ($IE, "http://virusscan.jotti.org/vn",1)
_IELoadWait($ie)
SplashOff ()
$a=_IEGetObjByName ($ie,"scanfile")
_IEAction($a,'click')
$b=_IEGetObjByName($ie,"submitupload")
_IEAction($b,'click')
_IELoadWait ($ie)
$msg=0
While $msg <> $GUI_EVENT_CLOSE
        $msg = GUIGetMsg()
    WEnd