Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 160
Default Test for installed application?

Hi,


Is it possible to test, if the user has a certain application installed
on this computer?

Or, to be specific, is it possible to test, if the user has "Google
Earth" installed on his windows-PC?

VBA Code?


Thanks in advance...


CE
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 538
Default Test for installed application?

Charlotte E. wrote:

Is it possible to test, if the user has a certain application installed
on this computer?

Or, to be specific, is it possible to test, if the user has "Google
Earth" installed on his windows-PC?

VBA Code?


Go to a computer that doesn't have Google Earth installed. Dump the registry.
(Yes, the whole thing.) Install Google Earth. Dump the registry again.
Compare. (There are tools that will do the dumping and comparing
automagically for you.)

Chances are, Google Earth sets something in the registry, even if it's
something as simple as the uninstaller's info. (I don't use it so I can't
tell you what.)

--
Fear is the penalty of consciousness.
There's no weakness in fear... only in showing it.
  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,514
Default Test for installed application?

Perhaps...

Function bGoogleEarthAvailable() As Boolean
Dim x As Object
On Error Resume Next
Set x = CreateObject("Google Earth.Application") 'edit to suit
bGoogleEarthAvailable = (Err = 0)
x.Quit: Set x = Nothing
End Function

Usage example:

If bGoogleEarthAvailable Then DoSomething Else Do SomethingElse

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion


  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 3,514
Default Test for installed application?

GS made a 'typo':

Function bGoogleEarthAvailable() As Boolean
Dim x As Object
On Error Resume Next
Set x = CreateObject("Google Earth.Application") 'edit to suit
bGoogleEarthAvailable = (Err = 0)
x.Quit: Set x = Nothing
End Function

Usage example:

If bGoogleEarthAvailable Then DoSomething Else DoSomethingElse

--
Garry

Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup!
comp.lang.basic.visual.misc
microsoft.public.vb.general.discussion


  #5   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 160
Default Test for installed application?

Thanks for your suggestions, guys...

However, I decided on a web-map based solution instead - but thanks for
your effort anyway.


CE

Den 19.06.2012 12:40, Charlotte E. skrev:
Hi,


Is it possible to test, if the user has a certain application installed
on this computer?

Or, to be specific, is it possible to test, if the user has "Google
Earth" installed on his windows-PC?

VBA Code?


Thanks in advance...


CE

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
test that there is something to undo before executing application. pwrob Excel Programming 5 February 15th 10 08:26 PM
Calculate mean of test scores from rows of test answers RiotLoadTime Excel Discussion (Misc queries) 1 July 26th 06 05:14 PM
Lookup cannot be installed... caspar m Setting up and Configuration of Excel 0 May 8th 06 01:19 PM
=weeknum() - installed the add-in Marcotte A Excel Worksheet Functions 2 January 23rd 06 06:36 PM
Test if application running? Chuck Excel Programming 1 December 7th 04 03:27 PM


All times are GMT +1. The time now is 09:20 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"