Hello
I made a small app with a SendMail button.
Here is the code.
procedure TForm1.Button1Click(Sender:
TObject);
begin NMSMTP1.Host := 'smtp.xtra.co.nz'; NMSMTP1.UserID := 'mhoward'; NMSMTP1.PostMessage.ToAddress.Add('[EMAIL PROTECTED]'); NMSMTP1.PostMessage.FromAddress := '[EMAIL PROTECTED]'; NMSMTP1.PostMessage.FromName := 'Anna'; NMSMTP1.PostMessage.Body.Add( 'This is a test email message from within a Delphi test App'); NMSMTP1.Connect; NMSMTP1.SendMail; end; On my own system (my workstation has the modem
connection) if I manually dial up an Xtra connection and then click the SendMail
button, this works fine.
However, the client's system is a Win98/Win95
network which is running MDaemon to handle email. The network's modem
happens to be on the machine that my app is on.
I have changed my test app as
follows.
procedure TForm1.Button1Click(Sender:
TObject);
begin NMSMTP1.Host := '192.168.0.5'; {IP address of the workstation with modem and My app} NMSMTP1.UserID := 'ian'; NMSMTP1.PostMessage.ToAddress.Add('[EMAIL PROTECTED]'); NMSMTP1.PostMessage.FromAddress := '[EMAIL PROTECTED]'; NMSMTP1.PostMessage.FromName := 'Anna'; NMSMTP1.PostMessage.Body.Add( 'This is a test email message from client from within a Delphi test App'); NMSMTP1.Connect; NMSMTP1.SendMail; end; I understood that this should work on the client
system but it fails with the error "Null remote address".
Can anyone see where I have gone
wrong?
Another option would be to by-pass MDaemon (if that
is allowed). But I don't want them to have to dial up a connection
manually (and Rohit's RAS thingamy looks complicated!!)
TIA
Mark |
BEGIN:VCARD VERSION:2.1 N:Howard;Mark FN:Mark Howard ORG:Forest Production Systems Ltd TEL;WORK;VOICE:(07) 348 8177 TEL;CELL;VOICE:(021) 477564 TEL;WORK;FAX:(07) 348 8178 ADR;WORK:;;P.O.Box 5155;Rotorua LABEL;WORK;ENCODING=QUOTED-PRINTABLE:P.O.Box 5155=0D=0ARotorua EMAIL;PREF;INTERNET:[EMAIL PROTECTED] REV:20001213T010023Z END:VCARD