Solved

Receiving mail message line by line using Tclient Socket

Posted on 2004-08-02
3
128 Views
Last Modified: 2010-04-05
Hi

My question is the same as in title.
The problem is that i can connect to my mailbox ('+OK POP3 ready') but mail server doesn't accept and respond with '+OK' why I'm sending command 'user someuser' .
Any ideas.

My example:
(...)

var
s:string[30];
p:pchar;

begin
        s:='user someuser'#0;
        p:= @S[1];
        ClientSocket.Socket.SendBuf(p,length(p));


Thank you in advance.
0
Comment
Question by:Murdoc
  • 2
3 Comments
 

Author Comment

by:Murdoc
ID: 11702103
No answer so i will increase pints to 100. Hope i t will help :)
0
 
LVL 8

Accepted Solution

by:
gmayo earned 100 total points
ID: 11702145
I think you may be missing some protocol characters... the mail server needs to know where each message begins and ends, as sockets are raw data. For example if you send "Hello world" followed by "Goodbye" the text received at the other end would be "Hello worldGoodbye". A quick Google suggests that each command should be followed by CRLF but there may be more to it than that.

http://www.faqs.org/rfcs/rfc1939.html

Example:
s:='user someuser'#13#10#0;

Geoff M.
0
 

Author Comment

by:Murdoc
ID: 11702933
Hi

You we're right qmayo. Really thanks for your help.

It suppose to be:      s:='user someuseri'#13#10;

Regards.
0

Featured Post

Is Your Active Directory as Secure as You Think?

More than 75% of all records are compromised because of the loss or theft of a privileged credential. Experts have been exploring Active Directory infrastructure to identify key threats and establish best practices for keeping data safe. Attend this month’s webinar to learn more.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
delphi exception 7 62
Send message from delphi to whatsapp, is it possible? 3 1,160
Delphi: how to implement a User Shortcut mapper? 1 95
QRReport  TQrmemo vertical stretching 1 42
This article explains how to create forms/units independent of other forms/units object names in a delphi project. Have you ever created a form for user input in a Delphi project and then had the need to have that same form in a other Delphi proj…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
Hi friends,  in this video  I'll show you how new windows 10 user can learn the using of windows 10. Thank you.

911 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

17 Experts available now in Live!

Get 1:1 Help Now