Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Can RUN window appear inside a VFP window?
Message
From
20/07/2006 05:53:15
 
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Environment versions
Visual FoxPro:
VFP 9 SP1
Miscellaneous
Thread ID:
01137462
Message ID:
01137954
Views:
11
>>I am calling pkzipc (a DOS program) repeatedly with RUN command from a form. It would be more elegant if the DOS boxes appeared inside the VFP form. Is there any way to accomplish this?
>>
>>TIA,
>>
>>Alex
>
>To augmment Tore (a little):
>Heres a WScript routine - full paths are important - if you are saving to an Inetpub folder, I have found that prefixing the full path with "\\.\" is very helpful.
* Go local to the default GET ZIP folder
>CD (["]+ucRootDirectory+["]) && Assure root
>CD (["]+FULLPATH(ucGetZip_Path)+["]) && ucGetZip_Path=Zip "pickup" folder
>ucGetUnZipFilePath=GETFILE([ZIP],[Default 'GET' zip folder],[Get Zip],0,[Select ZIP File])
>ucWZC_Path="C:\PROGRAM FILES\WINZIP\"
>lcUnZipFileName=JUSTFNAME(ucGetUnZipFilePath)
>lcUnZipPathName=JUSTPATH(ucGetUnZipFilePath)+[\]
>* Go local to the final resting place of the zip file
>CD (["]+lcZipToFullPathFolder+["]) && Go local to zips arhive root folder.
>cUnZipToFolder=SET('DIRE') && Make sure VFP is in the tube
>oWS=newOBJECT("WScript.Shell")
>oWS.Run(["]+ucWzc_Path+[wzunzip" -d ]+ucGetUnZipFilePath+[ "]+cUnZipToFolder+[\"],1,.t.)
>
>Did the Shell solution make your DOS window a child of a VFP form?
>HTH

Thanks for the suggestion.

What do you mean by the Shell solution? Do you mean RUN? If so, no, it comes up as a separate window.

This is for an in house backup mini application, so there is little pressure to improve looks. I will try Anatoliy's suggestion, though. That is what I am looking for. Hope it works.

Alex
Previous
Reply
Map
View

Click here to load this message in the networking platform