VB.NET Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++CMFCDelphiFoxProJavaPerlPHPPythonRubySQL ServerVBScript

VB.NET Examples

Bounced Mail
Bz2
Character Encoding
CSV
Digital Certificates
Digital Signatures
Email
FTP
HTML to XML
HTTP
IMAP
Encryption
MHT / HTML Email
POP3
PFX
RSA
S/MIME
SMTP
Socket
Spider
SSH
SSH Tunnel
SSH Key
SFTP
Tar Archive
Upload
XML
XMP
Zip Compression
Misc

More Examples...
Email Object
FileAccess
RSS
Atom
Self-Extractor
Service
PPMD
Deflate
DH Key Exchange
DSA

Byte Array
VB.NET FTPS
System.IO

Unreleased...
Bzip2
LZW
Icon

 

 

 

 

 

 

CRLF Mode

The CrlfMode property applies when downloading files in ASCII mode. If CrlfMode is set to 0 (the default), then the ASCII transfer happens normally without alteration. A value of 1 converts all line endings to CR+ LF. A value of 2 converts all line endings to LF-only. A value of 3 converts all line endings to CR-only.

Download Chilkat .NET for 2.0 / 3.5 Framework

Download Chilkat .NET for 64-bit 2.0 / 3.5 Framework (x64)

Download Chilkat .NET for 1.0 / 1.1 Framework

Dim ftp As New Chilkat.Ftp2()

Dim success As Boolean

'  Any string unlocks the component for the 1st 30-days.
success = ftp.UnlockComponent("Anything for 30-day trial")
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


ftp.Hostname = "ftp.chilkatsoft.com"
ftp.Username = "MyLogin"
ftp.Password = "MyPassword"

'  Connect and login to the FTP server.
success = ftp.Connect()
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


'  Set the transfer mode to ASCII
success = ftp.SetTypeAscii()
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


'  Set the CrlfMode to ensure that line endings are CR+LF:
ftp.CrlfMode = 1

'  CrlfMode line ending settings:
'  0 = do ASCII transfer without alteration.
'  1 = CR+LF
'  2 = LF-only
'  3 = CR-only

'  Change to the remote directory where the file will be uploaded.
success = ftp.ChangeRemoteDir("junk")
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


Dim localFilename As String
localFilename = "hamlet.xml"
Dim remoteFilename As String
remoteFilename = "hamlet.xml"

'  Turn on session logging for the upload:
ftp.KeepSessionLog = true

'  Download a file.
success = ftp.GetFile(remoteFilename,localFilename)
If (success <> true) Then
    MsgBox(ftp.LastErrorText)
    Exit Sub
End If


'  View the session log.  You can verify visually that
'  the transfer was in ascii mode.
TextBox1.Text = TextBox1.Text & ftp.SessionLog & vbCrLf

ftp.Disconnect()

MsgBox("File Downloaded!")
 

Need a specific example? Send a request to support@chilkatsoft.com

© 2000-2007 Chilkat Software, Inc. All Rights Reserved.

Mail Component · XML Parser