SQL Server

Fetch One POP3 Message by Message Number

Demonstrates the Chilkat MailMan.FetchOne method, which retrieves one message by POP3 message number and stores it in an Email object. The arguments are headerOnly, numBodyLines, the message number (the first message is 1), and the Email. The message remains on the server. This example fetches message 1 in full.

Background: POP3 message numbers are simple 1-based positions valid only for the current session. FetchOne is the way to pull a single message straight into an Email object (rather than a bundle) when you know its position — for example after listing the mailbox. Because numbers can shift between sessions, FetchByUidl is the stabler choice when a message must be identified reliably over time.

Chilkat SQL Server Downloads

Download Chilkat for SQL Server

SQL Server

--
CREATE PROCEDURE ChilkatSample
AS
BEGIN
    DECLARE @hr int
    DECLARE @sTmp0 nvarchar(4000)
    DECLARE @success int
    SELECT @success = 0

    --  Demonstrates the MailMan.FetchOne method, which retrieves one message by POP3 message
    --  number and stores it in an Email object.  The arguments are headerOnly, numBodyLines, the
    --  message number (the first message is 1), and the Email.  The message remains on the server.

    DECLARE @mailman int
    EXEC @hr = sp_OACreate 'Chilkat.MailMan', @mailman OUT
    IF @hr <> 0
    BEGIN
        PRINT 'Failed to create ActiveX component'
        RETURN
    END

    --  Configure the POP3 server connection.
    EXEC sp_OASetProperty @mailman, 'MailHost', 'pop.example.com'
    EXEC sp_OASetProperty @mailman, 'MailPort', 995
    EXEC sp_OASetProperty @mailman, 'PopSsl', 1
    EXEC sp_OASetProperty @mailman, 'PopUsername', 'user@example.com'
    EXEC sp_OASetProperty @mailman, 'PopPassword', 'myPassword'

    --  Fetch message number 1 in full.  headerOnly=0 (fetch the entire message).
    --  Note: numBodyLines only applies when headersOnly is 1 (it sets how many lines of the
    --  body to include along with the headers).  When headersOnly is 0, the entire message
    --  is fetched and numBodyLines is ignored.
    DECLARE @email int
    EXEC @hr = sp_OACreate 'Chilkat.Email', @email OUT

    EXEC sp_OAMethod @mailman, 'FetchOne', @success OUT, 0, 0, 1, @email
    IF @success = 0
      BEGIN
        EXEC sp_OAGetProperty @mailman, 'LastErrorText', @sTmp0 OUT
        PRINT @sTmp0
        EXEC @hr = sp_OADestroy @mailman
        EXEC @hr = sp_OADestroy @email
        RETURN
      END


    EXEC sp_OAGetProperty @email, 'Subject', @sTmp0 OUT
    PRINT 'Subject: ' + @sTmp0

    EXEC sp_OAGetProperty @email, 'From', @sTmp0 OUT
    PRINT 'From: ' + @sTmp0

    --  Note: Explicitly connecting/authenticating is optional.  Chilkat MailMan automatically
    --  connects and authenticates -- using the property settings above -- whenever a server
    --  operation requires it.  Calling the explicit connect/authenticate methods can still be
    --  helpful to determine whether a failure occurs while connecting or while authenticating.

    EXEC @hr = sp_OADestroy @mailman
    EXEC @hr = sp_OADestroy @email


END
GO