inserts image in message body:
http://necb.bizhat.com/kmeleon/picmailer.7z
requires outlook express to be default email client. unfortunately, unlike other clients; oe does not support -attach and -attachment parameters so the script functions in a somewhat baroque method but it works smoothly and fast.
script source:
; AutoIt Version: 3.0
; Language: English
; Platform: Win9x/NT
; Author: yanni
; Script Func: Automates inserting images from k-meleon to outlook express
;
#NoTrayIcon
#automation
$sAttach = $CmdLineRaw
ShellExecute("mailtosubject=Emailing:Image&body=Note: To protect against computer viruses, e-mail programs may prevent sending or receiving certain types of file attachments. Check your e-mail security settings to determine how attachments are handled.")
sleep(80);
WinWaitActive("New Message")
sleep(300);
Send("{TAB}") ;
sleep(60);
Send("{TAB}") ;
sleep(60);
Send("{TAB}") ;
sleep(60);
Send("{TAB}") ;
Send("!i") ;
sleep(40);
Send("p") ;
sleep(40);
send($sAttach);
sleep(40);
Send("{ENTER}");
snapshots:
UPDATE: macro and script update(download from same link)
1-message subject=ImageURL instead of 'emailing:image
2-pasting ImageURL instead of 'typing' (works very fast, insertbox hardly visible)
updated src:
#NoTrayIcon
#automation
ShellExecute("mailtosubject=&body=Note: To protect against computer viruses, e-mail programs may prevent sending or receiving certain types of file attachments. Check your e-mail security settings to determine how attachments are handled.")
sleep(80);
WinWaitActive("New Message")
sleep(300);
Send("{TAB}") ;
sleep(40);
Send("{TAB}") ;
sleep(40);
Send("{TAB}") ;
send("^v");
sleep(40);
Send("{TAB}") ;
Send("!i") ;
sleep(40);
Send("p") ;
sleep(40);
send("^v");
sleep(40);
Send("{ENTER}");
UPDATE2: super fast+ preserving 'Emailing:' before ImageURL in subjectline
#NoTrayIcon
#automation
$sAttach = $CmdLineRaw
ShellExecute("mailtosubject=Emailing: &body=Note: To protect against computer viruses, e-mail programs may prevent sending or receiving certain types of file attachments. Check your e-mail security settings to determine how attachments are handled.")
WinWaitActive("New Message")
sleep(30);
Send("{TAB 3}") ;
Send("{RIGHT 10}")
send("^v");
sleep(10);
Send("{TAB}") ;
Send("!i") ;
sleep(10);
Send("p") ;
sleep(10);
send("^v");
Send("{ENTER}");
Edited 2 time(s). Last edit at 12/02/2008 03:06PM by disrupted.