Problema Outlook.Application

[zero_sos]

Hola a todos,

Estoy intentando enviar un email utilizando Exchange con el outlook application.

Ahora bien, cuando pongo el siguiente codigo:

<%

dim o
dim m

set o = createobject("outlook.application")
set m = o.CreateItem(olMailItem)

with m
'.to = inputbox("To", "Mail","")
'.subject = inputbox("Subject", "Mail","")
'.body = inputbox("Content", "Mail","")


.to = "efernandez"
.subject = "Importante"
.body = "Por fin lo hicimos"
.send
end with

%>


Sin embargo, cuando lo ejecuto me dice que Activex Cant Create Object "Outlook.Application", alguien sabe que error puede ser este?

Yo comprobe este codigo haciendo un .vbs con este codigo, y se ejecuto sin problemas.

Por favor cualquier comentario me servira de mucho.

Saludos.!

Zero