Ver Mensaje Individual
  #2 (permalink)  
Antiguo 04/11/2008, 12:08
Avatar de Muzztein
Muzztein
 
Fecha de Ingreso: agosto-2002
Ubicación: Hangar 18
Mensajes: 1.703
Antigüedad: 22 años, 8 meses
Puntos: 16
Respuesta: Formulario en ASP? Duda

no te entendi, pero asumo que quieres enviar un correo electronico mediante un FORM
para eso usa esta funcion, funciona en la mayoria de los IIS


Código PHP:

    
function enviaEmail(para,cc,desde,asunto,mensaje,servidor)
    
on error resume next

    enviaEmail 
false
    
    dim objCDO
,objCDOConfig,objFields
    Set objCDO      
CreateObject("CDO.Message")
    
Set objCDOConfig  CreateObject("CDO.Configuration")
    
Set objFields    objCDOConfig.Fields
        
    With objFields
      
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = servidor
      
.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
      
.Item("http://schemas.microsoft.com/cdo/configuration/SendUsing") = 2
      
.Update
    End With
    
    With objCDO
      
.Configuration  objCDOConfig
      
.To          para
    
    
if cc <> false then 
      
.cc           cc
    end 
if   
    
      .
From        desde
      
.Subject     asunto
      
.TextBody    mensaje
      
.Send
    End With
    
    Set objFields 
Nothing
    Set objCDO 
Nothing
    Set objCDOConfig 
Nothing 
    
    
if err.number 0 then
        enviaEmail 
true
    
else 
        
enviaEmail err.description
    end 
if
    
on error goto 0

end 
function