[AccessD] System Root

You can use the Environ function to return the value of any system
environment variable.  Something like:

strShellCommandLine = Environ("SystemRoot") & "\system32\calc.exe"
intX = Shell(strShellCommandLine,1)

Hope this helps.

Don McGillivray

-----Original Message-----
From: Stephen R. Zayko [mailto:szayko at secor.com] 
Sent: Monday, August 04, 2003 2:50 PM
To: 'Access Developers discussion and problem solving'
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