Getting the following error message when remotely connecting!

[Ranjan as usual]

Dear folks
I wrote a small snippet in VB .NET to connect to the exchange store, the code is below, however I get the following error message. Any solutions , or pointers would be appreciated. My store is located in exchange server 2003 and I'm developing from a testbox

Here is the error

An unhandled exception of type 'System.Runtime.InteropServices.COMException' occurred in ExchangeServer.ex

Additional information: Provider cannot be found. It may not be properly installed

My code is below

Dim Conn1 As New ADODB.Connectio
Dim Conn2 As New ADODB.Connectio
Dim Rec As New Recor
Conn1.Provider = "exoledb.datasource
Conn1.Open("http://servername/public/"

Rec.Open("http://servername/public/folder/failure notice.eml", Conn1, 3
Rec.Close(
cheers

Ranjan Biswa

[Richard T. Edwards]

Yep, that's the way I excpect it should be.

Nope, you won't be able to get around it.

This issue has been arround before .Net.

Exchange uses a different log in process not recognized by normal windows
credentials.

Once you connect to Exchange, you're in Exchange's world.

Log out and your're back in Windows world. And, you'll be able to connect to
your local databases.

I hear this issue has been addressed and will be resolved soon.
Unfortuantely, I can't devulge further.
"Ranjan as usual" <an*******@discussions.microsoft.com> wrote in message
news:1A**********************************@microsof t.com...

Dear folks,
I wrote a small snippet in VB .NET to connect to the exchange store, the code is below, however I get the following error message. Any solutions , or
pointers would be appreciated. My store is located in exchange server 2003
and I'm developing from a testbox.

Here is the error.

An unhandled exception of type 'System.Runtime.InteropServices.COMException' occurred in ExchangeServer.exe
Additional information: Provider cannot be found. It may not be properly installed.
My code is below:

Dim Conn1 As New ADODB.Connection
Dim Conn2 As New ADODB.Connection
Dim Rec As New Record

Conn1.Provider = "exoledb.datasource"
Conn1.Open("http://servername/public/")

Rec.Open("http://servername/public/folder/failure notice.eml", Conn1, 3) Rec.Close()
cheers,

Ranjan Biswas