TZMSQL insert record
lazarus / 16-Databases

----------------------------------------------------------------------
eldonfsr · 2021-05-15 22:23

Hi i just started to test tzmsql  i write a file called database.csv
it contains 3 fields  nombrecia;direccion;database

i write one record   sarusa;andaros ; test

i con open this file but i can not add new records

      query:='INSERT INTO databases.csv (nombrecia ,direccion ,
dbasename) VALUES ('''+ENom.Text+''' ,'''+ EDir.Text+''' , '''+
EDb.Text+''');'; 
FormMain.ZMQDSC.SQL.Text:=query;
      FormMain.ZMQDSC.QueryExecute; 

how i can update file

----------------------------------------------------------------------
eldonfsr · 2021-05-18 17:49

Some confuse if use this command don't work
  ZMCC.DatabasePath:=path+'\';
   ZMCC.Connected:=true;

   ZMQDSC.SQL.Text:='INSERT INTO databases.csv ( nombrecia ,
direccion, dbasename)'+' VALUES( '' SMAC'',''5807'',''smac'''+');';
   showmessage(ZMQDSC.SQL.Text);
   ZMQDSC.QueryExecute;
   ZMQDSC.savetotable;

but i use command like this works
      FormMain.ZMQDSC.Append;
      FormMain.ZMQDSC.FieldByName('NOMBRECIA').AsString:= 'TEST';
      FormMain.ZMQDSC.FieldByName('DIRECCION').AsString:='cONOCIDO
244';
      FormMain.ZMQDSC.Post;

      FormMain.ZMQDSC.SaveToTable;

     with las code only i can not delete but update and insert work

some body has experience with this component can help help me please..

thanks
Fernando

----------------------------------------------------------------------
eldonfsr · 2021-05-19 00:20

after testing and practicing

what was my error
 the correct command is like this
   ZMQDSEdos.SQL.Text:='CREATE TABLE states (idedo, nombre) ;
COMMIT)';
         ZMQDSEdos.QueryExecute;

and now we can insert records
  ZMQDSC.SQL.Text:='INSERT INTO databases ( numero ,nombrecia ,
direccion, dbasename)'+' VALUES( ''0'',''
test1'',''5807'',''testing'''+'); COMMIT';
   ZMQDSC.QueryExecute;

and delete records like this

  FormMain.ZMQDSEdos.SQL.Text:='Delete from states where idedo <>
'''+'''; COMMIT';
  FormMain.ZMQDSEdos.QueryExecute;  



first step is connect ZMC connection to folder witch one is going to
keep tables like this
   path = path  := GetCurrentDir();
   ZMCC.DatabasePath:=path+'\';
   ZMCC.Connected:=true;

Hope help to some body...