I got your e-mail - thanks. For the lurkers I'll try to post the code:
local lcSQLCommand
TEXT TO lcSQLCommand textmerge NOSHOW PRETEXT 15
Update GRADS set
cFName = '<<ThisForm.txtcFName.Value >>',
cMInit = '<<ThisForm.txtcMInit.Value>>',
etc etc..
endtext
then..
SQLExec(myhandle,lcSQLCommand)
Nice idea! Your example seems to be against a SQL backend, whereas my situation is VFP free tables. But, replacing the SQLExec with a macro command-execution ( &lcSQLCommand ) should work just fine.
>I usually use textmerge to create the SQL command, then I execute the SQL command.
>
>UT isn't letting me give you an example (says I can't include a style attribute in a post or something). I'll send you some example code via EMAIL..
It looks like wrapping in PRE and /PRE tags lets it work.
>
>
>>I'm using the following UPDATE command in a form method:
>>
>>LPARAMETERS ;
>> tiSessID ;
>> , tiSitNo
>>
>>UPDATE Grads SET ;
>> cFName = ThisForm.txtcFName.Value ;
>> , cMInit = ThisForm.txtcMInit.Value ;
>> , cLName = ThisForm.txtcLName.Value ;
>> , cStreet = ThisForm.txtcStreet.Value ;
>> , cCity = ThisForm.txtcCity.Value ;
>> , cProvince = ThisForm.txtcProvince.Value ;
>> , cPostCode = ThisForm.txtcPostCode.Value ;
>> , cPhone = ThisForm.txtcPhone.Value ;
>> WHERE iSessID = tiSessID ;
>> AND iSitNo = tiSitNo
>>
>>All of the target table columns and form controls ( .txtc*.Value) exist. The control values are not NULL.
>>
>>When run, I get an error "Alias 'TXTCFNAME' is not found".
>>
>>If, for test purposes I replace the ThisForm.Control.Value(s) with string literal(s) the command works fine.
>>
>>Is this a known problem, that UPDATE - SQL can't make use of form control properties this way? Any workaround other than declaring local temp variables to hold the values? TIA.
>>
>>UPDATE: never mind - it's right in the VFP Help that you can't do this, and that you need to use local variables. One place where good ol' REPLACE helps out - it doesn't complain about using object properties ;)
Regards. Al
"Violence is the last refuge of the incompetent." -- Isaac Asimov
"Never let your sense of morals prevent you from doing what is right." -- Isaac Asimov
Neither a despot, nor a doormat, be
Every app wants to be a database app when it grows up