Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Enumerating Data Sessions?
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Codage, syntaxe et commandes
Divers
Thread ID:
00660418
Message ID:
00660430
Vues:
9
Scott,

>>I wish to close ALL tables, regardless of what data session they are in.

There is ASessions() in VFP7. In VFP6 I did:
PROCEDURE ReallyCloseAllData
LOCAL lc_WasError, ll_GoOn, ln_Tables,  ln_i
local array la_x[1,2]

lc_WasError = on("ERROR")

on error ll_GoOn = .F.

ll_GoOn = .T.

set datasession to

for ln_i = 1 to 999
    ln_Tables = aused(la_x, ln_i)

    if ! ll_GoOn
        exit
    endif        
    set datasession to (ln_i)
    close data all
    close data
endfor &&* ln_i = 1 to 10

on error &lc_WasError

set datasession to 

ENDPROC
HTH
Regards from Berlin

Frank

Dietrich Datentechnik (Berlin)
Softwarekombinat Teltow (Teltow)

Frank.Dietrich@dd-tech.de
DFPUG # 327
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform