RE: Using Remote Data Provider with JET provider

From: Jim Rodgers (JimRodgers_at_discussions.microsoft.com)
Date: 07/27/04 

Date: Mon, 26 Jul 2004 20:41:21 -0700

Hello group,

I, ALSO, am trying to use the JET provider remotely using the Remote data provider
without any success.

Here is my VB6SP6 / ADO2.8 code:

Attempt #1

    Dim DS As New RDS.DataSpace
    Dim DF As Object
    Dim rs As ADODB.Recordset
    Set DF = DS.CreateObject("RDSServer.DataFactory", "http://dataserver.local")
    Set rs = DF.Query("DSN=MyOrdersSystemDsn", "SELECT * FROM Customers")

> The error I am getting is:

    Internet Server Error

Attempt #2

    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    cn.Open "Provider=MS Remote; " & _
        "Data Source=MyOrdersSystemDsn;" & _
        "Remote Server=http://dataserver.local;"
    Set rs = New ADODB.Recordset
    rs.Open "SELECT * FROM Customers;", cn

> The error I am getting is:

    Internet Server Error

Variations on Attempt #2

    I've tried the following variations in the ConnectionString:

    (a) Tried "DSN=" versus "Data Source="
    (b) Tried omitting "Remote Provider="
    (c) Tried "Remote Provider=MSDASQL;"
    (d) Tried "Remote Provider=Microsoft.Jet.OLEDB.4.0;"

The ONLY things I've done to the servers is to enable the IIS and to
create the System DSN. (These systems all have MDAC 2.8 and the MSJet
stuff installed.) I've tried using a Win2k server and a Win2003 Server.
I've tried accessing the local machine as well as a remote machine.
The same error every time. Absolutely no luck!

BTW, the System DSN does work locally without any reference to remote
access.

I've reviewed http://support.microsoft.com/default.aspx?scid=kb;en-us;183294
and many other links as well.

This is freaking me out. So many unbilled hours. Somebody please help!

Thanks Folks,

James W. (Jim) Rodgers, P.E.
Senior Consultant
General Consulting Engineers, LLC
Atlanta, GA

"Strider" wrote:

> Hello group,
>
> I am trying to use the JET provider remotely using the Remote data provider,
> here is my VBS code:
>
> set rs = CreateObject("ADODB.Recordset")
> set cn = CreateObject("ADODB.Connection")
>
> 'Open connection (succeeds)
> cn.Open "Provider=MS Remote;Remote Server=[ip of local
> machine];RemoteProvider=Microsoft.Jet.OLEDB.4.0;Data Source=[path to MDB
> file]"
>
> ' Open Table
> ' Fails
> rs = cn.execute("[Table Name]", 0, 2)
>
> The error I am getting is:
>
> Microsoft ADO/RDS: Business object cannot be created.
>
> Two questions:
> Can the OLEDB Remove provider be used with JET provider?
> If yes, what I am doing wrong?
>
> Thanks Guys,
>
> Strider
>
>
>
>
>
>

Relevant Pages

  • Re: Creating remote objects
    ... >> This creates an instance of Word on the local machine from Excel 2000, ... I don't have a remote server to go against. ... >> (ByVal lpszIID As String, ByVal piid As Long) As Long ... >> Dim rclsid As GUID ...
    (microsoft.public.excel.programming)
  • Re: Identifying computers running given program ?
    ... computers and then terminate the execution of program "A". ... Dim objRootDSE, strDNSDomain, objTrans, strNetBIOSDomain ... On Error GoTo 0 ... ' Subroutine to check if a program is running on a remote computer. ...
    (microsoft.public.vb.general.discussion)
  • Re: MSMQ from mobile 5 fails to upload data into remote private queue
    ... Try using DIRECT:TCP instead of DIRECT:OS for your remote queue path. ... I am trying to upload some data into a remote private queue which is ... Dim lsMSMQPath As String ...
    (microsoft.public.dotnet.framework.compactframework)
  • RE: Enable Remote Desktop remotely
    ... dim vbQuestion ... 'Connect to the Remote Registry using WMI space ... 'Ask the User if he wants to reboot the machine right now or do it later.... ... This post is a suggestion for Microsoft, ...
    (microsoft.public.scripting.vbscript)
  • Re: Remoting SAO help
    ... Robson Siqueira ... About the disconnection, as far as I am concerned, in the way I ... and then remote it? ... Dim data() As String ...
    (microsoft.public.dotnet.framework.remoting)