Remote_addr Dentro Do Cdosys

[Thiago Gema]

Pessoal não estou conseguindo inserir o REMOTE_ADDR dentro do CDOSYS.

Quero receber o IP atraves do email.

Analise o codigo abaixo.

<%

sch = "http://schemas.microsoft.com/cdo/configuration/"

Set cdoConfig = CreateObject("CDO.Configuration")

With cdoConfig.Fields

.Item(sch & "sendusing") = 2 ' cdoSendUsingPort

.Item(sch & "smtpserver") = "localhost"

.update

End With

Set cdoMessage = CreateObject("CDO.Message")

With cdoMessage

Set .Configuration = cdoConfig

.From = "email@meusite.com"

.To = "email@meusite.com"

.Subject = "IP"

.TextBody = "REMOTE_ADDR"

.Send

End With

Set cdoMessage = Nothing

Set cdoConfig = Nothing

%>

[dark0]

o comando não é somente REMOTE ADDR

ele completo é

Request.ServerVariables("Remote_Addr")

tire as aspas para fazer funcionar como o esperado

abraços