Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Command Coding in Class Method
Message
De
11/10/1997 12:20:33
 
 
À
11/10/1997 00:14:54
Shihchau Tai
Apic Systems Pte Ltd
Singapore, Singapour
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00054146
Message ID:
00054170
Vues:
26
>ccommand = 'SELECT *,RECNO() AS flagrecno FROM ' + THIS.recordsource + ;
> ' WHERE ' + THIS.cflagfield + ' = .T. INTO CURSOR mycursor'
>&ccommand
>
>SCAN
> i = i+1
> GOTO (mycursor.flagrecno) IN (THIS.recordsource)
> ccommand = 'REPLACE ' + THIS.cseqfield + ' WITH nseq + i IN ' + THIS.recordsource
> &ccommand
>ENDSCAN
>
>Above are two sections of codes I have in my methods. I am wondering if there is a way I can avoid using macro substitution.
>
>Thanks in advance.
>
>
>Tai


First...you should not use RECNO() in an SQL SELECT statement. It is unreliable.
SELECT * FROM (This.RecordSource) WHERE This.cFlagField INTO CURSOR MyCursor

lcField = This.cSeqField

REPLACE &lcField. WITH nSeq + i IN (This.RecordSource)
Craig Berntson
MCSD, Microsoft .Net MVP, Grape City Community Influencer
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform