[AccessD] System Root

MartyConnelly martyconnelly at shaw.ca
Mon Aug 4 17:54:11 CDT 2003


To see all the environ variables names and values
 and no I don't know what rosebud means;)
Sub testenviron()
Dim i As Long
Dim envStr As String

For i = 1 To 30
envStr = Environ(i)
Debug.Print i & "=" & envStr
Next
End Sub

dave sharpe wrote:

>Stephen
>
>The environmental variable  ( systemroot ) is what You need.
>I hope that the following helps.
>
>Dave
>=============================
>
>Sub ttest()
>
>Dim aroot As String
>aroot = Environ$("systemroot")
>
>Debug.Print aroot
>
>
>End Sub
>
>
>----- Original Message ----- 
>From: "Stephen R. Zayko" <szayko at secor.com>
>To: "'Access Developers discussion and problem solving'"
><accessd at databaseadvisors.com>
>Sent: Monday, August 04, 2003 5:50 PM
>Subject: [AccessD] System Root
>
>
>  
>
>>Group:
>>
>>How do I determine if the system root is C:\Windows, C:\Winnt, or
>>something else in VBA?  I would like to call a program in
>>%SystemRoot%\System32 from a shell function but
>>
>>intX = Shell("%SystemRoot%\system32\calc.exe",1)
>>
>>does not work.  However, one of these will work if it is calling the
>>correct root directory name:
>>intX = Shell("C:\Windows\system32\calc.exe",1) ' For Windows OS
>>intX = Shell("C:\Winnt\system32\calc.exe",1) ' For NT OS
>>
>>Thanks in Advance,
>>
>>Stephen R. Zayko, P.E.
>>
>>SECOR International Inc.
>>2321 Club Meridian Drive, Ste E
>>Okemos, MI 48864
>>
>>(p) (517) 349-9499 ex24
>>(f) (517) 349-6863
>>(m) (517) 204-5136
>>
>>szayko at secor.com
>>www.secor.com
>>
>>-----Original Message-----
>>From: Mike and Doris Manning [mailto:mikedorism at ntelos.net]
>>Sent: Tuesday, April 08, 2003 02:47 PM
>>To: szayko at secor.com
>>Subject: RE: [AccessD] Runtime Driver
>>
>>Here you go... Function CheckConnection is what you will need to look
>>at.
>>It uses to constants that are set up at the top of the module.
>>
>>Doris Manning
>>Database Administrator
>>Hargrove Inc.
>>www.hargroveinc.com
>>
>>
>>-----Original Message-----
>>From: Stephen R. Zayko [mailto:szayko at secor.com]
>>Sent: Tuesday, April 08, 2003 02:36 PM
>>To: mikedorism at ntelos.net
>>Subject: FW: [AccessD] Runtime Driver
>>
>>
>>Doris
>>
>>Thanks for the offer.  If you could e-mail it to me at this address I
>>would
>>be very grateful.  Also thanks for putting the 'mail me offline' remark.
>>Those tend to quell the 'me too's.  I think that this will be just what
>>I
>>need.  I will post to the list if this works.
>>
>>Thanks
>>
>>-Z
>>
>>Stephen R. Zayko
>>
>>SECOR International Inc.
>>2321 Club meridian Drive Ste. E
>>Okemos MI, 48864
>>
>>517 349 9499 ph
>>517 349 6863 fx
>>
>>szayko at secor.com <mailto:szayko at secor.com>
>>www.secorlansing.com <http://www.secorlansing.com>
>>
>>
>>
>>-----Original Message-----
>>From: accessd-bounces at databaseadvisors.com
>>[mailto:accessd-bounces at databaseadvisors.com]On Behalf Of Mike and Doris
>>Manning
>>Sent: Tuesday, April 08, 2003 12:32 PM
>>To: accessd at databaseadvisors.com
>>Subject: RE: [AccessD] Runtime Driver
>>
>>
>>I've got code that checks for a specified SQL Server System DSN and
>>creates
>>it if it doesn't exist.  You should be able to modify it to work with
>>MySQL.
>>Email me offline if you want it.
>>
>>Doris Manning
>>Database Administrator
>>Hargrove Inc.
>>www.hargroveinc.com
>>
>>-----Original Message-----
>>From: accessd-bounces at databaseadvisors.com
>>[mailto:accessd-bounces at databaseadvisors.com]
>>Sent: Tuesday, April 08, 2003 11:41 AM
>>To: AccessD at databaseadvisors.com
>>Subject: [AccessD] Runtime Driver
>>
>>
>>Group:
>>
>>Is it possible to include the drivers needed for a runtime solution?  I
>>have
>>an A2K database which I would like to package as a runtime.  It is an
>>A2K FE
>>with a MySQL BE accessed via ODBC through the web.  Trouble with the
>>distribution is that people must install the MySQL ODBC driver, and then
>>create/link to the machine data source of the MySQL database (I think I
>>said
>>that right).
>>
>>What I would like to do is this...
>>
>>Create the runtime with the drivers and the source database info. Then
>>when
>>a user unpacks/installs the runtime,
>>A: The MYSQL driver installs on that machine and
>>B: The ODBC data source is created with all the needed info.
>>
>>A looks pretty simple to do.  You just include that in the files to be
>>included during the packaging of the app. B however, I am not too sure
>>about.  Can I do this through code?  Has anyone else done this before?
>>
>>thanks in advance.
>>
>>-Z
>>
>>Stephen R. Zayko
>>
>>SECOR International Inc.
>>2321 Club meridian Drive Ste. E
>>Okemos MI, 48864
>>
>>517 349 9499 ph
>>517 349 6863 fx
>>
>>szayko at secor.com <mailto:szayko at secor.com>
>>www.secorlansing.com <http://www.secorlansing.com>
>>
>>_______________________________________________
>>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
>>
>>    
>>
>
>_______________________________________________
>AccessD mailing list
>AccessD at databaseadvisors.com
>http://databaseadvisors.com/mailman/listinfo/accessd
>Website: http://www.databaseadvisors.com
>
>  
>




More information about the AccessD mailing list