Como enviar imagen don hipervinculo en E-mail CDONTS

[AJVEvoluzione]

Hola! el tema es asi tengo que enviar una mail a la direccion que me ingresend e un formulario, en el cual va una imagen con jipervinculo no se como hacerlo me da error cad vez que lo intento
Saludos!

Código:

sub envio_mail

Dim mailx

mailx= Request.Form("textfield1")

Dim ObjMail
Set ObjMail = Server.CreateObject("CDONTS.NewMail")
ObjMail.To = mailx
ObjMail.From = "- EGRESADOS -<[email protected]"
ObjMail.Subject = "Calendario Eventos"
body = "------- Calendario Eventos -------"    
body = body & vbCrLf & "Hola! para ver el calendario hace click: "  
body = body & vbCrLf & "-"
body = body & vbCrLf & <p align='center'><a href='http://www.miweb.com/eventosmail/2004.htm'><img src='http://www.miweb.com./aqui.gif' width='150' height='23'></a></p>&
body = body & vbCrLf & "-"
body = body & vbCrLf & "Mandame el dato de tu fiesta a [email protected]"

ObjMail.Body = body

ObjMail.Send
Set ObjMail = Nothing
Response.Redirect "http://www.miweb.com/ok.htm"

end sub 'envio_mail

[trasgukabi]

Código:

body = body & vbCrLf & <p align='center'><a href='http://www.miweb.com/eventosmail/2004.htm'><img src='http://www.miweb.com./aqui.gif' width='150' height='23'></a></p>&

Esta línea está mal, compadre. fíjate cómo termina.

debería terminar

Código:

.......</a></p>"

[AJVEvoluzione]

No funciona tampoco porque me escribe todos los caracteres como texto <p align='center'><a ....

[AJVEvoluzione]

jeejej ya esta era que no estab puesto enviar en formato HTML el mail. hay que poner lo siguiente

objMail.BodyFormat = "0"

[osce]

Hola, tengo un servidor IIS montado en un windows XP y cuando ejecuto el codigo de envio de cdonts me sucede esto:

Tipo de error:
Objeto Server, ASP 0177 (0x800401F3)
Cadena clase no válida
/html/cdontsss.asp, línea 15

alguna idea?