A2K - how to detect Vista?

My Access 2000 app doesn't work correctly under Vista for lord knows what
reason.

Any code for detected Vista when I start the database? Nothing shows up in
a search of this group, though feel free to correct me.

Re: A2K - how to detect Vista?

Deano wrote:

> My Access 2000 app doesn't work correctly under Vista for lord knows what
> reason.
>
> Any code for detected Vista when I start the database? Nothing shows up in
> a search of this group, though feel free to correct me.
>
>
Maybe this link has the info you need.
http://www.mvps.org/access/api/api0055.htm

Help
http://www.youtube.com/watch?v=9ibX3TejlZE

Re: A2K - how to detect Vista?

"Salad" schreef in bericht =
news:13pc51qdgp6mh3b@corp.supernews.com...
> Deano wrote:
>=20
>> My Access 2000 app doesn't work correctly under Vista for lord knows =
what
>> reason.
>>=20
>> Any code for detected Vista when I start the database? Nothing shows =
up in
>> a search of this group, though feel free to correct me.
>>=20
>>=20
> Maybe this link has the info you need.
> http://www.mvps.org/access/api/api0055.htm
>=20

Also look here
http://www.vbforums.com/showthread.php?t=3D434149

Arno R

Re: A2K - how to detect Vista?

"Deano" wrote

> Any code for detected Vista when I start the database?

I know some who'd say, "Make handsigns to ward off evil spirits, and watch
the reaction. If that causes a response, call a qualified exorcist."

Re: A2K - how to detect Vista?

Salad wrote:

>> Any code for detected Vista when I start the database? Nothing shows up in
>> a search of this group, though feel free to correct me.

>Maybe this link has the info you need.
>http://www.mvps.org/access/api/api0055.htm

It's a bit out of date. I'm sure there's something newer somewhere at vbnet.mvps.org

Tony
--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/

Re: A2K - how to detect Vista?

"Tony Toews [MVP]" wrote in message
news:licgp3941mduna3h6gc2sgbt8sqldp1bub@4ax.com...
> Salad wrote:
>
> >> Any code for detected Vista when I start the database? Nothing shows
up in
> >> a search of this group, though feel free to correct me.
>
> >Maybe this link has the info you need.
> >http://www.mvps.org/access/api/api0055.htm
>
> It's a bit out of date. I'm sure there's something newer somewhere at
vbnet.mvps.org

Problem is I'm not sure I can convert vb.net code into VBA, certainly not
this sort of thing. If anyone has then please post.

Re: A2K - how to detect Vista?

On Jan 24, 4:43 am, "Deano" wrote:
> "Tony Toews [MVP]" wrote in messagenews:licgp3941mduna3h6gc2sgbt8sqldp1bub@4ax.com...> Salad wrote:
>
> > >> Any code for detected Vista when I start the database? Nothing shows
> up in
> > >> a search of this group, though feel free to correct me.
>
> > >Maybe this link has the info you need.
> > >http://www.mvps.org/access/api/api0055.htm
>
> > It's a bit out of date. I'm sure there's something newer somewhere at
>
> vbnet.mvps.org
>
> Problem is I'm not sure I can convert vb.net code into VBA, certainly not
> this sort of thing. If anyone has then please post.

Does this help?

Private Declare Function GetFileVersionInfo& Lib "Version" _
Alias "GetFileVersionInfoA" (ByVal FileName$, ByVal lptr&, _
ByVal lSize&, lpvData As Any)

Public Function Version$(ByVal FullPath$)
'2003/02/26 attribution to David Epson
Dim iBuf%(0 To 99)
GetFileVersionInfo FullPath, 0&, 200, iBuf(0)
Version = iBuf(25) & "." & iBuf(24) & "." & iBuf(27) & "." &
iBuf(26)
End Function

Sub test()
Debug.Print Version(Environ$("WINDIR") & "\Explorer.Exe")
End Sub

Re: A2K - how to detect Vista?

"Deano" wrote:

>> >Maybe this link has the info you need.
>> >http://www.mvps.org/access/api/api0055.htm
>>
>> It's a bit out of date. I'm sure there's something newer somewhere at
>vbnet.mvps.org
>
>Problem is I'm not sure I can convert vb.net code into VBA, certainly not
>this sort of thing.

That website was named vbnet long before vb.net was a gleam in someone's eye at
Microsoft. That website is specifically for VB6.0 API calls almost all of which are
copy and paste into Access (and others) VBA.

Tony

--
Tony Toews, Microsoft Access MVP
Please respond only in the newsgroups so that others can
read the entire thread of messages.
Microsoft Access Links, Hints, Tips & Accounting Systems at
http://www.granite.ab.ca/accsmstr.htm
Tony's Microsoft Access Blog - http://msmvps.com/blogs/access/

Re: A2K - how to detect Vista?

"Deano" wrote in message
news:5vr4u2F1nq021U1@mid.individual.net...
>
> "Tony Toews [MVP]" wrote in message
> news:licgp3941mduna3h6gc2sgbt8sqldp1bub@4ax.com...
>> Salad wrote:
>>
>> >> Any code for detected Vista when I start the database? Nothing shows
> up in
>> >> a search of this group, though feel free to correct me.
>>
>> >Maybe this link has the info you need.
>> >http://www.mvps.org/access/api/api0055.htm
>>
>> It's a bit out of date. I'm sure there's something newer somewhere at
> vbnet.mvps.org
>
> Problem is I'm not sure I can convert vb.net code into VBA, certainly not
> this sort of thing. If anyone has then please post.

You could try checking the registry at:

HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion

My XP SP2 shows as 5.1. Vista will most likely be 6.x (no vista here, so I'm
unable to test).