Mandar email sin "mailto"

[deymos]

Estoy haciendo una web en ASP y me falta un pequeño detalle. Tiene que tener la opcion de poder enviar un email al webmaster pero sin usar el comando mailto, ya que este comando lo que hace es abrir el cliente de correo instalado en el ordenador. El problema es que me han pedido que no tiene que hacer falta que se abra el cliente de correo, si no que se tiene que enviar directamente al darle al boton send. He buscado por ahi en paginas de programar ASP y tal pero no me aclaro mucho. ¿Hay algun script o algo que se ejecute al clickear el boton send y mande el correo directamente?

Gracias

[Santus]

Copiado de la MSDN Library, es el método que uso yo.

NewMail Object (CDONTS Library)
The NewMail object provides for sending a message with very few lines of code.

At a Glance
Specified in type library: CDONTS.DLL
First available in: CDO for NTS Library version 1.2
Parent objects: (none)
Child objects: (none)
Default property: Value

Properties

Name Available since version
Type
Access
Bcc 1.2 String Write-only
Body 1.2 IStream object or String Write-only
BodyFormat 1.2 Long Write-only
Cc 1.2 String Write-only
ContentBase 1.2 String Write-only

ContentLocation 1.2 String Write-only
From 1.2 String Write-only
Importance 1.2 Long Write-only
MailFormat 1.2 Long Write-only
Subject 1.2 String Write-only
To 1.2 String Write-only
Value 1.2 String Write-only
Version 1.2 String Read-only

Methods

Name Available since version
Parameters
AttachFile 1.2 Source as Object or String,
(optional) FileName as String,
(optional) EncodingMethod as Long
AttachURL 1.2 Source as Object or String,
ContentLocation as String,
(optional) ContentBase as String,
(optional) EncodingMethod as Long

Send 1.2 (optional) From as String,
(optional) To as String,
(optional) Subject as String,
(optional) Body as Object or String,
(optional) Importance as Long
SetLocaleIDs 1.2 CodePageID as Long

Ejemplo:

dim correo
set correo = CreateObject("CDONTS.NewMail")
correo.body = "Texto del correo"
correo.subject ="Titulo del correo"
correo.From = "midireccion@midominio.com"
correo.To = "destino@dominio.com"
correo.BodyFormat=0
correo.mailFormat=0
correo.Send

Espero que te sea de ayuda.

[deymos]

Perdona que tarde tanto en contestar, pero es que me he pegado un huevo de tiempo intentandolo sin exito. Efectivamente es con lo que tu me dices pero resulta, que el servidor en el que cuelgo la web en lugar de instalar lo de CDONTS, los muy **** instalaron DUNDAS, así que ya me podía volver mono intentado hacer funcionar el correo.

Un saludo y muchas gracias.

[Santus]

Por curiosidad, con esa librería, la DUNDAS, ¿qué objeto usas para enviar correo?

[deymos]

Copio y pego del tutorial:

Sending an Email with the SendMail Method
<%
'most control methods throw an exception if an error occurs so we will use an On Error statement
On Error Resume Next
Dim objMailer 'Mailer control
'create instance of Mailer control
Set objMailer = Server.CreateObject("Dundas.Mailer")
'set Mailer control properties and collection items
objMailer.TOs.Add "martine@dundas.com"
objMailer.FromAddress = "FromMe@SomeServer.com"
objMailer.Subject = "Subject"
objMailer.Body = "This is the body."
'send email
objMailer.SendMail
'you can test for the success/failure of the operation by examining VBScript's Err object here

Set objMailer = Nothing
%>

¿A esto te refieres?

Un saludo

[Santus]

Si, a eso me refería, siempre es bueno saber alternativas.

Saludos y gracias.