hi,
thank you,
i try but i get errorr messag
Function argument value, type, or count is invalid.

ALLTRIM(thisform.text1.value)=&&&field name is cc type is char.

CLOSE all
USE bill in 0
USE contact in 0
lcField = ALLTRIM(thisform.text1.value)
? lcField
replace IN contact ;
FOR lcField==LookUp(Evaluate("Bill." + lcField), lcField, Evaluate("Bill." + lcField));
val with VAL(bill.bill_value)

hi all,
>>
>>i try to run this code as under, i got error message
>>Object "bill" is not found
>>

>>CLOSE all
>>USE bill in 0
>>USE contact in 0
>>
>>replace IN contact ;
>>***   FOR cc==LOOKUP(bill.cc,cc,bill.cc) AND NOT EOF('bill') ;&&old as prg.
>>
>>   FOR thisform.text1.value==LOOKUP(bill.(thisform.text1.value),(thisform.text1.value),bill.(thisform.text1.value) AND NOT EOF('bill') ;&&new via form
>>   val with VAL(bill.bill_value)
>>
>>

>>
>>thanks.
>
>You are using bill.(thisform.text1.value) twice, and is not a valid expression, what you probably want to put there is something along this lines:
>
>

lookup(evaluate("Bill." + thisform.text1.value), thisform.text1.value, evaluate("Bill." + thisform.text1.value))

>
>Assuming thisform.text1.value is the name of some field in the Bill table.
>
>Better might be something like
>
>

>lcField = alltrim(thisform.text1.value)
>LookUp(Evaluate("Bill." + lcField), lcField, Evaluate("Bill." + lcField))
>

>
>You might also want to consider some error handler.