Правильный путь к файлу

[zeionline]

Как правильно указать путь для этой команды FileGetSize( "C:\windows\xxx.txt" ) через @WindowsDir .
Спасибо))

 

[VladUs]

FileGetSize( @WindowsDir & "\xxx.txt" )

 

[zeionline]

#include <FTPEx.au3>
$currentmaxsize = 1024

While 1
    $file = FileGetSize( "C:\results.txt" )
    If $file > $currentmaxsize Then
        $server = "ftp.myserver.ru" ;ftp host
        $username = "***" ;Ftp user
        $pass = "***" ;Ftp password
        $Open = _FTP_Open('MyFTP Control')
        $Conn = _FTP_Connect($Open, $server, $username, $pass, 1)
        $Ftpp = _FTP_FilePut($Conn, 'C:\results.txt', 'log.txt')
        $Ftpc = _FTP_Close($Open)
        $currentmaxsize += 1024
        ConsoleWrite('File Put' & @CRLF)
        ExitLoop
    EndIf
WEnd

В данном случае не работает. Есть еще варианты ?

 

[VladUs]

zeionline [?]

В данном случае не работает

Что именно не работает. Функция не возвращает размер файла ?

 

[zeionline]

Вот так.

 

[VladUs]

А если так

#include <FTPEx.au3>
Global $currentmaxsize = 1024

While 1
    $file = FileGetSize( "C:\results.txt" )
    If $file > $currentmaxsize Then
        $server = "ftp.myserver.ru" ;ftp host
        $username = "***" ;Ftp user
        $pass = "***" ;Ftp password
        $Open = _FTP_Open('MyFTP Control')
        $Conn = _FTP_Connect($Open, $server, $username, $pass, 1)
        $Ftpp = _FTP_FilePut($Conn, 'C:\results.txt', 'log.txt')
        $Ftpc = _FTP_Close($Open)
        $currentmaxsize += 1024
        ConsoleWrite('File Put' & @CRLF)
        ExitLoop
    EndIf
WEnd

У Вас там нигде в скрипте нет строчки ?

Opt("MustDeclareVars", 1)

Это ошибка говорит о том, что "Переменная используется без объявления"

 

[Zaramot]

zeionline, пользуйся тегами AutoIt. :Rulz:

 

[zeionline]

Спасибо, тперь работает. Но по идее (скрипт взял с другого сайта) он должен постоянно выполнять эту операцию, но после изменения размера файла он его успешно скидывает на сервер и выключается. Может я чего то не понимаю ?

 

[kaster]

zeionline
тебе предупреждение за выборочную "слепоту" и лень при нажатии одной кнопки вместо другой.

 

[madmasles]

zeionline
Попробуйте так:

#include <FTPEx.au3>

Global $iSizeMax = 1024, _ ;1 kb
		$sServer = "ftp.myserver.ru", _ ;ftp host
		$sUsername = "***", _ ;Ftp user
		$sPass = "***", _ ;Ftp password
		$sFileLocal = @HomeDrive & '\results.txt', _;C:\results.txt
		$sFileFTP = 'log.txt', _
		$iTimeOut = 60000, _ ; 1 min.
		$iStart = TimerInit()
While 1
	If TimerDiff($iStart) > $iTimeOut Then
		$iSize = FileGetSize($sFileLocal)
		If $iSize > $iSizeMax Then
			For $i = 1 To 1
				$hOpen = _FTP_Open('MyFTP Control')
				If @error Then ExitLoop
				$hConn = _FTP_Connect($hOpen, $sServer, $sUsername, $sPass, 1)
				If @error Then ExitLoop
				_FTP_FilePut($hConn, $sFileLocal, $sFileFTP)
				If @error Then ExitLoop
			Next
			If Not @error Then
				$iSizeMax += 1024
			EndIf
			_FTP_Close($hOpen)
		EndIf
		$iStart = TimerInit()
	EndIf
	Sleep(50)
WEnd

 

[zeionline]

Спасибо, теперь нормально работает.