VFP equivalent of VB Set statement

Visual FoxPro General

Index ‹ Visual FoxPro

- Previous
  - 1
    - Accessing VFP 8 through C# and ODBC This could be happening because the VFP ODBC driver only supports data tables that use the features that were available in Version 6.0 of VFP. If a table uses Auto-Incrementing columns, or data types introduced since Version 7.0 the ODBC driver is not able to read the table. You really should use the OLEDB driver for VFP in preference to the ODBC driver - it is fully compatible with all versions of VFP and offers additional functionality over the ODBC driver as well (e.g. the ability to call Stored Procedures) Tag: VFP equivalent of VB Set statement
  - 2
    - Hide command windows and recent project, and auto run the application Hi Sixon, You can cotrol this behaviour through entries in the config.fpw. For example Code Snippet RESOURCE = ON _GENMENU = c:\migrate\transport.prg _TASKPANE = OFF command = do Testprgm I think this solves your issue. Best regards, Markish Tag: VFP equivalent of VB Set statement
  - 3
    - textbox length Is the textbox bound (what is its ControlSource) Is MaxLength property of the textbox set Tag: VFP equivalent of VB Set statement
  - 4
    - showing the printer dialog when using a report listener You may try to call sys(1037) before your report form command or just try Code Snippet report form (RepName) to printer prompt preview object loListener. BTW, I'm not sure why do you need macros in this command. What is reg_reports and what would be in repname Also it's not clear how do you use loListener in your procedure Tag: VFP equivalent of VB Set statement
  - 5
    - delete button Several things are wrong in this code. First of all, you would not be able to do PACK in multi-user application, since it requires exclusive access of the table. PACK is usually done as a maintenance job, say, once a month, from a different menu item. Also you should first do tableupdate, then PACK, if you insist on using this command. And you should always check the return status of tableupdate command since it may fail for various reasons. You will get error information with AERROR() function. Also you don't have to refresh every page in a pageframe. Usually you only need to refresh the current page (ActivePage). In page Activate you may call this.refresh to refresh it. Of course, there could be circumstances when you need to refresh all pages, but in typical scenario you only refresh the current page. These are the thoughts I have after the first quick glance on the code. Tag: VFP equivalent of VB Set statement
  - 6
    - Will VFP6 work with Windows Vista Very hard to say. You may try to put runtime files in application path, be sure you don't have runtime files in other location and if is not running you should register dlls and try again. It worked for me but with version 7. Tag: VFP equivalent of VB Set statement
  - 7
    - Disappearing buttons Make Themes Property to .f. In Visual FoxPro 9 they are enabled by default. It might be necessary to rework some parts of your application or to disable themes. For more info check VFP9 Help. Tag: VFP equivalent of VB Set statement
  - 8
    - Little Doubt with Grids Hi Paramu, I think the best way is to update the content of the cursor / table whatsover is the recordsource for the grid based on the selection made on the grid. You can add some code to update the table (grid recordsource) in the valid event of the combobox. Hope this solves your problem. (But can you please let us know the scenario of this. I've never did like this before. Probably I can use it if it's useful...) Best regards, Markish Tag: VFP equivalent of VB Set statement
  - 9
    - finding duplicate If you are using VFP9, try ... DELETE primary FROM kill where kill.id = primary.id Tag: VFP equivalent of VB Set statement
  - 10
    - Validations on Textbox Use this code: IF ISBLANK (thisform.text2.value) MESSAGEBOX ("please...") RETURN .f. &&abort execution of rest of the code ENDIF it works only for the text fields, for numerical fields you should change the code, anyway I don't think that you are going to have both text and numeric data types in single textbox Tag: VFP equivalent of VB Set statement
  - 11
    - how to get around processing a field if a command button is clicked. Please see my message in http://forums.microsoft.com/MSDN/ShowPost.aspx PostID=1594761&SiteID=1 Tag: VFP equivalent of VB Set statement
  - 12
    - help needed on troubleshooting label printer problem Are you saying that you saved the report information with the report (e.g. printer environment checked) Usually it is not recommended to save printer environment with the report, the advice here is to strip this information and rather use SET PRINTER TO NAME (myLabelPrinter) before printing the report. Tag: VFP equivalent of VB Set statement
  - 13
    - How to 'multithread' ServerXMLHTTP in FoxPro 7? Hi, Please check this if these links help. http://blogs.msdn.com/calvin_hsia/archive/2006/05/11/595562.aspx http://blogs.msdn.com/calvin_hsia/archive/2006/05/16/599108.aspx http://blogs.msdn.com/calvin_hsia/archive/2006/05/23/605465.aspx http://www.craigbailey.net/articles/VFPBusinessSkills/index.htm page=_1R517NQ76.htm Tag: VFP equivalent of VB Set statement
  - 14
    - Define window in VFP 1. If you don't "release windows WindowsName" you may not define it again. 2.You may "link the browse cursor" to grid. Tag: VFP equivalent of VB Set statement
  - 15
    - create a key in registry Hi, There is a class developed in VFP completely by Stuart. It's available at http://weblogs.foxite.com/stuartdunkeld/archive/2005/06/30/706.aspx with the souce code. It may be quite useful and easy to go. Moreover you can use Registry Access Foundation Class in VFP. Please refer < http://msdn2.microsoft.com/en-us/library/4bksd9f9(VS.71).aspx > for reference. Best regards, Markish Tag: VFP equivalent of VB Set statement
  - 16
    - iNSTALLATION dISK Hi, You could found InstallShield for VFP limited edition shipped together with VFP7 disk. That is walkthrough help file for this also. Check out VFP7 help file. HTH Tag: VFP equivalent of VB Set statement
- Next
  - 1
    - Setting a date in VP 6 A date filled with zeroes is meaningless and not a valid date. If you want to show no date, you could either set it to empty with Replace DateField with {} (this is a VFP concept, not transferable to SQL Server or other DB) or set it to null. Tag: VFP equivalent of VB Set statement
  - 2
    - How do VFP get the last modified date-time information? If you're trying to get the last date/time a dbf was modified from within a VFP application, you can use FDATE() and FTIME(). Tag: VFP equivalent of VB Set statement
  - 3
    - Delete File Hi, I think you may need to use SET SAFETY OFF. I didn't read your code carefully, but from the quick glance I see, that you're using macro substitution when there is no need for it. &lcFile2 Instead use explicit Code Snippet delete file (m.lcFilesToDelete) Tag: VFP equivalent of VB Set statement
  - 4
    - How to check if a local printer is shared in VFP at runtime. For that you may need to check shared resouces of your system. You may use: http://news2news.com/vfp/ function=-1&example=351 Tag: VFP equivalent of VB Set statement
  - 5
    - Formatting Graphs Derek Dowle wrote: However, when it attempts to set the graph data in columns or rows error messages appear. Variable 'XL3PIE' is not found Variable 'XLCOLUMNS' is not found Can anyone please explain why this code is not accepted and how the problem can be resolved. I am very glad that you have find the white paper and code samples useful. Your problem is that xl3Pie and xlColumns are not variables. They are constants defined in an include file that should be specified as the include file for your class or form. This is one reason I seldom use them . Go to the class or form menu, select Include File, and make sure that Graph9.h is specified as the include file. Tag: VFP equivalent of VB Set statement
  - 6
    - finding duplicates with a query with fox 6 or 9... Finding duplicate records with a query isn't hard. The hard part is deciding what constitutes a duplicate, that is, what fields you want to compare. To demonstrate, say you want to consider all records where the first and last name fields are the same as duplicates. You do it like this: SELECT cFirst, cLast, CNT(*) ; FROM YourTable ; GROUP BY 1, 2 ; HAVING CNT(*) > 1 ; INTO CURSOR DupValues SELECT YourTable.* ; FROM YourTable ; JOIN DupValues ; ON YourTable.cFirst == DupValues.cFirst ; AND YourTable.cLast == DupValues.cLast ; INTO CURSOR DupRecords In VFP 9, you can actually do this in a single query using a derived table. If you only need to match a single field, you can probably do it with a subquery in earlier versions. Tamar Tag: VFP equivalent of VB Set statement
  - 7
    - Copying a numeric value with decimals from a cursor into excel without rounding up Did you try to set NumberFormat for the column Here is a function from Gregory Adam which may give you some ideas: Code Snippet function VariableToExcel(Content, FieldType, CellReference) local Success Success = TRUE local x, FormatMask FieldType = iif ( empty (m.FieldType), vartype (m.Content), m.FieldType) x = null do case case isnull (m.Content) case inlist (m.FieldType, T_CHARACTER, T_MEMO) x = ['] + rtrim (m.Content) case inlist (m.FieldType, T_DATE) x = iif ( empty (m.Content), '' , '=date(' + transform ( dtos (m.Content), '@R 9999,99,99' ) + ')' ) FormatMask = 'dd/mm/yyyy' case inlist (m.FieldType, T_DATETIME) x = ; iif ( empty (m.Content), ; '' , ; '=date(' + transform ( dtos (m.Content), '@R 9999,99,99' ) + ')' ; + '+time(' + transform ( right ( ttoc (m.Content, 1 ), 6 ), '@R 99,99,99' ) + ')' ; ) FormatMask = 'dd/mm/yyyy hh:mm:ss' case inlist (m.FieldType, T_CURRENCY) x = m.Content FormatMask = '#,###.00' + '_);[Red](' + '#,###.00' + ')' case inlist (m.FieldType, 'I' ) x = m.Content FormatMask = '#,###' + '_);[Red](' + '#,###' + ')' case inlist (m.FieldType, T_NUMERIC, T_DOUBLE) x = m.Content FormatMask = '#,###.00' + '_);[Red](' + '#,###.00' + ')' case inlist (m.FieldType, T_LOGICAL) x = iif (m.Content, 'TRUE' , 'FALSE' ) endcase do case case ( vartype (m.CellReference) <> T_OBJECT) Success = FALSE case isnull (m.x) x = '' otherwise with m.CellReference . Value = m.x if ( ! empty (m.FormatMask) ) .NumberFormat = m.FormatMask endif endwith endcase return m.Success endfunc *-------------------------------------------------------------------------- Tag: VFP equivalent of VB Set statement
  - 8
    - DELETE works after APPEND but not INSERT I believe the record is deleted (e.g. marked for deletion, but you should have set deleted on and move out of the record so it would disappear). Anyway, the correct implementation of UNDO button is TABLEREVERT, e.g. you need to have buffering enabled, then you can either save your chages with tableupdate() or revert them with tablerevert() Tag: VFP equivalent of VB Set statement
  - 9
    - Older Foxpro Dos freezing on XP. We recently had a similar problem, an older FPD 2.6 app froze up multiple times a day on the client's new computers. Their new computer were the first machines they had acquired with Windows XP, but it turns out that was a red herring. The new machines were also dual-core CPU's, and we solved the problem by modifying the NT virtual DOS machine to use only one processor. I don't know if that applies in your situation, but if it does and you want details on the solution please post back here and ask. Tag: VFP equivalent of VB Set statement
  - 10
    - Future of Visual Foxpro VFP will be in production and supported to at least 2014, probably longer since this is such a well known language. Tag: VFP equivalent of VB Set statement
  - 11
    - Subclassing visual foxpro base classes? I have almost all base VFP classes subclassed. This is very common practice and the author of the videos is right. In other words, I have my base classes in cControls library and special subclasses in aCustomControls. All frameworks (commercial and free) have the same methodology. You would not find a professional application created with base VFP classes. Tag: VFP equivalent of VB Set statement
  - 12
    - I can't see the content of the last field of the record What do you exactly mean What is the "right data" What is another utility. Is it a one that's aware of VFP version you use If that utility is working right, maybe you're not checking the same table Or are you talking about a corrupted table Can you elaborate your question Tag: VFP equivalent of VB Set statement
  - 13
    - How to control the scanner with VFP? >>Could I build a program in VFP to control my scanner as: connect, scan, and save file.... I don't know how good a programmer you are so how can I tell if you could I also don't know what scanner you are using, what version of VFP, what operating system and whether or not the scanner exposes a comopnent as an automation server, and if so, what functions are avaailalbe. If I did know any of these things I might be able to tell you if I could do it or not... >> Where could I find out the TWAIN OCX support for it Either it ships with the scanner, or maybe is downloaded from the manufacturer's site. This will be proprietary and specific to the scanner. Tag: VFP equivalent of VB Set statement
  - 14
    - Qick Sql question Try select * from table where col1 like m.lcVar + "*" assuming that col1 is character and you want to find records starting with what lcVar variable contains. Tag: VFP equivalent of VB Set statement
  - 15
    - Exporting Data to Text File You may use COPY TO temp.txt TYPE CSV This will add field names to your text file and you also can open this file with Excel. You also can add captions with lcHeader = [State Count] strtofile(m.lcHeader + chr(13) + chr(10) + filetostr('temp.txt'), 'MyOutput.txt') Tag: VFP equivalent of VB Set statement
  - 16
    - FWRITE always return 0 That is very odd, the only way that I can reproduce that is if the file isn't actually open. The following code works just fine: Code Snippet lnH = FCREATE ( 'junk.txt' ) && 13 FWRITE ( lnH, 'This is a test' ) && 14 FCLOSE ( lnH ) lnH = FOPEN ( 'junk.txt' , 12 ) && 13 FWRITE ( lnH, 'This is a another test' ) && 22 FCLOSE ( lnH ) Are you sure that the file is actually being opened and that you are not seeing text from a prior run (I assume you are testing "pnOut" is actually > 0 elsewhere ) Tag: VFP equivalent of VB Set statement

hangover

I am trying to change the SaveSentMessageFolder property of an Outlook mail item through VFP so that when my application sends an email it is saved in a specific folder (not the default 'Sent Items' folder).

However when I try to change it (e.g. loMailItem.SaveSentMessageFolder = loFolder), instead of changing the folder to which the sent item is saved, it renames the 'Sent Items' folder.

The problem is documented here where the solution given is to use the Set statement. But no such statement exists in VFP. Is there an alternative way of doing this

Re: VFP equivalent of VB Set statement

CetinBasoz

I don't know really. I'd try:

loMailItem.SaveSentMessageFolder.object = loFolder

Re: VFP equivalent of VB Set statement

hangover

Thanks Cetin, but no dice I'm afraid. The SaveSentMessageFolder property does not have an Object property.

Re: VFP equivalent of VB Set statement

dni

You may find the answer here:

http://www.tek-tips.com/viewthread.cfm qid=1276323&page=6

Re: VFP equivalent of VB Set statement

hangover

Afraid not. That just replicates what I'm already doing, i.e. it translates the VB code ...

Set myResponse.SaveSentMessageFolder = mpf

... into the VFP code ...

myResponse.SaveSentMessageFolder = mpf