plcforum.uz.ua

International PLC Forum
It is currently Fri Sep 21, 2018 1:13 pm

All times are UTC + 3 hours


Forum rules


Please click here to view the forum rules



Post new topic Reply to topic  [ 2 posts ] 
Author Message
PostPosted: Fri Jan 05, 2018 9:29 pm 

Joined: Fri Jan 18, 2013 8:16 pm
Posts: 7
Доброе время суток, коллеги.
Новогодние каникулы самое плохое время, дурная голова...
К вопросу, есть такое дело:
Code:
Set objEmail=CreateObject("CDO.Message")
objEmail.From=""****@gmail.com"
objEmail.To=""****@gmail.com"
objEmail.Subject="Тэст"
objEmail.Textbody=" Осталось научится слать чё нужно objTag... "
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendusername") = "****@gmail.com"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "*****"
objEmail.Configuration.Fields.Item ("http://schemas.microsoft.com/cdo/configuration/languagecode") = 1049
objEmail.BodyPart.CharSet = "windows-1251"
objEmail.Configuration.Fields.Update

Всё прекрасно, отправляет принимает все видно. Так вот не задача слать просто привет вОрд, не наш метода. Хочется собирать сообщение из тегов, просеных тогов и так далее, понятно что нужно

Code:
Dim objTag
Set objTag = HMIRuntime.Tags("NewTag")

Но при попытки собрать собрать эту красотень во что нибудь такое

[code]objEmail.Textbody=" Осталось научится слать чё нужно 'objTag'... " [/code]
или
[code]objEmail.Textbody=" Осталось научится слать чё нужно" +objTag...


Получаю Error повсему экрану... Что делаю не так ? Какой синтаксис в данной теме ?


Top
 Profile  
 
PostPosted: Fri Jan 05, 2018 9:46 pm 

Joined: Fri Jan 18, 2013 8:16 pm
Posts: 7
Все разобрался чукча не читатель..
Code:
& objTag.Read & vbCrLf


Top
 Profile  
 
Display posts from previous:  Sort by  
Post new topic Reply to topic  [ 2 posts ] 

All times are UTC + 3 hours


Who is online

Users browsing this forum: Владимир and 5 guests


You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum

Search for:
Jump to:  
Powered by International PLCforum® Forum Software © PLCforum
Mobile version