[[escafandra]]

Empezado por ifrit

IdMessage1->Clear(); IdMessage1->From->Name = "NOMBRE"; IdMessage1->From->Address = "DIRECCION"; IdMessage1->Recipients->Add(); IdMessage1->Recipients->Items[0]->Name = "NOMBRE DESTINO"; IdMessage1->Recipients->Items[0]->Address = "EMAIL DESTINO"; IdMessage1->Subject = "Envio de totales"; IdMessage1->Body->Add("Correo electronico automático"); // No destruir manualmente las instancias de TIdAttachment // ya que TIdMessage lo hará automáticamente Ruta = RUTA_E + "\\EnvCabPed.txt"; if (FileExists(Ruta)) new TIdAttachment(IdMessage1->MessageParts, Ruta); Ruta = RUTA_E + "\\EnvCabTic.txt"; if (FileExists(Ruta)) new TIdAttachment(IdMessage1->MessageParts, Ruta); Ruta = RUTA_E + "\\EnvCaja.txt"; if (FileExists(Ruta)) new TIdAttachment(IdMessage1->MessageParts, Ruta); Ruta = RUTA_E + "\\EnvLinPed.txt"; if (FileExists(Ruta)) new TIdAttachment(IdMessage1->MessageParts, Ruta); Ruta = RUTA_E + "\\EnvLinTic.txt"; if (FileExists(Ruta)) new TIdAttachment(IdMessage1->MessageParts, Ruta); Ruta = RUTA_E + "\\EnvStock.txt"; if (FileExists(Ruta)) new TIdAttachment(IdMessage1->MessageParts, Ruta); IdSMTP1->Host = "SERVIDOR SMTP"; // Yo lo he hecho usando la versión 9 de Indy, pero la que // viene de fabrica en el BCB6 es una versión anterior y creo // que en esta en vez de usar "Username" hay que usar "UserId" // No se si habran mas cambios entre las dos versiones ya que // no lo puedo probar de momento en la versión que trae el BCB IdSMTP1->Username = "USUARIO"; // Actualmente muchos servidores requieren el uso // de una clave que suele ser la misma que para POP3 IdSMTP1->AuthenticationType = atLogin; IdSMTP1->Password = "CLAVE"; try { IdSMTP1->Connect(); } catch(...) { MessageBox(0, "Error al conectar al servidor", "Atención", MB_TASKMODAL | MB_ICONERROR); } if (IdSMTP1->Connected()) { IdSMTP1->Send(IdMessage1); IdSMTP1->Disconnect(); }
este codigo funciona ok! es de _Leo del foro ryanstudios

Hola ifrit, bienvenido.

Revisa el código que expones, posiblemente no te hallas dado cuenta de que es difícil de leer. Trata de indentarlo y colocar las etiquetas de [code].

Saludos.