ProFox May 2018

profox@leafe.com

39 participants
46 discussions

RE: AGETFILEVERSION Fail - SOLVED!
by Paul H. Tarver 02 May '18

02 May '18

Thanks to Gianni for giving me the idea which led to the solution. Gianni had written this: > that at the return from "report form ..." the curdir() was changed to > something like C:\Windows\System32. That got me to thinking perhaps the default folder was changing for some unknown reason. It was not. The path remained the same. However, in testing, I wondered what would happen if I explicitly defined the path & filename in the AGETFILEVERSION() command. As the code was written, I got the filename from the ADIR() command but the array of filenames returned does not include the full path. I decided to try re-writing the line for AGETFILEVERSION() like this: lnElements = AGETFILEVERSION(laVersInfo, ADDBS(SYS(5) + SYS(2003)) + laPrograms[m.lnLoopCnt,1]) And it worked perfectly even after getting a connection handle to the Oracle database! I exited my form multiple times and it continued to work as expected. However, when I issue the AGETFILEVERSION() without the full path included, it starts to fail again. So I've updated my class method to include the explicit full path which will be backwardly compatible with all my previous code and I learned a valuable lesson: "When in doubt, get explicit!" Thanks for everyone's help on this! It was definitely appreciated! Paul H. Tarver -----Original Message----- From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of Paul H. Tarver Sent: Wednesday, May 02, 2018 11:41 AM To: profoxtech(a)leafe.com Subject: RE: AGETFILEVERSION Fail After some further testing, I determined that mis-spoke when I said that AGETFILEVERSION() was returning an empty string and not an array. What it is actually doing is returning NOTHING. If I remove the LOCAL ARRAY line from the routine, I found that the once the connection is made, AGETFILEVERSION() does not even create the array once a connection handle to the Oracle ODBC driver is obtained, AGETFILEVERSION() simply fails without error, without creating an array, but it does return a 0 as the number of elements. Paul H. Tarver -----Original Message----- From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of Paul H. Tarver Sent: Wednesday, May 02, 2018 11:28 AM To: profoxtech(a)leafe.com Subject: RE: AGETFILEVERSION Fail I checked the array generated from ADIR() in my code and it is returning the proper list of EXE files found in the folder. But I'm thinking I want to do some more testing with your idea about the directory or path changing after we get a connection to the ODBC driver or something like that. I'll post more once I chase that rabbit. As I mentioned in another response the weird thing is AGETFILEVERSION() is supposed to always return an Array, but once we make a connection to the Oracle ODBC driver, AGETFILEVERSION() simply returns an empty string. Not an empty array, an empty string. On top of that, I cannot for the life of me figure out what would AGETFILEVERSION() have in common with and ODBC connection. I'm sure that where they overlap will be where the problem lies, but I can't figure out where those two functions would overlap. Thanks for the idea though! Paul H. Tarver -----Original Message----- From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of Gianni Turri Sent: Wednesday, May 02, 2018 10:51 AM To: profoxtech(a)leafe.com Subject: Re: AGETFILEVERSION Fail Hi Paul! If the current directory ( curdir() ) changes to something like C:\Windows\System32 your array gets populated by many exe's but not the exe's you expect from your application directory, because in you code you load adir() with exe's from the "current" directory. > lnExeNumber = ADIR(laPrograms, '*.EXE') Gianni -----Original Message----- On Wed, 02 May 2018 02:47:00 +0200, Gianni Turri <giannit62(a)gmail.com> wrote: Hi Paul! I remember many years ago when printing to pdf using the Adobe Acrobat printer driver that at the return from "report form ..." the curdir() was changed to something like C:\Windows\System32. Are you sure it is not happening something similar? Gianni -----Original Message----- On Tue, 1 May 2018 15:23:55 -0500, "Paul H. Tarver" <paul(a)tpcqpc.com> wrote: Thanks Ted. The code I'm using now is how I determine the name of the compiled application and once it returns the correct .EXE name, we then look for an .INI file with the same JUSTSTEM() where our settings are. The code works whether compiled or in the IDE and the only requirement is that I have at least one copy of the compiled .exe file in the development folder. I know I can hard code that easily enough, but because I have so many projects and they often have different compiled names, so the logic of looking in the app folder for an .EXE with 'MAIN PROGRAM' in the file version information makes the method to retrieve the JUSTSTEM('exe name') a simple prospect and has worked since version 6. First time I've ever had a problem with it and that's only after the second time I get a handle to the Oracle database via the Oracle ODBC driver. Weird stuff. Thanks for the suggestions though. I may end up refactoring this whole process anyway because of this weirdness. Paul H. Tarver -----Original Message----- From: ProfoxTech [mailto:profoxtech-bounces@leafe.com] On Behalf Of Ted Roche Sent: Tuesday, May 01, 2018 2:38 PM To: profoxtech(a)leafe.com Subject: Re: AGETFILEVERSION Fail On Tue, May 1, 2018 at 3:23 PM, Paul H. Tarver <paul(a)tpcqpc.com> wrote: > > The reason for this code is to identify the application .EXE. Perhaps there > is a better way to identify the application name that will eliminate the > need to use AGETFILEVERSION() to identify the main .exe file for the > application. > You might consider PROGRAM(), the venerable SYS(16) or the (new to VFP7) AStackInfo(). https://www.tedroche.com/hackfox7/s4g120.html [excessive quoting removed by server]

