Neue Tabelle in Datenbank

[Loren]

Hi,

Ich habe VB6 und ich habe eine Datenbank;-). In der Db habe ich eine Tabelle. Wie kann ich diese Tabelle über Code umbennen und wie kann ich eine neue Tabelle in der Db erstellen?

Mfg

 

[Jacka]

Hi!

Welche DB benutzt?

Also eine Tabelle erstellen funktioniert mit dem SQL-Befehl CREATE TABLE.
Syntax:
CREATE TABLE "Tabellen_Name" ("Spalte 1" "Datentyp_für_Spalte_1", "Spalte 2" "Datentyp_für_Spalte_2", ... )

Beispieltabelle:

CREATE TABLE firma
(Vorname char(50),
Nachname char(50),
Addresse char(50),
Stadt char(50),
Land char(25),
Geburtstag date)

Umbennen funktionert mit DAO so:

Private Sub tabelleUmbenennen()
  Dim dbSS As Database
 
  Dim strDbName As String
  strDbName = "c:\temp\test.mdb"
 
  Set dbSS = OpenDatabase(strDbName)
 
  dbSS.CreateTableDef
  dbSS.TableDefs("Alter_Tabellenname").Name = "Neuer_Tabellenname"
   
  dbSS.Close
  Set dbSS = Nothing
 
End Sub

Viele Grüße,
Jacka