ASP Examples

ChilkatHOMEASPVisual BasicVB.NETC#Visual C++DelphiFoxProJavaPerlPythonRubySQL ServerVBScript

ASP Examples

ASP String
ASP Byte Array
Bounced Mail
Character Encoding
Digital Certificates
Digital Signatures
Email
FTP
HTML-to-XML
HTTP
IMAP
Encryption
MHT / HTML Email
S/MIME
Socket
Spider
RSA Encryption
Tar
Upload
XML
XMP
Zip Compression

More Examples...
Email Object
POP3
SMTP
RSS
Atom
Self-Extractor

Unreleased...
Service
PPMD
Deflate
Bzip2
LZW
Bz2
DH Key Exchange
DSA
Icon

 

 

 

 

 

 

Get FTP Directory Listing Information

ASP example showing how to get information about files and subdirectories in the current remote FTP directory.

Download Chilkat FTP2 ActiveX

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set ftp = Server.CreateObject("Chilkat.Ftp2")

'  Any string unlocks the component for the 1st 30-days.
success = ftp.UnlockComponent("Anything for 30-day trial")
If (success <> 1) Then
    Response.Write ftp.LastErrorText & "<br>"

End If

ftp.Hostname = "www.example-code.com"
ftp.Username = "****"
ftp.Password = "****"

'  Connect and login to the FTP server.
success = ftp.Connect()
If (success <> 1) Then
    Response.Write ftp.LastErrorText & "<br>"

End If

'  The ListPattern property is our directory listing filter.
'  The default value is "*", which includes everything.
Response.Write ftp.ListPattern & "<br>"

'  To get file and sub-directory information, simply
'  loop from 0 to ftp.NumFilesAndDirs - 1

n = ftp.NumFilesAndDirs
If (n < 0) Then
    Response.Write ftp.LastErrorText & "<br>"

End If

If (n > 0) Then
    For i = 0 To n - 1

        '  Display the filename
        Response.Write ftp.GetFilename(i) & "<br>"

        '  Display the file size (in bytes)
        Response.Write ftp.GetSize(i) & "<br>"

        '  Is this a sub-directory?
        If (ftp.GetIsDirectory(i) = 1) Then
            Response.Write ".. this is a sub-directory" & "<br>"
        End If

        Response.Write "--" & "<br>"
    Next
End If

Response.Write "-----------------------------------" & "<br>"

'  Changing the ListPattern automatically changes the value
'  of the NumFilesAndDirs property.  Only files and directories
'  matching the ListPattern are returned.
ftp.ListPattern = "*.asp"
n = ftp.NumFilesAndDirs
If (n < 0) Then
    Response.Write ftp.LastErrorText & "<br>"

End If

If (n > 0) Then
    For i = 0 To n - 1

        '  Display the filename
        Response.Write ftp.GetFilename(i) & "<br>"

        '  Display the file size (in bytes)
        Response.Write ftp.GetSize(i) & "<br>"

        Response.Write "--" & "<br>"
    Next
End If

ftp.Disconnect 
%>
</body>
</html>

 

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

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