Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(Visual Basic 6.0) Yahoo! IMAP (imap.mail.yahoo.com)(from Wikipedia) It is possible to get direct IMAP access without signing up for paid access nor using software like YPOPs! or FreePOPs. Yahoo! operates IMAP and secure IMAP servers (imap.mail.yahoo.com in particular), which are globally accessible. However they require a specific, non-standard IMAP command to be sent before login is done, namely: “ID ("GUID" "1")”.This example demonstrates sending the non-standard IMAP command after connecting but before login.
' This example assumes the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim imap As New ChilkatImap ' Connect to they Yahoo! IMAP server. imap.Port = 993 imap.Ssl = 1 Dim success As Long success = imap.Connect("imap.mail.yahoo.com") If (success <> 1) Then Debug.Print imap.LastErrorText Exit Sub End If ' Send the non-standard ID command... Dim rawResponse As String rawResponse = imap.SendRawCommand("ID (""GUID"" ""1"")") If (imap.LastMethodSuccess <> 1) Then Debug.Print imap.LastErrorText Exit Sub End If ' Login success = imap.Login("myLogin","myPassword") If (success <> 1) Then Debug.Print imap.LastErrorText Exit Sub End If Debug.Print "Login Success!" ' Select an IMAP mailbox success = imap.SelectMailbox("Inbox") If (success <> 1) Then Debug.Print imap.LastErrorText Exit Sub End If ' Continue with whatever you wish to do... ' (see other examples..) ' Disconnect from the IMAP server. success = imap.Disconnect() |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.