[VB6] Verificare tabella esistente prima della sua rimozione

[XWolverineX]

Salve a tutti.
Per comodità io sono solito copiare intere tabelle in questo modo

Cs.execute("Select * into tables from originaltable")

Una volta finito le mie operazioni elimino la tabella

cs.execute("Drop table tables")

In modo che quando si riapra il form sia possibile rifare la query select
Capita però certe volte che il programma viene chiuso e quando riapro dice che giustamente la tabella esiste già...oppure che non esiste la tabella quando cerca di fare il drop.

non esiste qualche modo di aggiungere la tabella solo se non esiste e eliminare una tabella soltanto se questa esiste?

[chico62]

Dipende dal tipo di Database che utilizzi.
In MySql, ad esempio, esistono due comode istruzioni SQL:

DROP TABLE IF EXISTS NomeTabella (elimina la tabella solo se esiste già)

Oppure:

SQL = "CREATE TEMPORARY TABLE " & TabellaTemporanea & " select * from TabellaDaCuiTrasferire where ......"

(ovvero crea una tabella TabellaTemporanea in cui viene travasato il contenuto della TabellaDaCuiTrasferire in base alle condizioni esposte nella clausola WHERE. TabellaTemporanea viene eliminata alla chiusura della connessione).

La parola chiave EXISTS, in Access, ha un significato diverso, TEMPORARY non credo nemmeno esista.

Ciauz

Chico

[XWolverineX]

io uso access

[LMondi]

Ciao XWolverineX,
anche io uso delle Tbl temporanee per la stampa, ma non distruggo la Tbl, bensì mi limito a cancellarne il contenuto con:

'Prima di salvare Elimina i vecchi records dalla tabella:
        OggCo6.CommandText = "Delete * From TblProvaRPT"
        OggCo6.Execute

Ti assicuro che così non ho mai avuto problemi.