Hi Harika

Thanks for your help.

I will try this and i will get back to you.

Thanks
Deepak Ganer

On Thu, Jan 29, 2009 at 4:40 PM, Harika medikonda
<[email protected]>wrote:

>
>
> On Tu, 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
>
>

Reply via email to