[VB6] Creare una tabella direttamente dal codice

[angelicab]

ciao!
nell'archivio Access che uso per un mio programma avrei bisogno di inserire una tabella con l'elenco dei comuni d'italia .. il problema che il programma è già stato distribuito .. come posso fare per creare la tabella direttamente dal codice con un semplice aggiornamento del programma??

[power.mobile]

basta eseguire una query con CREATE TABLE, per vedere gli argomenti del comando basta che cerchi nel MSDN.

[LMondi]

Se si tratta di creare una Tbl da codice, posto di seguito un esempio che dovrai approfondire e modificare secondo le tue esigenze:

Private Sub CmndCreaTabella_Click()                       'Crea la Tabella Dati Personali
Dim Connes As New ADODB.Connection
Dim RST As New ADODB.Command
 
 'Esegue la connessione con il DataBase:
    If Connes.State = False Then
      Connes.ConnectionString = StringaConnessione
      Connes.CommandTimeout = 15
      Connes.Open
     End If
  
        RST.ActiveConnection = Connes
        RST.CommandType = adCmdText
        RST.CommandText = "create Table TblDatiPersonali(IDDati autoincrement primary Key, Titolo VarChar(20), Nome VarChar(100), Cognome VarChar(100), Via VarChar(50), Città VarChar(100), CAP VarChar(10), Telefono VarChar(50) Not null)"
        RST.Execute

 'Chiude la connessione:
        Connes.Close
        Set Connes = Nothing

End Sub

[angelicab]

ti ringrazio .. questo codice va benissimo ..

solo una cosa .. come posso creare un campo con "Consenti lunghezza zero" = si ??