[risolto] Mysql Aggiungere campo a una tabella esistente

[dex]

ciao raga
mi si è presentato un problema, in una tabella stentente devo aggiungere un nuovo campo senza rifare tutta la tabella in quanto perderei i dati.

la tabella l'ho creata da codice

Codice: [Seleziona]

If $hconn.Tables.Exist("tipo") Then
                Message.info("la tabella tipo esiste")
            Else
        If Message.Question("Creo la Tabella tipo?", "Si", "No") = 1 Then
        sql = "CREATE TABLE tipo ("
          sql &= "idtipo MEDIUMINT NOT NULL auto_increment,"
          sql &= "cod VARCHAR(55) DEFAULT NULL,"
          sql &= "gr double(9,2) DEFAULT 0,"
          sql &= "titolo VARCHAR(9) DEFAULT NULL,"
          sql &= "testo VARCHAR(255) DEFAULT NULL,"
          sql &= "PRIMARY KEY(idtipo)"
            sql &= ")ENGINE = InnoDB AUTO_INCREMENT = 0 DEFAULT CHARSET = latin1;"
            
          hres = $hConn.EXEC(sql)
          $hConn.Commit
        Message.info("tabella tipo creata")
        Endif
      Endif

ora dovrei aggiungere un nuovo campo con nome sconto di tipo double, ma come detto sopra non dovrei ne modificare i campi esistenti ne cancellare i dati presenti nei campi.

[Golia]

ciao dex come butta?  

Codice: gambas [Seleziona]

$hconn.EXEC("ALTER TABLE tipo ALTER COLUMN sconto TYPE double;")

e per aggiornarali

Codice: gambas [Seleziona]

$hconn.EXEC("UPDATE tipo SET sconto = '0'")

dovrebbe andare..credo

[dex]

ciao dex come butta?  

Codice: gambas [Seleziona]

$hconn.EXEC("ALTER TABLE tipo ALTER COLUMN sconto TYPE double;")

e per aggiornarali

Codice: gambas [Seleziona]

$hconn.EXEC("UPDATE tipo SET sconto = '0'")

dovrebbe andare..credo

ciao golia
è da parecchio che non ci si sente... a me tutto ok

non devo inserire i dati ma solo creare i campi, provo a crearle

senti ma il chesko che fine ha fatto?

[Golia]

petta non sono sicuro, è tanto che non ho più mysql..
ALTER TABLE tipo ADD sconto double;

.... non mi ricordo, per sqlite è come ti ho scritto prima e credo anche per postgres ma per mysql non son sicuro

[Golia]

senti ma il chesko che fine ha fatto?

dicono sia stato attaccato dalla ceskonite

[dex]

senti ma il chesko che fine ha fatto?

dicono sia stato attaccato dalla ceskonite

ahahahahahahahahahhahahahhahahahh povero cescko,  non mi ricordo nemmeno più il suo nick.

ok, ora faccio qualche prova e ti farò sapere

[dex]

fatto

il codice giusto è

Codice: [Seleziona]

$hconn.EXEC("ALTER TABLE tipo ADD COLUMN sconto DOUBLE  DEFAULT 0 AFTER `testo;")

ora si presenta un altro problema, se il campo esiste dovrei fare un controllo con IF Then per evitare errori.

come si fà?

[fsurfing]

un modo può essere

Codice: [Seleziona]

if  hres.Fields.Exist(nome colonna) = true then

[dex]

un modo può essere

Codice: [Seleziona]

if  hres.Fields.Exist(nome colonna) = true then

ciao
ho provato ma va in errore il quanto cerca in tutto il database.
come faccio a farlo cercare nella tabella tipo?

Codice: [Seleziona]

Codice 11 - Errore Unknown symbol 'Fields' in class 'Connection'

[fsurfing]

dim hres as result
dim $hcon as connection


.........codice per la connessione


hres=$hcon.exec(select * from mome_tabella)

if  hres.Fields.Exist(nome colonna) = true then

ecc ecc

[dex]

risolto
grazie a golia e a fsurfing