Hi!
I am trying to establish a ssh connection to a remote Mac using a Xojo shell, but unfortunately I got stuck sending the password.
Where is my mistake:
[i]dim sh As new Shell
sh.Mode = 2
dim SSH_Login As String
SSH_Login = "ssh 192.168.0.15 -l sammlungen"
sh.Execute(SSH_Login)
If sh.ErrorCode = 0 Then
TextField1.Text = sh.ReadAll
Else
MsgBox("Error code: " + Str(sh.ErrorCode))
End If
Dim waitUntil As Integer = Ticks + 20
While ticks < waitUntil
Wend
sh.WriteLine("sammlungen")
If sh.ErrorCode = 0 Then
TextField1.Text = sh.ReadAll
Else
MsgBox("Error code: " + Str(sh.ErrorCode))
End If[/i]
Any help is appreciated
Thanks in advance,
Eric