Software components for data protection, secure storage and transfer
sFileHandle = SftpClient.OpenFile(currentDir & "/" & info.Name, SB_SFTP_OPENMODE_READ, Nothing)
Call SftpClient.Read(sFileHandle, 0, 0, 1024, strPreview)
Private Function ByteArr2Str(v As Variant) As String
Dim I As Integer
Dim B As Byte
Dim C As String
Dim result As String
If VarType(v) = vbString Then
ByteArr2Str = v
If VarType(v) <> vbArray + vbByte Then
ByteArr2Str = ""
For I = LBound(v) To UBound(v)
result = result + Chr(v(I))
ByteArr2Str = result
Messages 1 - 10 of 11
First | Prev. | 1 2 | Next | Last
Number of guests: 1, registered members: 0,
in total hidden: 0
Copyright (c) 2017, /n software, inc.
As of July 15, 2016 EldoS business operates as a division of /n software, inc. For more information, please read the announcement.