RealBasic：执行shell命令

Question

我需要使用Realbasic将CSV文件加载到sqlite数据库中。 这样做没有问题，如this教程中所述。

你能帮我用RealBasic做到这一点吗？

我试图使用Shell类：

Dim folder As FolderItem = GetFolderItem("") 

Dim sh As Shell = new Shell 
sh.Mode = 2 

If Not sh.IsRunning Then 
    sh.Execute "sh" 
End If 

sh.Write("cd " + folder.ShellPath) 
sh.Write("sqlite3 " + App.GetDatabaseName() + ".sqlite") 
sh.Write(".separator "",""") 

sh.Write(".import " + FileName + " " + TableName) 

PS：在执行过程中有任何错误消息，壳牌。但数据不会被导入到表格中。

如何解决？

谢谢！

Answer 1

尝试使用WriteLine而不是Write来发送您的命令。

sh.WriteLine("cd " + folder.ShellPath) 
sh.WriteLine("sqlite3 " + App.GetDatabaseName() + ".sqlite") 
sh.WriteLine(".separator "",""") 

sh.WriteLine(".import " + FileName + " " + TableName)