que esta mal de este codigo. tengo horas analizandolo y no me funciona alguien que me ayude.
<%
'Identificación
Set Correo = server.createobject("CDONTS.Session")
Correo.logonSMTP "administrador" , _
[email protected]"
'Acceder a la bandeja de entrada
Set Bandeja = Correo.inbox
'Crear un objeto que almacene los mensajes de la bandeja anterior
Set Mensajes = Bandeja.messages
'Recuperación de los mensajes
For k = 0 to Mensajes.count
Set elMensaje = Mensajes.item(k)
'Obtener el nombre del remitente
Response.write "Desde: " & elMensaje.sender & "<br>
'Obtener el asunto del mensaje
Response.write "Asunto: " & elMensaje.subject & "<br>"
'Obtener el texto del mensaje
Response.write elMensaje.text & "<br>"
Next
'logoff
Correo.logoff
Set Correo = nothing
%>
Se supone que con el voy a poder leer los correos que han llegado a la cuenta administrador del servidor smtp pero nada.