Что нового

Https- Gofile.io D Zp1m96 -

Https- Gofile.io D Zp1m96 -

You can upload entire folders (multiple files at once). The link will lead to a page listing all files, which recipients can download individually or as a ZIP archive.

Unlike many free hosts that cap speeds at 50–100 KB/s, Gofile offers unrestricted download speeds. A 1 GB file can be downloaded in minutes on a decent connection. https- gofile.io d ZP1m96

When you visit this link, you may be prompted to download a file or view its contents directly in your browser. The file type, size, and name will depend on the specific file associated with the link. You can upload entire folders (multiple files at once)

The link https://gofile.io/d/ZP1m96 follows their standard URL pattern: A 1 GB file can be downloaded in

Many free file hosts force you to solve puzzles or click through pop-up ads. Gofile has none of that.

Once you're satisfied with your paper, save it in a widely accepted format like .docx or .pdf. You can then upload it to GoFile.io or any other platform of your choice.

Автор
T

Tuxzer92

Новичок
Сообщения
65
Репутация
0
Код:
#include <GUIConstantsEx.au3>
#include <ButtonConstants.au3>

Local $nCh1, $nCh2, $nCh3, $nCh4, $nCh5, $nCh6, $msg, $text, $FileSize
$TotalSize=0
$DownloadSize=3
$Free="9"
GUICreate("My GUI Checkbox") ; Создаёт окно в центре экрана
$Label=GUICtrlCreateLabel($text,10,50,100,50)
$Label2=GUICtrlCreateLabel($Free,50,50,100,50)
$nCh1 = GUICtrlCreateCheckbox("Checkbox 1", 10, 10, 120, 20)
$nCh2 = GUICtrlCreateCheckbox("Checkbox 2", 10, 90, 120, 20)
$nCh3 = GUICtrlCreateCheckbox("Checkbox 3", 10, 150, 120, 20)
GUISetState() ; показывает созданное окно

; Запускается цикл опроса GUI до тех пор пока окно не будет закрыто
While 1
    $msg = GUIGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then ExitLoop
   Switch $msg
	  Case $nCh1
		 Check($msg)
	  Case $nCh2
		 Check($msg)
	  Case $nCh3
		 Check($msg)
   EndSwitch
WEnd

Func Check($msg)
   If GUICtrlRead($msg) = $GUI_CHECKED Then
	  $TotalSize+=$DownloadSize
	  GUICtrlSetData ($Label, $TotalSize )
	  If $TotalSize >= $Free Then
		 MsgBox(16,"","ERROR")
	  EndIf
   EndIf
   If GUICtrlRead($msg) = $GUI_UNCHECKED Then
	   $TotalSize-=$DownloadSize
	  GUICtrlSetData ($Label, $TotalSize )
   EndIf
EndFunc

Решил так.
 
Верх