Dim mlist As List
mlist.Initialize
mlist=DBUtils.ExecuteMemoryTable(SQL,"Select * From MyTable Where ID>0",Null,0)
If mlist.Size>1 Then
Dim su As StringUtils
su.SaveCSV(File.DirRootExternal,"archivo.csv",",",mlist)
ToastMessageShow("OK",True)
Else
ToastMessageShow("Problems",True)
End If