Martin Reid
mwp.reid at qub.ac.uk
Sat May 6 16:13:02 CDT 2006
Ah I need to do this with both!! Martin -----Original Message----- From: "MartyConnelly"<martyconnelly at shaw.ca> Sent: 5/6/06 1:51:16 AM To: "Access Developers discussion and problem solving"<accessd at databaseadvisors.com> Subject: Re: [AccessD] Enumerate SQL Servers You might have problems with SQLDMO on SQL 2005 as it has been supplanted with SQLSMO and you might have to use WMI, I haven't checked the differences. Martin Reid wrote: >Thanks James. > >Just did something similar for the actual database names which is step 2. Idea is combo 1 lists the servers, then combo 2 lists the databases on each server. > > > >Best Wishes > > >Martin > >Martin WP Reid >Training and Assessment Unit >Riddle Hall >Belfast > >tel: 02890 974477 > > >________________________________ > >From: accessd-bounces at databaseadvisors.com on behalf of James Barash >Sent: Fri 05/05/2006 20:36 >To: 'Access Developers discussion and problem solving' >Subject: Re: [AccessD] Enumerate SQL Servers > > > >Martin: > >Here is a example which should work in Access. You will need to reference >the SQLDMO library to make it work. > > Dim oApp As SQLDMO.Application > Dim oNames As SQLDMO.NameList > Dim oName As Variant > > Set oApp = New SQLDMO.Application > Set oNames = oApp.ListAvailableSQLServers() > For Each oName In oNames > cboServers.AddItem oName > Next > >Hope it helps. > >James Barash > >-----Original Message----- >From: accessd-bounces at databaseadvisors.com >[mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Martin Reid >Sent: Friday, May 05, 2006 3:05 PM >To: Access Developers discussion and problem solving >Subject: [AccessD] Enumerate SQL Servers > > >Anyone got an example of populating a drop down list in Access with all >available SQL Servers? >I am building a new login procedure. > >Martin > > > >Martin WP Reid >Training and Assessment Unit >Riddle Hall >Belfast > >tel: 02890 974477 > > > >-- >AccessD mailing list >AccessD at databaseadvisors.com >http://databaseadvisors.com/mailman/listinfo/accessd >Website: http://www.databaseadvisors.com <http://www.databaseadvisors.com/> > > > > >------------------------------------------------------------------------ > >No virus found in this incoming message. >Checked by AVG Free Edition. >Version: 7.1.392 / Virus Database: 268.5.5/333 - Release Date: 05/05/2006 > > -- Marty Connelly Victoria, B.C. Canada -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com