Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Running code from memo fields and ExecScript
Message
 
À
25/02/2008 13:30:17
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
01296122
Message ID:
01296150
Vues:
11
:-)
That means that Carrier table is not opened before you run the code.


>When I try to run w/o the first macro, I get "Object Carrier not found" error.
>
>Do you begin to see my vexation?
>
>
>>
>>ExecMemo(carrier.carr_270, InputTableName) && No quotest around first parameter
>>
>>FUNCTION execMemo(memoString, p1, p2, p3, p4, p5)
>>   LOCAL lcParams, lcParList, lnPcount
>>   lcParams  = [p1, p2, p3, p4, p5]
>>   lnPcount  = PCOUNT()-1
>>   lcParList = LEFT(m.lcParameters, ATC([,], m.lcParams,m.lnPcount)-1)
>>   TRY
>>      retVal = EXECSCRIPT(memoString, &lcParList)
>>   CATCH TO oError
>>   ENDTRY
>>
Against Stupidity the Gods themselves Contend in Vain - Johann Christoph Friedrich von Schiller
The only thing normal about database guys is their tables.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform