hvala marcha sredjeno sa onim kodom, samo u USES sam dodo Wininet.
hvala reiser radi i to.
e jos da sredim slanje fajla.
treba iz foldera gde se nalazi program da posalje bazu katalog.xml
Code:
NMSMTP1.Host := '64.157.4.78';
NMSMTP1.Port := 25;
NMSMTP1.UserID := 'tvoj_username';
NMSMTP1.Connect;
NMSMTP1.PostMessage.FromAddress := '
[email protected]';
NMSMTP1.PostMessage.FromName := 'Yahoo!';
NMSMTP1.PostMessage.ToAddress.Text := 'moj e
[email protected]';//
NMSMTP1.PostMessage.Body.Text := 'TekstPoruke';
NMSMTP1.PostMessage.Subject := 'Subject';
NMSMTP1.PostMessage.Attachments.Add('katalog.xml');
NMSMTP1.SubType := mtHtml; //može, a i ne mora
NMSMTP1.SendMail;
samo sto mi izbacuje gresku
Connect failed
ima li nekakav drugi kod, ili ovde treba nesto da se izmeni da bi radilo
GYGY