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：在Shell中执行期间没有错误消息。但是数据没有导入到表格中。

如何解决？

谢谢！

Answer 1

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

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

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

RealBasic：执行shell命令

1 个答案: