Author |
|
rafaellop Newbie
Joined: 13 September 2007
Online Status: Offline Posts: 26
|
Posted: 06 February 2008 at 2:19pm | IP Logged
|
|
|
Hello,
I've got problems with logs. I've enabled EnableLogging, set a correct path with appropriate permissions to write, and the pop3 object doesn't create any log files though emails are retrieved properly and there's a communication between the pop3 object and a server. The POP3 object is created from code and I use Delphi 6 Pro. Here is the code in a simplified form:
Code:
CoInitialize(nil);
FNewPOP3Client := MailBee_TLB.TPOP3.Create(nil);
with FNewPOP3Client do
begin
Connect; // this is OLE connection, not communication with server
LicenseKey := POP3MAILBEELICENSEKEY;
Timeout := POP3ClientTimeOut;
AuthMethod := 0;
FNewPOP3Client.EnableLogging := true;
LogFilePath := adefinatelycorrectpath;
ClearLog;
end;
result := FNewPOP3Client.Connect1(FHostName, StrToIntDef(FPort, POP3ServerPort), FUserName, FPassword); // Connect1 is the original Connect method. Renamed by the TLB import.
// now message retrieving stuff
// ...
// ...
FNewPOP3Client.Disconnect1;
|
|
|
I've also tried the DElphi POP3DEMO application included in the mailbee.exe installer. I've added the following code to the btnGetMailClick() event handler before the Connect1 call:
Code:
objPOP3.EnableLogging := true;
fn := IncludeTrailingPathDelimiter(ExtractFilePath(application.exe name)) + 'log.txt';
objPOP3.LogFilePath := fn;
objPOP3.ClearLog;
|
|
|
and again there's no log file at all. Could you please let me know any solution for this ?
BTW. The OS is Vista Ultimate, admin account.
Cheers
Rafal
|
Back to Top |
|
|
Andrew AfterLogic Support
Joined: 28 April 2006 Location: United States
Online Status: Offline Posts: 1189
|
Posted: 07 February 2008 at 2:18am | IP Logged
|
|
|
Try to save some data to a file located in adefinatelycorrectpath (the same location as MailBee log file) via standard FileSystemObject object. If there is a problem with permissions, you'll get an error. If the file is written successfully, most probably, there is a problem with TLB import, i.e. EnableLogging or/and LogFilePath were not imported correctly. We encountered a lot of issues with TLB import with various versions of Delphi.
Right now, we have no Delphi installation, so we provide you with VBS sample:
Code:
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.CreateTextFile("custom_log.txt")
f.Write("Sample Text")
f.Close |
|
|
Best regards,
Andrew
|
Back to Top |
|
|