Desde 1993, a PS5 INTERNET trabalha como provedor de internet, com isso, aprimoramos muito o conhecimento em configuração de servidores e redes de informação. Contamos com uma equipe altamente capacitada para solucionar problemas e propor soluções. Se você ou sua empresa necessita de servidores web, servidores de e-mail, back-up, repositório de arquivos, firewall, nas plataformas FREE BSD, LINUX, WINDOWS, TOM CAT entre outros, entre em contato conosco, um de nossos consultores irá até você e resolverá seu problema.


Ligue para um de nossos consultores: 61 3214-8200

Para enviar e-mails no Windows usando o componente CdoSYS do Windows 2003, use como exemplo o seguinte código abaixo, alterando-o como desejar:

<%
sch = "http://schemas.microsoft.com/cdo/configuration/"
Set cdoConfig = Server.CreateObject("CDO.Configuration")
cdoConfig.Fields.Item(sch & "sendusing") = 2
cdoConfig.Fields.Item(sch & "smtpserver") = "supermail.ps5.com.br"
cdoConfig.fields.update
Set cdoMessage = Server.CreateObject("CDO.Message")
Set cdoMessage.Configuration = cdoConfig
cdoMessage.From = "seuemail@seusite.com.br"
cdoMessage.To = "destino@site.com.br"
cdoMessage.Subject = "Assunto"
cdoMessage.HTMLBody = hbody
cdoMessage.Send
Set cdoMessage = Nothing
Set cdoConfig = Nothing
%>