Writing any text to a SQLite column is easy even if the data has embedded quotes.slExeBind "Insert into Table1 values(?)",slBuildBindDat(Text$,"T")----------------------------------------------------------------------------------------------------

This enables logging any statements you want and disallowing statements that fail or didn't modify the table.Statements that fail or didn't modify the log could be placed into another log.

'decide what to log IF ChangeCount > 0 THEN 'modify to taste slexebind "insert into log values(?)",slBuildBindDat(sql,"T"),"E0" END IF

END FUNCTION

FUNCTION GetData(sql AS STRING) AS STRING LOCAL sArray() AS STRING IF slSelAry(sql,sArray(),"Q9E0c") THEN ? slGetError,%MB_SYSTEMMODAL,"Viewer" ELSEIF UBOUND(sArray)>0 THEN FUNCTION = JOIN$(sArray(),$CR) END IFEND FUNCTION

'decide what to log IF ChangeCount > 0 THEN 'modify to taste slexebind "insert into log values(?)",slBuildBindDat(sql,"T"),"E0" END IF

END FUNCTION

FUNCTION GetData(sql AS STRING) AS STRING LOCAL sArray() AS STRING IF slSelAry(sql,sArray(),"Q9E0c") THEN ? slGetError,%MB_SYSTEMMODAL,"Viewer" ELSEIF UBOUND(sArray)>0 THEN FUNCTION = JOIN$(sArray(),$CR) END IFEND FUNCTION