RealBasic：シェルコマンドを実行

Question

Realbasicを使用してCSVファイルをsqlite DBにロードする必要があります。 チュートリアルのthisに記載されているように問題はありません。

これをRealBasicで手助けできますか？

私はシェルクラスを使用しようとしています：

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

Writeの代わりにWriteLineを使用してコマンドを送信してみてください。

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

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