t0ddie Posted October 19, 2006 Posted October 19, 2006 (edited) This used to work with the old autoit... Everytime i try to compile an old script with the new autoit it never works. its like all my old scripts have to be rewritten! can someone fix this? expandcollapse popup#include <GUIConstants.au3> GUICreate("SMTP 25 1.1 by AsimZameer") GUICtrlCreateLabel ("Smtp :", 20, 10, 50) GUICtrlCreateLabel ("From :", 20, 40, 50) GUICtrlCreateLabel ("To :", 20, 70, 50) GUICtrlCreateLabel ("Name :", 20, 100, 50) GUICtrlCreateLabel ("Subject :", 20, 130, 50) GUICtrlCreateLabel ("Body :", 20, 160, 50) GUICtrlCreateLabel ("Status :", 5, 215, 50) $input1 = GUICtrlCreateInput("mx1.mail.yahoo.com",70,10,250,20) $input2 = GUICtrlCreateInput("snip",70,40,250,20) $input3 = GUICtrlCreateInput("snip",70,70,250,20) $input4 = GUICtrlCreateInput("asimzameer",70,100,250,20) $input5 = GUICtrlCreateInput("test message",70,130,250,20) $input6 = GUICtrlCreateInput("Hello WOW ASIM SMTP really Works",70,160,250,20) $myedit=GUICtrlCreateEdit ("Readme: After click on Send Button Wait Until status = 3 When Status = 3 it Means Email Successfully sent & Please Fill all Boxs Correctly If SMTP Address Not Works Automatically Exit and Close "& @CRLF, 1,230,400,70,$WS_DISABLED) $btn = GUICtrlCreateButton ("Send", 160, 310, 60, 20) GUISetState () While 1 $msg = GUIGetMsg() If $msg = $GUI_EVENT_CLOSE Then ExitLoop If $msg = $btn Then $g_IP = GUICtrlRead($input1) $sData1 = "HELO " & GUICtrlRead($input4) & @CRLF $sData2 = "MAIL FROM: <" & GUICtrlRead($input2) &">" & @CRLF $sData3 = "RCPT TO: <" & GUICtrlRead($input3) &"> "& @CRLF $sData4 = "DATA" & @CRLF $sData5 = "From:" & GUICtrlRead($input4) & "< " & GUICtrlRead($input2) &" >" & @CRLF $sData6 = "To:" & GUICtrlRead($input3) & @CRLF $sData7 = "Subject:" & GUICtrlRead($input5) & @CRLF $sData8 = "Sender: Microsoft Outlook Express 6.00.2800.1158" & @CRLF $sData9 = "Mime-Version: 1.0" & @CRLF $sData10 = "Content-Type: text/plain; charset=US-ASCII" & @CRLF $sData11 = @CRLF $sData12 = GUICtrlRead($input6) & @CRLF $sData13 = "." & @CRLF TCPStartUp() $socket = TCPConnect(TCPNameToIP($g_IP), 25) If $socket = -1 Then Exit $ret1 = GUICtrlSetData ($myedit,TCPSend($socket, $sData1) ) sleep(100) $ret2 = GUICtrlSetData ($myedit,TCPSend($socket, $sData2) ) sleep(100) $ret3 = GUICtrlSetData ($myedit,TCPSend($socket, $sData3) ) sleep(100) $ret4 = GUICtrlSetData ($myedit,TCPSend($socket, $sData4) ) sleep(100) $ret5 = GUICtrlSetData ($myedit,TCPSend($socket, $sData5) ) sleep(100) $ret6 = GUICtrlSetData ($myedit,TCPSend($socket, $sData6) ) sleep(100) $ret7 = GUICtrlSetData ($myedit,TCPSend($socket, $sData7) ) sleep(100) $ret8 = GUICtrlSetData ($myedit,TCPSend($socket, $sData8) ) sleep(100) $ret9 = GUICtrlSetData ($myedit,TCPSend($socket, $sData9) ) sleep(100) $ret10 = GUICtrlSetData ($myedit,TCPSend($socket, $sData10) ) sleep(100) $ret11 = GUICtrlSetData ($myedit,TCPSend($socket, $sData11) ) sleep(100) $ret12 = GUICtrlSetData ($myedit,TCPSend($socket, $sData12) ) sleep(100) $ret13 = GUICtrlSetData ($myedit,TCPSend($socket, $sData13) ) sleep(100) EndIf Wend Edited November 8, 2012 by Melba23 Valik Note Added 19 October 2006 - 08:38 AMAdded to warn level I just plain don't like you.
t0ddie Posted October 19, 2006 Author Posted October 19, 2006 dont use betaim not.this was back from a year or 2 ago.. using another stable version.i know its still working on that version, because i have a compiled .exe and it sends the email.if i compile the code with version 3.2 when i run it, it does nothing... Valik Note Added 19 October 2006 - 08:38 AMAdded to warn level I just plain don't like you.
Moderators SmOke_N Posted October 19, 2006 Moderators Posted October 19, 2006 This used to work with the old autoit...Everytime i try to compile an old script with the new autoit it never works.its like all my old scripts have to be rewritten!can someone fix this?Down right lazy! Common sense plays a role in the basics of understanding AutoIt... If you're lacking in that, do us all a favor, and step away from the computer.
Valik Posted October 19, 2006 Posted October 19, 2006 I call bullshit. There was no stable version of AutoIt supporting socket functionality until 3.2.0.0 which was released a couple months ago. I'm locking this thread. First, you don't provide reliable information - you didn't compile that script with a stable version two or even one year(s) ago. Second, you expect us to fix your script for you. Not happening. Fix it yourself.
Recommended Posts