Italian community of Lazarus and Free Pascal

Programmazione => Generale => Topic aperto da: ffabio - Marzo 10, 2016, 02:59:06 pm

Titolo: sqllite
Inserito da: ffabio - Marzo 10, 2016, 02:59:06 pm

Ciao ragazzi sono cotto e non riesco piu' a capire dove sbaglio.

Ho messo un fle csv in una tabella adesso vorrei scorrerla e inserire in un db tutte le celle.

recupero i valori dalla riga della tabella per costruirmi sql e fin qui tutto ok.

apro la connessione

  MyConn.HostName:='127.0.0.1';
  MyConn.DatabaseName:=Application.Location + 'fep.s3db';
  MyConn.Open;
  MyTransection.Active:=TRUE;

//imposto la stringa di insert

sql_string :='';
sql_string := 'INSERT INTO fatture(BATCH,FILE_ID,DATA_CARICAMENTO,DATA_RICEZIONE,COD_SFE,CF,IVA,COD_FORN,RAG_SOC,SEDE_FORN,FATT_NUM,PROTOCOLLO,IMPORTO )VALUES("' + Batch + '","' + File_id + '","' + D_car  + '","' + D_ric + '","' + C_SFE + '","' +  C_f + '","' + P_IVA + '","' +C_For + '","' + R_SOC+ '","' + S_For + '","' + N_Fat + '","' + Imp + '","' + Prot + '");';

 SQLQuery1.SQL.Text:='';
 SQLQuery1.SQL.Add(sql_string);
SQLQuery1.ExecSQL;

Dopo execute mi apetto mi inserisca il record invece ninte
 :'( :'( :'( :'( :'(
Perche'?????
 :'( :'( :'( :'( :'(

Titolo: Re:sqllite
Inserito da: Stilgar - Marzo 14, 2016, 01:13:18 am

Hai provato a mettere .post dopo .execsql?

Titolo: Re:sqllite
Inserito da: xinyiman - Marzo 14, 2016, 08:49:08 am

Verifica anche la commit della connessione

Titolo: Re:sqllite
Inserito da: ffabio - Marzo 14, 2016, 12:24:15 pm

trovato ragazzi, si mi mancava la transection.commit;

grazie

Titolo: Re:sqllite
Inserito da: xinyiman - Marzo 14, 2016, 04:06:06 pm

Molto bene  :)  ;)