ADO Recordset cannot connect to AS 2005

[MrPeds]

Hi,

I have some code that works in VBScript when I try and connect to an analysis services 2000 cube. It does something similar to the following:

set cn = CREATEOBJECT("ADODB.Connection")
set rs = CREATEOBJECT("ADODB.RecordSet")
..
..
Call cn.open ("Provider=MSOLAP; Datasource=" + tServer + "; Initial Catalog=" + tOLAPDatabase + ";Trusted_Connection=Yes")

set rs.ActiveConnection = cn

mdx = "SELECT CrossJoin....."
call rs.Open (mdx) ' execute MDX query and return data

' do something with the data returned....

When I try to do the same thing against AS2005 I get errors such as "[DBNetlib][ConnectionOpen (Connect()).]SQL Server does not exist or access denied.

Code: 80004005
Microsoft OLE DB Provider for SQL Server

I guess my question is, am I still able to connect to AS2005 using ADO to select data as above?

I was wondering if it was my connection string?

Any other suggestions are appreciated.

Mrpeds