1 0

Re: AGETFILEVERSION Fail
by Gene Wirchenko 02 May '18

02 May '18

At 06:31 2018-05-02, Charlie-gm <ccbibleman(a)gmail.com> wrote: >Maybe take a look at "_VFP.servername". That returns a character >string of the .exe (including path) that is being executed. > >Example: >my_exe_file = _vfp.servername > >I don't think this will work if you are running ".app" files - in >that case it may always return the path to the VFP9.exe executable. >But if you run that line of code within a compiled VFP .exe, you >should always get the path/name of the .exe (assuming that is what >you're after here). I need the name for using Adobe's print to PDF printer driver. My code: * What is the name of executable that CBS2 is running under? * This is needed by the PDF reporting code. local sys16name, apptype, underruntime, vfpexename sys16name=sys(16,1) apptype=upper(right(sys16name,4)) underruntime=version(2)=0 vfpexename=_vfp.fullname do case case apptype=".FXP" && .FXP under VFP development this.appexename=vfpexename case apptype=".EXE" and !underruntime && .EXE under VFP development this.appexename=vfpexename case apptype=".EXE" and underruntime && .EXE under VFP runtime this.appexename=sys16name otherwise && unknown this.appexename=vfpexename endcase [snip] Sincerely, Gene Wirchenko

1 0

Report Writer - New Discovery
by Dave Crozier 02 May '18

02 May '18

Gentlemen, Having spent time on many occasions hacking reports in their “VFP Table” state I came across an interesting discovery earlier. If you have the properties dialogue open for any item on the report and right click on it you are prompted with a quick sub menu with the following options: Event Inspector Object Memberdata -> Browse FRX Options Most useful… I never knew of its existence until today as I had never felt it necessary to right click on the form I wonder what other “hidden features” are available deep in VFP!. Dave Crozier Software Development Manager Flexipol Packaging Ltd. --------------------------------------------------------------- This communication and the information it contains is intended for the person or organisation to whom it is addressed. Its contents are confidential and may be protected in law. If you have received this e-mail in error you must not copy, distribute or take any action in reliance on it. Unauthorised use, copying or disclosure of any of it may be unlawful. If you have received this message in error, please notify us immediately by telephone or email. Flexipol Packaging Ltd. has taken every reasonable precaution to minimise the risk of virus transmission through email and therefore any files sent via e-mail will have been checked for known viruses. However, you are advised to run your own virus check before opening any attachments received as Flexipol Packaging Ltd will not in any event accept any liability whatsoever once an e-mail and/or any attachment is received. It is the responsibility of the recipient to ensure that they have adequate virus protection. Flexipol Packaging Ltd. Unit 14 Bentwood Road Carrs Industrial Estate Haslingden Rossendale Lancashire BB4 5HH Tel:01706-222792 Fax: 01706-224683 www.Flexipol.co.uk --------------------------------------------------------------- Terms & Conditions: Notwithstanding delivery and the passing of risk in the goods, the property in the goods shall not pass to the buyer until the seller Flexipol Packaging Ltd. ("The Company") has received in cash or cleared funds payment in full of the price of the goods and all other goods agreed to be sold by the seller to the buyer for which payment is then due. Until such time as the property in the goods passes to the buyer, the buyer shall hold the goods as the seller's fiduciary agent and bailee and keep the goods separate from those of the buyer and third parties and properly stored protected and insured and identified as the seller's property but shall be entitled to resell or use the goods in the ordinary course of its business. Until such time as the property in the goods passes to the buyer the seller shall be entitled at any time

2 1

Class Definition Not Found
by Chris Davis 02 May '18

02 May '18

Bit of a vague question but is anyone aware of any mis match of run time DLL's that might result in the error message in the subject. Maybe the VFP runtimes or the VC ones. Thanks Chris. --- StripMime Report -- processed MIME parts --- multipart/alternative text/plain (text body -- kept) text/html ---

6 13

Southwest Fox 2018: Speakers and Sessions announced!
by Rick Schummer 02 May '18

02 May '18

Speakers (http://www.swfox.net/Speakers.aspx) and sessions (http://www.swfox.net/SessionsSWFox.aspx) have been announced. Registration opens soon; send an email to info(a)geekgatherings.com if you want us to email you when it's ready. Rick White Light Computing, Inc. www.whitelightcomputing.com

1 0

ProFox List Statistics for April 2018
by List Administrator Account 01 May '18

01 May '18

================================================== ProFox List Statistics April 2018 ================================================== Subscriber Count at End of Month: ProFox: 293 ProFoxTech: 182 ================================================== Total Posts: 224 (Down 18.55% from March 2018) Total [OT] Posts: 0 (Unchanged from March 2018) Total [NF] Posts: 20 (Down 59.18% from March 2018) Daily Message Counts for April 2018 ------------------------------------------------ DOW Date Count --- ---- ----- S 1 - 1 W 4 - 6 T 5 - 6 F 6 - 6 S 7 - 2 M 9 - 14 W 11 - 8 T 12 - 11 F 13 - 1 S 14 - 2 M 16 - 26 T 17 - 20 W 18 - 15 T 19 - 25 F 20 - 21 S 21 - 2 M 23 - 3 W 25 - 20 T 26 - 8 F 27 - 18 S 28 - 1 S 29 - 1 M 30 - 7 Message Counts By Day of Week for April 2018 ------------------------------------------------ DOW Count --- ----- Sun - 2 Mon - 50 Tue - 20 Wed - 49 Thu - 50 Fri - 46 Sat - 7 Distinct Posters to the List (changes relative to March 2018) ------------------------------------------------ Non-OT messages: 37 (Down 22.92%) OT messages: 0 (Unchanged) NF messages: 7 (Down 50.0%) Total number: 37 (Down 22.92%) Top 20 Contributors by Number of Non-OT Posts ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 33 Paul H. Tarver 2. 19 Gene Wirchenko 3. 17 Stephen Russell 4. 17 Ted Roche 5. 15 Richard Kaye 6. 15 Fernando D. Bozzo 7. 14 Dave Crozier 8. 13 Alan Bourke 9. 12 Frank Cazabon 10. 8 Paul Newton 11. 8 mbsoftwaresolutions(a)mbsoftwaresolutions.com 12. 4 Tracy Pearson 13. 4 John Weller 14. 4 Koen Piller 15. 4 Fred Taylor 16. 3 AndyHC 17. 3 Thierry Nivelet 18. 3 Chris Davis 19. 3 Peter Cushing 20. 2 Vince Teachout Top 0 Contributors by Number of OT Posts ------------------------------------------------ | Posts OT% Contributor | ------------------------------------------------ Top 7 Contributors by Number of NF Posts ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 5 Stephen Russell 2. 5 Ted Roche 3. 4 Alan Bourke 4. 2 Fernando D. Bozzo 5. 2 AndyHC 6. 1 mbsoftwaresolutions(a)mbsoftwaresolutions.com 7. 1 Man-wai Chang Top 20 Contributors by Total Number of Posts ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 33 Paul H. Tarver 2. 19 Gene Wirchenko 3. 17 Stephen Russell 4. 17 Ted Roche 5. 15 Richard Kaye 6. 15 Fernando D. Bozzo 7. 14 Dave Crozier 8. 13 Alan Bourke 9. 12 Frank Cazabon 10. 8 Paul Newton 11. 8 mbsoftwaresolutions(a)mbsoftwaresolutions.com 12. 4 Tracy Pearson 13. 4 John Weller 14. 4 Koen Piller 15. 4 Fred Taylor 16. 3 AndyHC 17. 3 Thierry Nivelet 18. 3 Chris Davis 19. 3 Peter Cushing 20. 2 Vince Teachout Top 13 Contributors by Number of New Threads Started ------------------------------------------------ | Posts Contributor | ------------------------------------------------ 1. 9 Paul H. Tarver 2. 5 Gene Wirchenko 3. 3 Stephen Russell 4. 2 Paul Newton 5. 2 mbsoftwaresolutions(a)mbsoftwaresolutions.com 6. 2 Ted Roche 7. 2 Richard Kaye 8. 1 List Administrator Account 9. 1 Chris Davis 10. 1 Dave Crozier 11. 1 Desmond Lloyd 12. 1 Thierry Nivelet 13. 1 Jürgen Wondzinski Top 20 Non-OT Threads by Total Number of Posts ------------------------------------------------------------------ | Posts Subject | ------------------------------------------------------------------ 1. 25 VFP9 - Save as XLSX 2. 19 INSERT INTO...SELECT Issue 3. 16 Appending from a Cursor 4. 14 .tmp Is Read-Only 5. 13 ON KEY LABEL limitation 6. 13 [NF] Microsoft’s Next OS is Based on Linux, Not Windows 7. 12 ODBC or OLEDB to Oracle - Resources? 8. 11 INSERT INTO...SELECT Issue - SOLVED!!! 9. 11 "Cannot load 32-bit DDL wwipstuff.dll" 10. 10 Numeric(x,0) vs Integer field type in VFP tables 11. 9 Modulo 97 of a very large number 12. 9 Fun (not) with the report writer 13. 8 VFP TSQL concordance 14. 7 Resetting VFP 15. 6 Comparing Table Structures 16. 6 Class Definition Not Found 17. 4 [TEST] Sent message twice yesterday and it didn't get posted 18. 4 [NF] M$ teaches about AI (free) 19. 3 FoxyPreviewer Issue 20. 3 Grids, Again Top 0 OT Threads by Total Number of Posts ------------------------------------------------------------------ | Posts Subject | ------------------------------------------------------------------ Top 20 Threads by Total Number of Posts ------------------------------------------------------------------ | Posts Subject | ------------------------------------------------------------------ 1. 25 VFP9 - Save as XLSX 2. 19 INSERT INTO...SELECT Issue 3. 16 Appending from a Cursor 4. 14 .tmp Is Read-Only 5. 13 ON KEY LABEL limitation 6. 13 [NF] Microsoft’s Next OS is Based on Linux, Not Windows 7. 12 ODBC or OLEDB to Oracle - Resources? 8. 11 INSERT INTO...SELECT Issue - SOLVED!!! 9. 11 "Cannot load 32-bit DDL wwipstuff.dll" 10. 10 Numeric(x,0) vs Integer field type in VFP tables 11. 9 Modulo 97 of a very large number 12. 9 Fun (not) with the report writer 13. 8 VFP TSQL concordance 14. 7 Resetting VFP 15. 6 Comparing Table Structures 16. 6 Class Definition Not Found 17. 4 [TEST] Sent message twice yesterday and it didn't get posted 18. 4 [NF] M$ teaches about AI (free) 19. 3 FoxyPreviewer Issue 20. 3 Grids, Again

1 0

2026

2025

2024

2023

2022

2021

2020

2019

2018

2017

2016

ProFox May 2018