On Thu, Jan 29, 2009 at 4:39 PM, Harika medikonda
<[email protected]>wrote:
> Hi deepak
>
> Use following code
>
> Import Outlook
>
> '''Add reference to outlook (project-addreferences-(select com-- Microsoft
> outlook)
>
>
> Dim OlApp As Outlook.Application
>
> Dim Inbox As Outlook.MAPIFolder
>
> Dim InboxItems As Outlook.Items
>
> Dim Mailobject As Object
>
> Dim objattachments, objAttach
>
> OlApp = Server.CreateObject("Outlook.Application")
>
> Inbox =
> OlApp.GetNamespace("Mapi").GetDefaultFolder(Outlook.OlDefaultFolders.olFolderInbox)
>
> InboxItems = Inbox.Items
>
> For Each Mailobject In InboxItems
>
> If Mailobject.UnRead Then
>
> Response.Write("<BR>")
>
> Response.Write(Mailobject.body())
>
>
>
> End If
>
> Next above mentioned code just write body of mail in browser,use some
> excel functionality to output it to excel file.
>
> Just for your reference i have given the code
>
>
> *NOTE : set identity impersonate to true in web.config file of the
> application*
> **
> let me know if you get any security issues.
>
>
>
>
>
>
> On Wed, Jan 28, 2009 at 4:09 PM, deepu <[email protected]> wrote:
>
>>
>> Hi All
>>
>> This is Deepak
>> i am working as S/W in MNC I need a help from any one
>>
>> i want to copy all my email from outlool inbox into excel file can any
>> one please let me know the code in vbscript or javascript
>>
>> Please help me ASAP
>>
>> Thanks in advance
>>
>> Thanks
>> Deepak
>>
>
>
>
> --
> Thanks & Regards
> Harika
> http://harikaworks.blogspot.com
>
>
--
Thanks & Regards
Harika
http://harikaworks.blogspot.com
