Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
SEEK or SEEK()with cursors??
Message
De
21/08/1998 13:59:55
 
 
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00127371
Message ID:
00128863
Vues:
56
>>>If you make your SQL select cursor R/W, you can create more than one tag in
>
>How can you do this? I thought SQL cursors were always read only.
>
>-Michelle

Michelle,

This is how you make a SQL cursor R/W.

Here's a function we use:


*
* From BostonComputerNewsNetwork @NJ Fox-user 6-22-94
*+
*PURPOSE:
* To Make SQL read-only cursor into R/W cursor
* Must be real file not filtered view
*
*SYNTAX:
* m.retstat = mkcursrw(m.cn)
*PARAMETERS:
* m.cn -(C) Cursor alias name to be made read/writable.
*
*RETURNS:
* m.retstat -(L) .t. made the read-only cursor to R/W cursor.
* .f. the cursor alias name does not correspend
* to a cursor.
*REMARKS:
*SEE ALSO:
*-
*
FUNCTION mkcursrw
PARAMETER m.cn
PRIVATE m.cf, m.retstat
m.cf = DBF(m.cn)
IF ".TMP"=RIGHT(m.cf,4)
USE (m.cf) AGAIN IN 0 ALIAS dummycname
USE IN (m.cn)
USE (m.cf) AGAIN IN 0 ALIAS (m.cn)
USE IN dummycname
SELECT (m.cn)
m.retstat = .t.
ELSE
m.retstat = .f.
ENDIF
RETURN m.retstat
****
Fred
Microsoft Visual FoxPro MVP

foxcentral.net
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform