Para capturar la ip lo tengo asi:
<html>
<head>
<title></title>
</head>
<body>
<form action="enviarmail.asp" method="post">
<%
dim cliente_ip
cliente_ip = Me.Request.ServerVariables("REMOTE_ADDR")
Response.write ("Su dirección IP es: "&cliente_ip)
%>
<p>
Enviar IP por correo:
<input type="submit" value="Enviar" name="enviar" />
</p>
</form>
</body>
</html>
Pero para enviarla por correo es el problema que tengo,encontre esto pero nose como hacerlo funcionar:
<html>
<head >
<title>Página ASP de prueba para enviar mensajes</title>
</head>
<body>
<%
set mail=server.CreateObject("CDONTS.NewMail")
mail.To = fastlane.sv@gmail.com
mail.Subject = Envio de IP
mail.Body = Request(cliente_ip)
mail.BodyFormat = 0 ' 0 = HTML, 1 = Plain
mail.MailFormat = 1 ' 0 = MIME, 1 = Text
mail.Importance = 1 ' 0 =High, 1 = Medium, 2 = Low
mail.Send
set mail=nothing
%>
<p>
<b>Se ha enviado el mensaje:</b><br>
A: <%= Request("receiver") %><br>
Con el asunto: <%= Request("subject") %>
</p>
</body>
</html>