Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
IF FILE() Not Firing...
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00599437
Message ID:
00599952
Views:
30
>>>Hi Gregory,
>>>
>>>>>Have you looked at the Windows Script Host? Much of this functionality is available via and and without the necessary code overhead required for the API calls.
>>>>
>>>>
>>>>No, not yet. A part of my customers still have win95. I think I remember that under 95 you have to donwload it. Maybe also in win98. Since I am just shipping software (a CD), I do not know over 90% of them.
>>>>
>>>>I know that much of that functionality is in wsh (from ut and ng). Just wanted to be on the safe side.
>>>
>>>Well, as you probably know, Win95 is no longer supported by Microsoft and you may be doing your customers a favor by advising them of such.
>>>
>>>The WSH was an optional component (though selected by default) in Win98. In later versions, it isn't optional, but required.
>>>
>>>There's also the Shell.Application object which exposes some more of the functionality you seem to have tapped into. That object, is available on Win98 and later or Win95 having had IE 4.0 with the Active Desktop option installed.
>>
>>Hi George,
>>
>>In the thread Forum: Visual FoxPro Category: Troubleshooting Title: Re: FSO OLE Error Code Thread #595266 Message #595372 we discussed some problems discovered. I downloaded WSH 5.5 from the mentioned link and installed it few times, but it still shows version 5.1 Just wondering, what did I do wrong and can anybody confirm the same problem? At work I have Windows 95 and at home Windows 98 and I tried it from both home and work with the same result.
>
>How are you determining the version number? IOW, what file are you checking to ascertain this? WScript.exe? VBScript.dll? There are a number of components involved, and I suspect you're looking at the wrong file.

Here is a test:
oFSO = CREATEOBJECT("Scripting.FileSystemObject")
oDrive = oFSO.GetDrive("D:\")
?oDrive.AvailableSpace && or
?oDrive.TotalSize && Returns 2147155968 for all
?oDrive.FreeSpace
=AGETFILEVERSION(gaArray, "scrrun.dll")
?gaArray[4] && Returns 5.1.0.5010
If it's not broken, fix it until it is.


My Blog
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform