
Opie
Active Members-
Posts
20 -
Joined
-
Last visited
About Opie
- Birthday 09/26/1993
Recent Profile Visitors
67 profile views
Opie's Achievements

Seeker (1/7)
0
Reputation
-
Smtp Mailer That Supports Html And Attachments.
Opie replied to Jos's topic in AutoIt Example Scripts
Not sure what it is, but i'll get over it right? -
Smtp Mailer That Supports Html And Attachments.
Opie replied to Jos's topic in AutoIt Example Scripts
When I use this UDF it only sends sometimes..and when it does it takes nearly an hour to get to my email. I really enjoy this UDF, but I noticed that a fucntion for sending SMTP mail was recently added to autoit beta. Is your UDF still better? (seeing as it supports attachments) -
Took the words straight from my brain
-
Wow thanks much! Ya know..its funny. When I run into an error its always a very little thing, never anything big. I have got to stop programming for 6 hours at a time.... Thanks so much
-
I am making a log in screen for practice. I have never seen the skeleton of a log in screen, nor tried to code one. I do however know how they behave and how the login screen should return values, etc etc. I have the log in GUI to retrieve data from my server based on the username entered. It will read that, then download a text file containing user information. If the entered username doesn't exist, then it wont download. If i ever plan on using this on a real project I will be using encryption methods I've modified to prevent account stealing. I try to use Inetget() to download the text file (even tried the file as .html but didn't work) from my server, however that didn't work. I also tried Inetread, but its not returning any values. I will post my code below, if someone could review it and let me know what I am doing wrong, that would be great, thank you so much! I used this method having the accoutn information on my desktop and that worked, however, trying to download the information is not. Here is the link to the only account I have on my server: http://delusionality.info/noseeum/jacob.txt I apologize for the messy variable names and such. I am able to understand them like this. #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #region ### START Koda GUI section ### Form= $Form1_1 = GUICreate("Log in Form by Jacob", 283, 127, 192, 124) $username_bar = GUICtrlCreateInput("", 96, 16, 121, 21) $password_bar = GUICtrlCreateInput("", 96, 40, 121, 21) $Label1 = GUICtrlCreateLabel("Username", 24, 16, 60, 17) $Label2 = GUICtrlCreateLabel("Password", 24, 40, 50, 17, BitOR($GUI_SS_DEFAULT_INPUT, $ES_PASSWORD)) $Button1 = GUICtrlCreateButton("Log in", 104, 72, 75, 25) GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### Global $ReadUsername_GUI = GUICtrlRead($username_bar) Global $ReadPassword_GUI = GUICtrlRead($password_bar) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $Button1 InetGet("http://www.delusionality.info/noseeum/" & $ReadUsername_GUI & ".txt", @DesktopDir & "jacob.txt", 1, 0) _login() Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _login() Local $OpenUserFile = FileOpen(@DesktopDir & "\" & $ReadUsername_GUI & ".txt") Local $ReadUsername = FileReadLine($OpenUserFile, 1) Local $ReadUserpass = FileReadLine($OpenUserFile, 2) If $ReadUsername_GUI == $ReadUsername Then If $ReadPassword_GUI == $ReadUserpass Then MsgBox(48, "Welcome!", "Welcome " & $ReadUsername_GUI) Else MsgBox(16, "Error!", "Username and Password combination Invalid.") Return EndIf Else MsgBox(16, "Error!", "Username and Password combination Invalid.") Return EndIf EndFunc ;==>_login
-
ileandro, you will want to use @programsdir if you are distributing the script. Not all program files directories are c;/program files/x You have to take into account the Home Drive and 64 bit systems. So @programsdir is a sure fire way to find c:/program files
-
GuiCtrlRead() Not returning variables as string?
Opie replied to Opie's topic in AutoIt General Help and Support
I have no idea why i've been missing that :OO Thanks so much for pointing it out for me AdmiralAlkex you're a great guy ^__^ -
I'm currently making a program for a user to send emails to multiple mail servers (aol, gmail, yahoo, etc). For this I am using Jos's SMTP UDF located here: I have tested this UDF without a GUI by directly inputting needed information and it works, phenomenally. So i decided to make a GUI version because not everyone is going to have AU3 installed. In the GUI I am using GuiCtrlRead() to return the values directly to the variables needed for sending the mail. I've done this for dozens of programs I've made in the past and this is the first one to ever give me a hard time. It's as if the GuiCtrlRead() function isn't returning the proper type of variable or just nothing at all. Any help as to why the heck this is happening would be much more than appreciated. I have been stressing over this for a few days D: PS My background with Autoit3 is about 1 year of constant coding plus background with java, VB6, C++ and a few others. Below is a screenshot of the error. http://gyazo.com/b1a6136a7f0677ae8a677f4e1f91ec99.png?1333606993 Here is the snippet of code I am using to grab the needed value, etc etc. #include <file.au3> #include <ButtonConstants.au3> #include <EditConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #region ### START Koda GUI section ### Form= $Form1 = GUICreate("AutoMail v0.1", 577, 294, 320, 233) $FromNameIn = GUICtrlCreateInput("", 8, 56, 121, 21) $FromEmailIn = GUICtrlCreateInput("", 136, 56, 121, 21) $ToEmailIn = GUICtrlCreateInput("", 8, 104, 121, 21) $CcAddressIn = GUICtrlCreateInput("", 8, 152, 121, 21) $BodyIn = GUICtrlCreateEdit("", 288, 192, 185, 89) GUICtrlSetData(-1, "") $AttachButt = GUICtrlCreateButton("Attachment", 160, 148, 75, 25) $BccAddressIn = GUICtrlCreateInput("", 136, 104, 121, 21) $SubjectIn = GUICtrlCreateInput("", 288, 152, 121, 21) $UsernameIn = GUICtrlCreateInput("", 344, 56, 121, 21) $PasswordIn = GUICtrlCreateInput("", 344, 80, 121, 21) $SendButt = GUICtrlCreateButton("Send", 488, 256, 75, 25) GUICtrlCreateLabel("Body", 288, 176, 28, 17) GUICtrlCreateLabel("Subject", 288, 128, 40, 17) GUICtrlCreateLabel("From Name", 8, 40, 58, 17) GUICtrlCreateLabel("From Email", 136, 40, 55, 17) GUICtrlCreateLabel("To Email", 8, 88, 45, 17) GUICtrlCreateLabel("Bcc", 136, 88, 23, 17) GUICtrlCreateLabel("Cc", 8, 136, 17, 17) GUICtrlCreateLabel("Username", 288, 56, 52, 17) GUICtrlCreateLabel("Password", 288, 80, 50, 17) GUICtrlCreateLabel("AutoMail - HackCommunity.com: The Best Ethical Hacking Forum", 132, 8, 313, 17) GUICtrlSetColor(-1, 0xFF00FF) GUISetState(@SW_SHOW) #endregion ### END Koda GUI section ### ;################################## ; Variables ;################################## $SmtpServer = "smtp.gmail.com" ; address for the smtp-server to use - REQUIRED $FromName = GUICtrlRead($FromNameIn) ; name from who the email was sent $FromAddress = GUICtrlRead($FromEmailIn) ; address from where the mail should come $ToAddress = GUICtrlRead($ToEmailIn) ; destination address of the email - REQUIRED $Subject = GUICtrlRead($SubjectIn) ; subject from the email - can be anything you want it to be $Body = GUICtrlRead($BodyIn) ; the messagebody from the mail - can be left blank but then you get a blank mail $AttachFiles = "" ; the file(s) you want to attach seperated with a ; (Semicolon) - leave blank if not needed $CcAddress = GUICtrlRead($CcAddressIn) ; address for cc - leave blank if not needed $BccAddress = GUICtrlRead($BccAddressIn) ; address for bcc - leave blank if not needed $Importance = "Normal" ; Send message priority: "High", "Normal", "Low" $Username = GUICtrlRead($UsernameIn) ; username for the account used from where the mail gets sent - REQUIRED $Password = GUICtrlRead($PasswordIn) ; password for the account used from where the mail gets sent - REQUIRED $IPPort = 25 ; port used for sending the mail ;$ssl = 0 ; enables/disables secure socket layer sending - put to 1 if using httpS $IPPort = 465 ; GMAIL port used for sending the mail $ssl = 1 ; GMAILenables/disables secure socket layer sending - put to 1 if using httpS While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $AttachButt _vSend() Case $SendButt $AttachFiles = FileOpenDialog("Please choose your attachment", @WorkingDir, "All (*.*)", 3) Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd Func _vSend() Global $oMyRet[2] Global $oMyError = ObjEvent("AutoIt.Error", "MyErrFunc") $rc = _INetSmtpMailCom($SmtpServer, $FromName, $FromAddress, $ToAddress, $Subject, $Body, $AttachFiles, $CcAddress, $BccAddress, $Importance, $Username, $Password, $IPPort, $ssl) If @error Then MsgBox(0, "Error sending message", "Error code:" & @error & " Description:" & $rc) EndIf EndFunc ;==>_vSend
-
How do you remove characters every X amount of characters?
Opie replied to Opie's topic in AutoIt General Help and Support
I noticed i pasted the wrong encrypted text into the OP, my apologies. I was running through different variations and C/P'd the wrong one. This example works, just shows a little jibberish at the end. thanks much! note: idc much about the security. its just a simple vb6 key mask. -
How do you remove characters every X amount of characters?
Opie replied to Opie's topic in AutoIt General Help and Support
i kinda realize that but members of a forum im active on requested a real-time key crypter. Not sure why o.0 So i just decided to mask and pretend its real encryption xD Thank you, ill try it edit: it didnt work either D: the outcome in the console was -
How do you remove characters every X amount of characters?
Opie replied to Opie's topic in AutoIt General Help and Support
Thanks ill try this out! Darn, it didnt work ( Sorry man. also, editing in what the decrypted text is. -
Well basically, i made a generic masking type encryption in VB6 and its pretty random. I can only think of one way to remove the mask and show the decrypted text. The encryption is based on Pseudo Alpha Numeric Generation with modification to include most common ASCII characters. The decrypted text is turned into capitals to prevent easier decryption. Obviously a few lowercase among all uppercase is well; Obvious. An example of the encryption is the decrypted text in the above example is The mask generates code around the decrypted text like this VV RandomGen(Number of characters to produce) ;===> This is the function and the parameters, so you know what im talking about strD ;===> This is the variable that stores the decrypted text. ++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++ This actual string of code for the generation is like this. RandomGen(10) & UCase(strD + RandomString(8)) & RandomGen(10) What i want to do is use autoit3 as a decryptor and extract the decrypted text by erasing the randomly generated code. So Delete 10, skip one, delete 8, skip 1, delete 10, skip one...and so on and so forth. Im sure you guys understand right? Im not gonna lie, i suck horribly at string management in AU3. Which is why i am asking for help. I would love any kind of help and credits would be to you in the decrypter when made. Thanks much! -Jacob
-
Im working on a project in C# and would like to incorporate some autoit3 into it, but im curious as to how. Wouldnt i use AutoitX, and how would i know what would need to be called.
-
i never said it was a big secret dude, chill. And what kind of category for asking the question? o;
-
I made a UDF that allows you to play a SWF file in the GUI. Uses size dimensions, you can pause/stop/resume/loop the SWF, choose locally of course. I know there are methods to build it right into your script, but should i release it as a UDF?