Post a reply

Username

Subject

Message body

Font colour:

Font size:

[quote="OlivierC"]Hello, I'm trying to run WinSCP from a VBS script, but I have the following error when I open the session:
[quote]Connection has been unexpectedly closed. Server sent command exit status 1.
Error skipping startup message. Your shell is probably incompatible with the application (BASH is recommended).[/quote]
Note: the enum are not recognized, so I replace it the the corresponding value, found in the source code:
[code]@vb@
' Setup session options
Dim sessionOptions
Set sessionOptions = CreateObject("WinSCP.SessionOptions")
With sessionOptions
    .Protocol = 1 'Protocol_Sftp
    .HostName = "toto.com"
    .UserName = "toto"
    .Password = "abvc"
    .SshHostKeyFingerprint = "sshxxxxxx"
End With
 
Dim session
Set session = CreateObject("WinSCP.Session")
 
' Connect
session.Open sessionOptions
' >> ERROR !	 
' Upload files
Dim transferOptions
Set transferOptions = CreateObject("WinSCP.TransferOptions")
transferOptions.TransferMode = 0 'TransferMode_Binary

Dim transferResult
Set transferResult = session.PutFiles(vtFolderName & vFileName, "/data/", False, transferOptions)
[/code][/quote]

Options

Disable BBCode in this post

Notify me when a reply is posted (registered users only)

Add an Attachment

If you do not want to add an Attachment to your Post, please leave the Fields blank.

Filename

(maximum 10 MB; please compress large files; only common media, archive, text and programming file formats are allowed)

File Comment

Options

Private file (available to author and site moderators only)

Topic review

Guest

2021-09-23 10:32

Ok thanks, I'll retry

In fact I'm not using Windows Script File, so I don't know how to specify the <reference object="WinSCP.Session" />
My VB script is directly launch from a SCADA system. I have to ask the hotline.

But, for the moment I succeeded in running a command line:

Dim WshShell
Set WshShell = CreateObject("WScript.Shell") 
Dim cmd
cmd = """C:\Program Files (x86)\WinSCP\WinSCP.com"" /command ""open sftp://xxxxxxx/ -hostkey=""""ssh-ed25519 255 xxxxxxxxx="""""" ""lcd " & vtFolderName & " "" ""cd /data"" ""put " & vFileName & " "" ""exit"" "
' "0" pour que la fenêtre ne s'ouvre pas.
' "TRUE" pour attendre avant de passer à la ligne suivante.
Dim retv
retv = WshShell.Run(cmd, 0, True)

martin

Re: Error : Error skipping startup message. Your shell is probably incompatible with the application

2021-09-23

Protocol.Sftp is 0, not 1.
To make enumerations working, see https://winscp.net/eng/docs/library_com_wsh#enums

OlivierC

Error : Error skipping startup message. Your shell is probably incompatible with the application

2021-09-22 14:11

Hello, I'm trying to run WinSCP from a VBS script, but I have the following error when I open the session:

Connection has been unexpectedly closed. Server sent command exit status 1.
Error skipping startup message. Your shell is probably incompatible with the application (BASH is recommended).

Note: the enum are not recognized, so I replace it the the corresponding value, found in the source code:

' Setup session options
Dim sessionOptions
Set sessionOptions = CreateObject("WinSCP.SessionOptions")
With sessionOptions
    .Protocol = 1 'Protocol_Sftp
    .HostName = "toto.com"
    .UserName = "toto"
    .Password = "abvc"
    .SshHostKeyFingerprint = "sshxxxxxx"
End With
 
Dim session
Set session = CreateObject("WinSCP.Session")
 
' Connect
session.Open sessionOptions
' >> ERROR !    
' Upload files
Dim transferOptions
Set transferOptions = CreateObject("WinSCP.TransferOptions")
transferOptions.TransferMode = 0 'TransferMode_Binary
 
Dim transferResult
Set transferResult = session.PutFiles(vtFolderName & vFileName, "/data/", False, transferOptions)

Post a reply

Topic review

Re: Error : Error skipping startup message. Your shell is probably incompatible with the application

Error : Error skipping startup message. Your shell is probably incompatible with the application

Documentation

Support

Associations

Follow Us