[AccessD] ADP

Alternatively, if you want to give the users the ability to modify the Connection, just use this code:

  DoCmd.RunCommand acCmdConnection

It works in both .adp's and .ade's (At least for Access XP)

-Chris Mackin

-----Original Message-----
From: accessd-bounces at databaseadvisors.com
[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Francisco
Tapia
Sent: Thursday, September 16, 2004 11:55 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] ADP


oh, in that case you want to do this via code. 
For your database make sure to add the REFRENCE to "Microsoft OLE DB
Service Component 1.0 Type Library" from a code module, then use the
following in either an ON click of a button.

    Dim dl As MSDASC.DataLinks
    Dim cn As ADODB.Connection
    Dim rs As ADODB.Recordset
    


    Set dl = New MSDASC.DataLinks
    Set cn = New ADODB.Connection
    Set rs = New ADODB.Recordset

    Set cn = dl.PromptNew
    currentproject.connection.connectionstring = Trim(cn.ConnectionString)



On Thu, 16 Sep 2004 17:12:53 +0200, Carlo van der Zon (Access IT
Training) <carlo at xsit.nl> wrote:
> Ok, but this is not working in runtime.
> 
> -----Oorspronkelijk bericht-----
> Van: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] Namens fhtapia at gmail.com
> Verzonden: woensdag 15 september 2004 17:30
> Aan: Access Developers discussion and problem solving
> Onderwerp: Re: [AccessD] ADP
> 
> File |Connection, then select the full connection settings
> 
> On Wed, 15 Sep 2004 14:59:10 +0200, Carlo van der Zon (Access IT
> Training) <carlo at xsit.nl> wrote:
> > Hi Group,
> >
> > Does anybody know how to choose de SQL database in a ADP Runtime?
> >
> > Thanks
> > Carlo
> >
> > --
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> >
> 
> --
> -Francisco
> "Rediscover the web"
> http://www.mozilla.org/products/firefox/
> ttp://spreadfirefox.com/community/?q=affiliates&id=792&t=86
> --
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> --
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



-- 
-Francisco
"Rediscover the web"
http://www.mozilla.org/products/firefox/
ttp://spreadfirefox.com/community/?q=affiliates&id=792&t=86
-- 
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com