Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Number at mytext
Message
From
22/02/2005 04:09:34
Jon Neale
Bond International Software
Wootton Bassett, United Kingdom
 
 
To
22/02/2005 03:42:43
General information
Forum:
Visual FoxPro
Category:
Forms & Form designer
Miscellaneous
Thread ID:
00966918
Message ID:
00989154
Views:
65
You have to think about what you want to do?
thisform.text3.Value=year(date())
inyearofbill=2000+VAL(LEFT(ALLTRIM(STR(thisform.text3.Value)),2))
? inyearofbill
i get 2020,but thisform.tet3.value=2005

Of course you get 2020 because of this LEFT(ALLTRIM(STR(thisform.text3.Value)),2), its taking the left 2 most characters of the year value. You need the right.


try this instead. inyearofbill=2000+VAL(RIGHT(ALLTRIM(STR(thisform.text3.Value)),2))


For the select what data types are these billno=thisform.text4.value and (billinfo.billdate)= inyearofbill these values.

This is a basic select statement, and the error indicates a data type mismatch. You should be able to work out what is wrong.



>hi,
>i print
>? inyearofbill&&i get 2020
>********************************
>thisform.text3.Value=year(date())
>inyearofbill=2000+VAL(LEFT(ALLTRIM(STR(thisform.text3.Value)),2))
> ? inyearofbill
>i get 2020,but thisform.tet3.value=2005
>
>i get another message&&Operator/operand type mismatch
> SELECT * from billinfo WHERE billno=thisform.text4.value and YEAR(billinfo.billdate)= inyearofbill INTO CURSOR curbilldata
>
>thanks.
>
>>Is the value of thisform.text3.Value already bound to a numeric field?
>>
>>inyearofbill=2000+VAL(LEFT(thisform.text3.Value,2))
>>
>>try this
>>
>>inyearofbill=2000+VAL(LEFT(ALLTRIM(STR(thisform.text3.Value)),2))
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform