Classic ASP
Classic ASP
Get an FTP Listing Entry's Owner
See more FTP Examples
Demonstrates the Chilkat Ftp2.GetOwner method, which returns the owner name or identifier of a cached directory-listing entry. The only argument is a zero-based index. The value is empty when a valid entry has no owner metadata.
Background: Owner information appears in Unix-style listings and is useful for auditing or for deciding whether an operation is likely to be permitted. It is not universally available — some servers and listing formats omit it entirely, and it may be a numeric ID rather than a name — so treat an empty result as "not reported" rather than an error.
Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
' Demonstrates the Ftp2.GetOwner method, which returns the owner name or identifier of a cached
' directory-listing entry. The only argument is a zero-based index.
set ftp = Server.CreateObject("Chilkat.Ftp2")
ftp.Hostname = "ftp.example.com"
ftp.Username = "myFtpLogin"
' Normally you would not hard-code the password in source. You should instead obtain it
' from an interactive prompt, environment variable, or a secrets vault.
ftp.Password = "myPassword"
success = ftp.Connect()
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
Response.End
End If
success = ftp.ChangeRemoteDir("public_html")
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
Response.End
End If
' GetDirCount retrieves the directory listing on the first call and returns the number of
' entries. A negative return indicates failure.
n = ftp.GetDirCount()
If (n < 0) Then
Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
Response.End
End If
For i = 0 To n - 1
name = ftp.GetFilename(i)
' The owner is empty when a valid entry has no owner metadata.
owner = ftp.GetOwner(i)
Response.Write "<pre>" & Server.HTMLEncode( owner & " " & name) & "</pre>"
Next
success = ftp.Disconnect()
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( ftp.LastErrorText) & "</pre>"
Response.End
End If
%>
</body>
</html>