Search results for query: *

Philky, Actually, I left off the final closing ) and the code probably wouldn't work against the field itself. You'd need to store the data to a variable and check the variable. Regards, Jim

Filip, OK, apparently you're talking about character data that needs to be limited to numbers. If that's correct, this will check the data for you. Let's assume you're dealing with a field called cNumber. IF LEN(CHRTRAN(cNumber,'1234567890',"") > 0 = MESSAGEBOX("Bad data ...") ENDIF...

If you mean determine visually, just make sure the DisabledItemBackColor and DisabledItemForeColor are different than the SelectedItemBackColor and SelectedItemForeColor. Regards, Jim

Try this to convert your HCNs for input to your encryption program. m.cHCN = PADL(INT(VAL(HCN)),12,SPACE(1)) Regards, Jim

ISNULL() is a function to replace null values with a default value. The syntax you want for your query is this. SQLEXEC(lnHandle,"SELECT * FROM ENC WHERE EndDat IS NULL","Results") Regards, Jim

Dandrey, I think the core of such a system could consist of one table with a PrimaryKey, HorseName, SirePrimaryKey, DamPrimaryKey, and LocationOnDiskOfPicture fields. You would probably have a number of other pieces of information to record. Some of them, such DOB, could go in this table and...

Mike, Glad you got it sorted! And that's a new one to me also. Jim

Mike, I just tried and it worked fine. But, is it possible you used DisabledForeColor and BackColor instead of DisabledItemForeColor and BackColor (as I did the first time I tried it)? Regards, Jim

Mike, That's an interesting idea. Could you do a SELECT ... INTO ARRAY and use that as your rowsource? Just a thought, Jim

Mike, According to KiloFox, the backslash technique of disabling an item only works for rowsource types of 0, 1, and 5. Regards, Jim

You need to give that printer and tray a name in Windows and then set the printer to that name just before running the report. Regards, Jim

Sorry, I didn't pick up on the fact that you were trying to do this in an exe. Can you build your Source Control System as an app? I believe the feature would be available in an app because you need VFP, not just the runtime files, to run it. Good luck, Jim

I don't know of a control that has a build method, but, if you're talking about the build command, that's pretty straightforward. * Build an exe called sample from sample.pjx BUILD EXE Sample FROM Sample * Or, optionally BUILD EXE Sample FROM Sample RECOMPILE Regards, Jim

Bill, Glad to help, and thanks for the star. Regards, Jim

Keith, Glad to help and thanks for the star. Regards, Jim

Keith, The NVL() function works for any data type. But, your code is just reversed for the NVL() function. This code SELECT NVL(LEFT(CDOW(dda.date),3),"day") as day , ; NVL(dda.date,DATE()) should work for you. Regards, Jim

Keith, OK, I did a little testing and their are some problems with the approach I was suggesting. But, this should work for you. Unfortunately, it takes 2 queries. SELECT Stk.Code, ; Stk.Product, ; SUM(Dda.Qty) as Shop1, ; 000000000 as Shop2 ; FROM AStock Stk ; RIGHT...

Keith, Your first example is almost correct. But, assuming your sum could be 9 digits, you should probably do it like this, SUM(NVL(DDA.Qty),000000000) as Shop1, ; SUM(NVL(CDA.Qty),000000000) as Shop2, ; because the length of the field will be determined by the first value returned. So, if...

Bill, Not tested, but try this. oX=CREATEOBJECT(,"Excel.Application") oWB1 = oX.Workbooks.Open("Input.xls") oWB2 = oX.Workbooks.Open("Rules.xls") oS1 = oWB1.Sheets(1) oS2 = oWB2.Sheets(1) ix = oS1.Range("A1").Value iy = oS2.Range("A1").Value Regards, Jim

Keith, FROM AStock Stk refers to the AStock table and assigns a 3 character alias to it. The WHERE is added to the JOIN condition so it is no longer needed as a separate clause. You may find you want to do a RIGHT JOIN instead just the JOIN if you have a lot of products that arn't sold by...