From: Claire on
Hello,
I am not sure what I am doing wrong.
The fact is that I cannot recreate the problem on my computer, one of my
users is struggling with.
The problem is that on his computer app crashes with:
"Run-Time error '75': Path/File access error" message.
I have traced this problem to the point app wants to create folder in:
C:\ProgramData\<my app title>
That path is obtained using GetSpecialfolder(CSIDL_COMMON_APPDATA)

Interestingly, I cannot recreate that crash on my computer.

User has Vista Business (32 bit), with Administrator privilages and UAC is
on.

I have also noticed another strange thing about that Vista.
It returns False to IsWinNT4Plus function:
============================
Function IsWinNT4Plus() As Boolean
Const VER_PLATFORM_WIN32_NT As Long = 2
Dim osv As OSVERSIONINFO

osv.OSVSize = Len(osv)
If GetVersionEx(osv) = 1 Then
IsWinNT4Plus = (osv.PlatformID = VER_PLATFORM_WIN32_NT) And
(osv.dwVerMajor >= 4)
End If
End Function
============================

Any comments and your help appreciated,
Claire


From: Karl E. Peterson on
Claire has brought this to us :
> Hello,
> I am not sure what I am doing wrong.
> The fact is that I cannot recreate the problem on my computer, one of my
> users is struggling with.
> The problem is that on his computer app crashes with:
> "Run-Time error '75': Path/File access error" message.
> I have traced this problem to the point app wants to create folder in:
> C:\ProgramData\<my app title>
> That path is obtained using GetSpecialfolder(CSIDL_COMMON_APPDATA)
>
> Interestingly, I cannot recreate that crash on my computer.
>
> User has Vista Business (32 bit), with Administrator privilages and UAC is
> on.

That folder is off limits in those conditions, except for setup apps
running with admin privs. It's just like HKLM.

http://visualstudiomagazine.com/articles/2009/01/19/lemme-tell-ya-where-to-stick-it.aspx

> I have also noticed another strange thing about that Vista.
> It returns False to IsWinNT4Plus function:
> ============================
> Function IsWinNT4Plus() As Boolean
> Const VER_PLATFORM_WIN32_NT As Long = 2
> Dim osv As OSVERSIONINFO
>
> osv.OSVSize = Len(osv)
> If GetVersionEx(osv) = 1 Then
> IsWinNT4Plus = (osv.PlatformID = VER_PLATFORM_WIN32_NT) And
> (osv.dwVerMajor >= 4)
> End If
> End Function
> ============================
>
> Any comments and your help appreciated,

Which test is failing? First thing I'd change is the test for
GetVersionEx return.

"If the function succeeds, the return value is a nonzero value."
http://msdn.microsoft.com/en-us/library/ms724451%28VS.85%29.aspx

--
..NET: It's About Trust! http://vfred.mvps.org
Customer Hatred Knows No Bounds at MSFT
ClassicVB Users Regroup! comp.lang.basic.visual.misc
Free usenet access at http://www.eternal-september.org


From: Kevin Provance on

"Karl E. Peterson" <karl(a)exmvps.org> wrote in message
news:i0amje$v6a$1(a)news.eternal-september.org...

: Which test is failing? First thing I'd change is the test for
: GetVersionEx return.

Ever heard of the IsOS API call? It returns a boolean based on an fed
instruction. Fairly cool thing.


--
Customer Hatred Knows No Bounds at MSFT
Free usenet access at http://www.eternal-september.org
ClassicVB Users Regroup! comp.lang.basic.visual.misc

Bawwk! Paulie want a dingleball, bawwk!

From: Karl E. Peterson on
Kevin Provance expressed precisely :
> "Karl E. Peterson" <karl(a)exmvps.org> wrote in message
> news:i0amje$v6a$1(a)news.eternal-september.org...
>
>> Which test is failing? First thing I'd change is the test for
>> GetVersionEx return.
>
> Ever heard of the IsOS API call? It returns a boolean based on an fed
> instruction. Fairly cool thing.

Huh? No, not familiar.

--
..NET: It's About Trust!
http://vfred.mvps.org


From: Claire on
Karl, what is wrong with that folder:
C:\ProgramData\<my app title>
?
It is listed on the webpage you provided link to.
If that folder location is wrong which location will be safer?
I need the location for all users.
Thanks,
Claire

"Karl E. Peterson" <karl(a)exmvps.org> wrote in message
news:i0amje$v6a$1(a)news.eternal-september.org...
> Claire has brought this to us :
>> Hello,
>> I am not sure what I am doing wrong.
>> The fact is that I cannot recreate the problem on my computer, one of my
>> users is struggling with.
>> The problem is that on his computer app crashes with:
>> "Run-Time error '75': Path/File access error" message.
>> I have traced this problem to the point app wants to create folder in:
>> C:\ProgramData\<my app title>
>> That path is obtained using GetSpecialfolder(CSIDL_COMMON_APPDATA)
>>
>> Interestingly, I cannot recreate that crash on my computer.
>>
>> User has Vista Business (32 bit), with Administrator privilages and UAC
>> is on.
>
> That folder is off limits in those conditions, except for setup apps
> running with admin privs. It's just like HKLM.
>
> http://visualstudiomagazine.com/articles/2009/01/19/lemme-tell-ya-where-to-stick-it.aspx
>
>> I have also noticed another strange thing about that Vista.
>> It returns False to IsWinNT4Plus function:
>> ============================
>> Function IsWinNT4Plus() As Boolean
>> Const VER_PLATFORM_WIN32_NT As Long = 2
>> Dim osv As OSVERSIONINFO
>>
>> osv.OSVSize = Len(osv)
>> If GetVersionEx(osv) = 1 Then
>> IsWinNT4Plus = (osv.PlatformID = VER_PLATFORM_WIN32_NT) And
>> (osv.dwVerMajor >= 4)
>> End If
>> End Function
>> ============================
>>
>> Any comments and your help appreciated,
>
> Which test is failing? First thing I'd change is the test for
> GetVersionEx return.
>
> "If the function succeeds, the return value is a nonzero value."
> http://msdn.microsoft.com/en-us/library/ms724451%28VS.85%29.aspx
>
> --
> .NET: It's About Trust! http://vfred.mvps.org
> Customer Hatred Knows No Bounds at MSFT
> ClassicVB Users Regroup! comp.lang.basic.visual.misc
> Free usenet access at http://www.eternal-september.org
>
>


 |  Next  |  Last
Pages: 1 2 3 4 5 6 7 8 9 10 11
Prev: Sorting UDTs
Next: Copy from ListBox to TextBox