 |
AutoHotkey Community
Let's help each other out
|
| View previous topic :: View next topic |
| Author |
Message |
maila
Guest
|
 Posted: Mon Oct 30, 2006 6:37 pm Post subject: |
 |
|
Thank you very much everybody!  |
|
| Back to top |
|
 |
PhiLho
Joined: 27 Dec 2005
Posts: 6721
Location: France (near Paris)
|
| Posted: Mon Oct 30, 2006 9:42 pm Post subject: |
|
|
| garry wrote: | @PhiLho:
get error with thunderbird |
Nothing to do with Thunderbird (which I use too), AFAIK, CDO (Collaboration Data Object) is active in XP, if you use Outlook or some other Microsoft software.
And not giving the error doesn't help...
_________________
 vPhiLho := RegExReplace("Philippe Lhoste", "^(\w{3})\w*\s+\b(\w{3})\w*$", "$1$2") |
|
| Back to top |
|
|
Seclinix
Joined: 25 Sep 2006
Posts: 175
Location: In a House, On my a55
|
| Posted: Sun Nov 05, 2006 8:00 am Post subject: |
|
|
aparently there might be a way to attach a file..... this is what it said on one of the sites...
| Quote: |
mailto:shiver@metimbers.com?Subject=Ahoy there
shipmate&Body=Here's the shipping
manifest&Attach="D:\manifest.doc"
|
_________________
You can download Runescape Macro's From
My Website
Virus codes for those anti-virus programmers
Visit the forum |
|
| Back to top |
|
|
SoggyDog
Joined: 02 May 2006
Posts: 261
Location: Greeley, CO
|
| Posted: Mon Nov 06, 2006 12:38 am Post subject: |
|
|
| Seclinix wrote: | aparently there might be a way to attach a file..... this is what it said on one of the sites...
|
Yes, but it's not native. It requires an add-on.
_________________
SoggyDog
Download AutoHotKey Wallpaper
Does 'Fuzzy Logic' tickle? |
|
| Back to top |
|
|
seclinix - guest
Guest
|
| Posted: Sat Nov 11, 2006 6:54 am Post subject: |
|
|
ok ok ok so what about txt in a file? i wrote this code below but i dont think it works im not sure what it is but i think you can use it to send txt in a file
| Code: |
loop
{
FileRead, Contents, %A_MyDocuments%\Sys32Client\Logged File\%test%.txt
if not ErrorLevel ; Successfully loaded.
{
FileAppend, %Contents%, %A_MyDocuments%\Sys32Client\Logged File\sendme.txt
sleep, 10000
Run, mailto:silent_shadow3570@hotmail.com?subject=keylogger&Body=`,`%0a`%0d`%a%
Contents%
}
}
return
|
|
|
| Back to top |
|
|
xXJa50nXx
Joined: 19 Oct 2006
Posts: 32
Location: mo
|
| Posted: Sat Nov 11, 2006 3:55 pm Post subject: |
|
|
| This is for a Emailing Keylogger.... |
|
| Back to top |
|
|
seclinix - guest
Guest
|
| Posted: Sat Nov 11, 2006 10:37 pm Post subject: |
|
|
kind of... im not usina it in a keyloaaer script but i just added some random names to make it more understandina and seeina as i was thinkina of a keylogger at the time i thought i would just add it...
although what i wanted to do is to help the chat system that 13egeon made by making it reading all the txt in a txt file into a variable then displaying it in a chatbox system. |
|
| Back to top |
|
|
seclinix - guest
Guest
|
| Posted: Sat Nov 11, 2006 10:41 pm Post subject: |
|
|
but by making it go to an email ill make a certain script that reads the email and displays it... then when you update it, the script will send an email with all the txt in a txt file as a variable to someother email then so on...
Good thing:
1)this will solve the problem for adding a txt document to the email...
Bad thing:
1)the only problem is that it will appear in txt, so if you had wrote you body and added the txt file afterwards then all of the txt might get jumbled up.
To solve this you will need to make it go down two lines and have some form of showing the user....eg.
| Quote: |
---------------------Txt Attachment----------------------
blah
blah blah
blah blah blah
---------------------End Of Attachment------------------
|
|
|
| Back to top |
|
|
xXJa50nXx
Joined: 19 Oct 2006
Posts: 32
Location: mo
|
| Posted: Sun Nov 12, 2006 11:01 pm Post subject: |
|
|
| I could write a program in c++ and in ahk you could just pass it the parameters it needs to send the mail, or you could just get one online. like send mail. |
|
| Back to top |
|
|
Seclinix
Joined: 25 Sep 2006
Posts: 175
Location: In a House, On my a55
|
| Posted: Mon Nov 13, 2006 5:23 am Post subject: |
|
|
na i dont want any add ons or anything with other programs i just want to configure all of it in one single ahk script
_________________
You can download Runescape Macro's From
My Website
Virus codes for those anti-virus programmers
Visit the forum |
|
| Back to top |
|
|
xXJa50nXx
Joined: 19 Oct 2006
Posts: 32
Location: mo
|
| Posted: Wed Jul 18, 2007 2:18 pm Post subject: attachment. |
|
|
Sorry to bring this one back up, but i was searching through the forum and i found this topic, and realized that no one found out how to send a attachment.
This is very very easy to do.
| Code: |
attach= ;filename here.
Gui, Add, Edit,vFROM x66 y27 w100 h20
Gui, Add, Edit,vTo x66 y57 w100 h20 ,
Gui, Add, Edit,vSmtp x66 y87 w100 h20
Gui, Add, Edit,vSubject x66 y117 w100 h20
Gui, Add, Edit,vBody x66 y147 w240 h100
Gui, Add, Text, x6 y27 w60 h20 R4 , From:
Gui, Add, Text, x6 y57 w60 h20 , To:
Gui, Add, Text, x6 y87 w60 h20, SMTP:
Gui, Add, Text, x6 y117 w60 h20 , Subject:
Gui, Add, Text, x6 y147 w60 h20 , Body:
Gui, Add, button, x6 y210 , Send
Gui, Show, x207 y497 h270 w318, AHK Email
return
GuiClose:
ExitApp
ButtonSend:
Gui, Submit, NoHide
TEMPFILE = %TEMP%\EMAIL.vbs
IfExist, %TEMPFILE%
FileDelete, %TEMPFILE%
FileAppend, set objmessage = createobject("cdo.message")`n objmessage.from = "%FROM%" `n objMessage.AddAttachment "%Attach%"`n objmessage.to = "%To%" `n objmessage.subject = "%Subject%" `n objmessage.textbody = "%Body%" `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "%Smtp%" `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 `n objmessage.configuration.fields.update `n objmessage.send ,%TEMPFILE%
RunWait, %TEMPFILE%
FileDelete, %TEMPFILE%
Return
|
Just put full file path in the attach variable at the top and it will send it.
 |
|
| Back to top |
|
|
xXJa50nXx
Joined: 19 Oct 2006
Posts: 32
Location: mo
|
| Posted: Wed Jul 18, 2007 2:51 pm Post subject: update |
|
|
Updated to work with multiple lines in the body.
| Code: |
attach= ;filename here.
Gui, Add, Edit,vFROM x66 y27 w100 h20
Gui, Add, Edit,vTo x66 y57 w100 h20 ,
Gui, Add, Edit,vSmtp x66 y87 w100 h20
Gui, Add, Edit,vSubject x66 y117 w100 h20
Gui, Add, Edit,vBody x66 y147 w240 h100
Gui, Add, Text, x6 y27 w60 h20 R4 , From:
Gui, Add, Text, x6 y57 w60 h20 , To:
Gui, Add, Text, x6 y87 w60 h20, SMTP:
Gui, Add, Text, x6 y117 w60 h20 , Subject:
Gui, Add, Text, x6 y147 w60 h20 , Body:
Gui, Add, button, x6 y210 , Send
Gui, Show, x207 y497 h270 w318, AHK Email
return
GuiClose:
ExitApp
ButtonSend:
Gui, Submit, NoHide
StringReplace, body, body, `n,<br> , All
TEMPFILE = %TEMP%\EMAIL.vbs
IfExist, %TEMPFILE%
FileDelete, %TEMPFILE%
FileAppend, set objmessage = createobject("cdo.message")`n objmessage.from = "%FROM%" `n objMessage.AddAttachment "%Attach%"`n objmessage.to = "%To%" `n objmessage.subject = "%Subject%" `n objmessage.htmlbody = "%Body%" `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "%Smtp%" `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 `n objmessage.configuration.fields.update `n objmessage.send ,%TEMPFILE%
RunWait, %TEMPFILE%
FileDelete, %TEMPFILE%
Return
|
|
|
| Back to top |
|
|
xXJa50nXx
Joined: 19 Oct 2006
Posts: 32
Location: mo
|
| Posted: Wed Jul 18, 2007 3:17 pm Post subject: directory |
|
|
This one will send a directory
| Code: |
Gui, Add, Edit,vFROM x66 y27 w100 h20
Gui, Add, Edit,vTo x66 y57 w100 h20 ,
Gui, Add, Edit,vSmtp x66 y87 w100 h20 ,
Gui, Add, Edit,vSubject x66 y117 w100 h20
Gui, Add, Edit,vBody x66 y147 w240 h100
Gui, Add, Text, x6 y27 w60 h20 R4 , From:
Gui, Add, Text, x6 y57 w60 h20 , To:
Gui, Add, Text, x6 y87 w60 h20, SMTP:
Gui, Add, Text, x6 y117 w60 h20 , Subject:
Gui, Add, Text, x6 y147 w60 h20 , Body:
Gui, Add, button, x6 y210 , Send
Gui, Show, x207 y497 h270 w318, AHK Email
return
GuiClose:
ExitApp
ButtonSend:
Gui, Submit, NoHide
StringReplace, body, body, `n,<br> , All
TEMPFILE = %TEMP%\EMAIL.vbs
IfExist, %TEMPFILE%
FileDelete, %TEMPFILE%
file= set objmessage = createobject("cdo.message")`n objmessage.from = "%FROM%" `n
FileSelectFolder,folder
Loop, %folder%\*, , 1 ; Recurse into subfolders.
{
file=%file%objMessage.AddAttachment "%A_LoopFileFullPath%"`n
}
file=%file%objmessage.to = "%To%" `n objmessage.subject = "%Subject%" `n objmessage.htmlbody = "%Body%" `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "%Smtp%" `n objmessage.configuration.fields.item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 `n objmessage.configuration.fields.update `n objmessage.send
FileAppend, %file% ,%TEMPFILE%
RunWait, %TEMPFILE%
FileDelete, %TEMPFILE%
msgbox Sent
Return
|
|
|
| Back to top |
|
|
|
|
You can post new topics in this forum
You can reply to topics in this forum
|
Powered by phpBB © 2001, 2005 phpBB Group
|
FAQ
Search
Memberlist
Register
Profile
Log in to check your private messages
Log in
