>>George ---
>>
>>Hit reply to this message to see ther hidden HTML tags:
>>
>>
>>PROCEDURE dummy
>> IF oApp.IndentThis
>> This.Indented=.T.
>> ENDIF
>>ENDPROC
>>
>>
>
>I can't see the "<"pre">" tags, but's lets try this.
>
>
>* Display all tables in a DBC.
>
>LOCAL lnTotTables, lnCurTable, lcCurTable
>LOCAL ARRAY laTables[1]
>
>IF NOT DBUSED( "Books")
> OPEN DATABASE Books
>ELSE
> SET DATABASE TO Books
>ENDIF
>
>lnTotTables = ADBOBJECTS( laTables, "Table")
>FOR lnCurTable = 1 TO lnTotTables
> lcCurTable = laTables[ lnCurTable ]
> ?lcCurTable
>ENDFOR
>
><\pre>
That worked.
Thanks guys. Had one too many "<"pre">" tags in the last message.
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement