Answer Questions

• dee-u Valid event

  Hi, I need to put a validation to a textbox field. I put some code in valid event. But when users enters a wrong value appears a message generated by visual fox pro: "entrada no valida"; How can I disabled this system message and use a messagebox to display my own messages . When user enters a wrong value, I write that valid event return false. Thanks, You may put (berfore or in form init): ON ERROR * and you will never receive a message error from system or use: ON ERROR [ Command ] Command may be a small error handler with a messagebox included... ON ERROR * is almost never a good idea. Hiding errors doesn't cure them. Tamar ...Show All

• Pure Krome Mixing XLS and DBF tables

  In l ieu of some latest trends in my FoxPro development I want to know how do you sensible mix Excel .xls tables, workbooks and projects with FoxPro .dbf tables and databases. I have followed Marcia's earlier suggestion to use convert .dbf into .xls for graphs and now I want to integrate my .xls into existing databases. I tried to attach an .xls table to my databases but only could do in the browser as free table. This was to now avail, however, since I could not open it in FoxPro anyway. Another question, somewhat related: I used a wizard to define the connection string to a FoxPro Database. How can I do it if I need to define a connection string to an .xls table What is the equivalent for a database in Excel: a workbook Is th ...Show All

• MMS2006 Casting from character to numeric

  Any idea how to cast a characeter field to a numeric field. I have a table w/ 150 'character' numbers that i need to be 'numeric' numbers Thanks, Mike Numbers are integer only numval = val(myField) If you want to do at table level then you could use alter table along with one of the numeric types. ie: alter table myTable alter myColumn i alter table myTable alter myColumn b(2) alter table myTable alter myColumn y etc. ...Show All

• Piotr Ignaczak Lost Ability to play wav file

  My racing software has always allowed the user to play a wav file on startup. This can be anything but normally it is a race car going down the track. All of a sudden I cannot get the sound to work Unless I SET STEP ON in the code, or run the form in design mode. It has worked for 8 years just fine, what setting did I change that I don't remember This code works from the command window, a prg, or the design mode.  It will even work with set step on, but the chr(7) is completely ignored during normal execution. SET BELL ON * SET STEP on IF ! USED("SETUP") USE SETUP ELSE SELECT SETUP ENDIF * look under setup, if playmusic is true then * play the dragshrt.wav file SELECT SETUP LOCAL PlaySound PlaySound = playmusic IF PlaySoun ...Show All

• danmor VFP 9.0 ReportListener Rendeing....

  Hi All, Is there any other way to preview with out using a APP for the _reportpreivew system variable my reqiurement is like i should not have a seperate source for this APP line the ReportPreview. i have to have the source in my basic project and use reportlistener for previewing the reports. Kindly do the needful. Thanks in advance Venkatram Venkatram wrote: do (_reportpreview) with oPrevCont oRepListner = createobject("ReportListener") oRepListner.listenertype = 1 oRepListner.previewcontainer = oPrevCont *!* snip release oPrevCont release oRepListner endproc && repodemo i am getting an error " OBJECT FILE exe path IS IN USE AND CANNOT BE REMOVED FROM THE MEMORY" when i comment ...Show All

• Jon Watte COM Automation with Excel

  Here's my problem...I have the program writing to Excel and then opening just fine. What I want it to do though is save the spreadsheet in a newer version (I used "copy to 'filename.xls' type xl5") without having to actually see a prompt from Excel. The reason I'm doing this is for workbook consolodation (I'm writing to several workbooks and want to put them together). You can read more about it in my previous post here: http://forums.microsoft.com/MSDN/ShowPost.aspx PostID=782622&SiteID=1 One of the fastest (in multiple workbooks, visually arranged): Clear all * Create a test cursor Create cursor testcursor (Rcno i,cType c(10), nType i, dType d) Rand(-1) For ix = 1 to 200000 && Create 200000 recs cursor I ...Show All

• Paul Fedory How to control the scanner with VFP?

  Hi everyone, Could I build a program in VFP to control my scanner as: connect, scan, and save file.... Where could I find out the TWAIN OCX support for it Thanks a lot. Just one other thought! If there is an OCX or DLL and HP can't tell you if it works with VFP, try opening it in the VFP object browser. If you can open it, check the Interfaces and if it inherits from iDispatch and iUnknown then you should be able to access it directly from VFP using CREATEOBJECT(). If it doesn't you could try using erarly binding (CREATEOBJECTEX()) but that is less certain. >>I want to build a function to control my scanner to scan an image to a file (and save it to SQL server database: I could d ...Show All

• Andy Ho HUGE problem with the Container Control (?)

  In VFP9: I have a Form, that has a Container, that holds a Listbox The Listbox has some items in it. Now, if you try to click on an Item, hold the mouse clicked and drag it up and down, the selected item does not change, it just blocks there. When you release the mouse and click on another item, you now have TWO selected items in the Listbox. That is not normal. A Listbox outside a container works just fine. Has anyone been able to solve this Thanks. Ok thank you. This might help. No insult intended...just trying to get someone to answer thouroughly. >> Has anyone been able to solve this Thanks. This is not native behavior. I just tested this with VFP Base Cl ...Show All

• casfus Form size at editing time

  Hello, Since a couple of days, under development when I edit my form (MODIFY FORM form1.scx) It is allways in a reduced size so I have to maximize or drag it from the lower corner to resize it. Despite I save the form with the new size, it reopens allways reduced. Some settings I’ve missed Regards, Alberto Make sure in your config.fpw there is a statement RESOURCE = ON . This may be the cause of your problem. >> Despite I save the form with the new size, it reopens allways reduced. What is the setting in your Options for the Form Editor Also check your FoxUser table - try deleting any old records for this form. ...Show All

• tkroll How to input date in textbox

  I want input date in textbox and then use this date like where condition in sql statement. I dont know how to display example date in textbox and how t ocheck for correct date. Use StrictDateEntry , DateFormat, ControlSource property but this dont change anything. I solve this problem alredy, but thx anyway:D :P Set value of txtBox to a date (empty or to a predefined date) ie: thisform.txtStart.Value = {} thisform.txtEnd.Value = date() select * from myTable where myDate between thisform.txtStart.Value and thisform.txtEnd.Value ...Show All

• Mikko Nylén auto increment

  I have a table that I want to add a auto increment integer field. I go into the database designer, Right click on the table I want to add the field to then select modify. Then I insert a field and give it the name client_id set the type to Integer (autoinc) it defaults to a width of 4. Then I tell it to index it accending. This works but on all the existing records it sets the field to 0. If I add a new record it does increment. Thank You You may run once a small loop to update table for existing records. i am new in vfp how do i do thanks No, you cannot do this! Auto-Incrementing fields are read-only. The only way to handle it is as Cetin suggests. Th ...Show All

• Ather. Connect to Outlook Express and Microsoft Outlook

  Dear Expert, Can I know how to connect to the Outlook Express and Microsoft Outlook using FoxPro Like the data in a memo feild how I connect or send out using the Outlook Express and Microsoft Outlook Or Can I generete email using FoxPro Thank you.     Outlook Express Not directly. It is not a COM Server MS Outlook Yes through COM Automation. You take a reference with oOutlook = CreateObject("Outlook.Application") and then you have complete control of its object model. You can use an Object Browser and Intellisense to inspect the DOM. http://fox.wikis.com/wc.dll Wiki~AutomationExamples I higly recommend "Microsoft Office Automation ...Show All

• Dave Malcolm how can i get local ip from vfp?

  how can i get local ip from vfp I know "ipconfig" way, is there another way thanks Take a look at " What's my IP Address " by Paul Mrozowski. (PDF) If you can use the MSWinsoc ActiveX control: oSock = CREATEOBJECT ( "MSWinsock.Winsock.1" ) oSock.LocalIP   Ok ,thanks, is there another way (in ideea that i don't want to use MSWinsock, i am not so familiar with that) . ...Show All

• ShadowRaven A grid by a cursor

  Please tell me, how can I build a grid (in a formular) by a cursor. Relate me the steps. I tried, but don't work. I set at RecordSource and RecordSourceType something, but... sorry. Thank you. Yes, thank you, I make it. But in a grid by a cursor, can't change any record public oForm oForm = createobject('myForm') oForm.Show() define class myForm as Form Datasession = 2 Add object myGrid as grid Procedure load select * from (_samples+'data\customer') into cursor crsMyCursor nofilter use in 'customer' endproc enddefine In short - Create cursor in form's load event - At design-time you can design grid adding co ...Show All

• Jason Ruthkoski Help with code for updating table on website

  This is the code I am attempting to usw to add/edit date in a free table on my website. It opens the table fine and will display what is already in the table, but any changes I try to make do not arent being saved. I dont get any errors. Any help USE \\www.infotizer.com\lotterydata\NewData.dbf SET SAFETY OFF SELECT NewData INDEX ON state TO IdxState SET SAFETY ON SELECT StateLinks SET ORDER TO STATE && STATE GOTO TOP DO WHILE !EOF('StateLinks') SELECT StateLinks ThisState = ALLTRIM(State) SELECT NewData SET ORDER TO IdxState SEEK ALLTRIM(ThisState) IF FOUND() SELECT NewData SCATTER MEMVAR m.g1date = g1date m.g1name = ALLTRIM(g1name) m.g1num = ALLTRIM(g1num) m.g1b1name = ALLTRIM(g1b1name) m.g1b1num = ALLTRIM ...Show All