FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Una ayudita, para este codigo
Me aparece un error:
Error ´method add´ Quien me puede ayudar a corregirlo
|
#2
|
||||
|
||||
Hola
Hay dias en los que no se puede hacer todo, reconozco tu perseverancia abraham. En este caso me quedo corto con mi poco conocimiento, pero si a deducir vamos, el error para mi lo esta diciendo casi todo, el metodo que usas para adherir no debe ser el correcto, yo intentaria ver que para sin las comas o en su defecto las concatenaria. Repito esta es solo una opinion, no pretendo darte una explicacion de algo que desconozco. Saludos |
#3
|
||||
|
||||
cambie la forma de add y nda
el error me aparece apartir de esta linea
......................................................... Mail.Configuration.Fields.Add('http://schemas.microsoft.com/cdo/configuration/sendusername') :='abraham'; Mail.Configuration.Fields.Add('http://schemas.microsoft.com/cdo/configuration/sendpassword') :='clave'; cambie esto y nada. |
#4
|
|||
|
|||
Hola Abraham, al parecer la propiedad Add no existe, en el codigo de abajo reemplacé tus "adds" por "Items"
procedure TForm1.Button1Click(Sender: TObject); var Mail: Variant; begin Mail:= CreateOleObject('CDO.Message'); Mail.From:= 'ingeniro_abraham@hotmail.com'; Mail.Subject:= 'Saludo'; Mail.TextBody:= 'Cuerpo del Email'; Mail.To:= 'ingeniro_abraham@hotmail.com'; Mail.Configuration.Fields.Item('http://schemas.microsoft.com/cdo/configuration/sendusername'):='abraham'; Mail.Configuration.Fields.Item('http://schemas.microsoft.com/cdo/configuration/sendpassword'):='clave'; Mail.Configuration.Fields.Item('http://schemas.microsoft.com/cdo/configuration/sendusing') := 2; Mail.Configuration.Fields.Item('http://schemas.microsoft.com/cdo/configuration/smtpserver') := 'www.hotmail.com'; Mail.Configuration.Fields.Item('http://schemas.microsoft.com/cdo/configuration/smtpserverport') := 25; Mail.Configuration.Fields.Item('http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout') := 60; Mail.Send; Mail:= Unassigned; end; saludos.
__________________
"La información tiene más valor cuando se comparte" |
#5
|
||||
|
||||
Gracias, algo anda mal.
gracias fer21unmsm
Ciertamente era eso. gracias comparto con ustedes mis detalles, cuando este cod, este bien funcionando lo anexare a la lista de trucos, para q otros usuarios tengan una forma facil de enviar email. en pocas lineas El problema se soluciono pero queda otro problemita el sgte error: THE SENDUSING, Configuracion value is invalid
|
#6
|
|||
|
|||
Man este truco lo publique yo pero me di cuenta tarde de que no funciona bien siempre, tienes ke poner tu smtp predeterminado y aun asi no funciona del todo bien.
Por ejemplo, en mi caso tendria ke poner el smtp: 'smpt.mundo-r.com' Te recomiendo ke uses los componentes de indy, van perfectos. Salu2 |
#7
|
||||
|
||||
donde bajo los componentes indy
los tienes, como funcionan
|
#8
|
|||
|
|||
Los componentes Indy vienen en todas las versiones de Delphi a partir de Delphi 4 (si no me equivoco), si no los puedes descargar gratis.
http://www.indyproject.org/Sockets/D...orland.EN.aspx Son faciles de utilizar y seguro que por el foro encuentras mil ejemplos. Luego te busco un programa que habia creado con los componentes indy y te pego algo de code. Salu2 |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
una ayudita para un novato | majuub | Internet | 5 | 14-05-2007 22:47:22 |
Que significa este codigo? | D-MO | PHP | 14 | 23-01-2006 10:08:21 |
Para que demonios sirve este código | marcoszorrilla | Varios | 16 | 07-12-2005 14:51:35 |
Alguno conoce este codigo? | gatsu | PHP | 2 | 29-08-2004 08:39:09 |
Por que no funciona este codigo en XP? | kia | Varios | 3 | 15-10-2003 21:39:33 |
|