Email with Cx-Supervisor

[electro1212 0]

Hi there I want to send mails with cx-supervisor. Does someone want to try to compose vbscript for this Don t forget, the cx-supervisor in my plant was on a domain. The script must have dns server adress, gateway adress, smtp adress Thank you for your help

[tashinz 9]

Try myomron? http://www.myomron.com/index.php?action=kb&article=45 regards

[electro1212 0]

it try it before It doesn't work because i dont have script for dns and gateway adress. excuse me, its basic four u, but i don t know nothing about script programming thank u for your help

[asdruball 0]

hello everyone, greetings, I need some help. I used the script for sending mail from page http://www.myomron.com/index.php?action=kb&article=45 and worked well with files attached. But my question is the following: I need to send the copy of page in cx supervisor where i have day consumption including historic of the Month which line that i need to use in attachment like "print screen" and send it by email. this is possible ? (Print scren to pdf not work because every day the save file is same name) thanks in advance the code Set objMessage = CreateObject("CDO.Message") objMessage.Subject = "teste de email" objMessage.From = "pc@gmail.com" objMessage.To = "my.mail@gmail.com" objMessage.TextBody = "teste" objMessage.addattachment "C:\test_count.pdf" objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1 objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.gmail.com" objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "my.mail@gmail.com" objMessage.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "*******" objMessage.Configuration.Fields.Update objMessage.Send