set serverURL to "ftp://www.piyocast.com/xxxxx/public_html/private"
set serverUser to "xxxxx@piyocast.com"
set serverPassword to text returned of (display dialog "Input FTP Password" default answer "" with hidden answer)

set aFtpManager to current application’s FTPManager’s alloc()’s init()
set successF to false

set srv to current application’s FMServer’s serverWithDestination:serverURL username:serverUser |password|:serverPassword
srv’s setPort:21

set aResList to aFtpManager’s contentsOfServer:srv

set fileNameList to {}
set fileCount to aResList’s |count|()

repeat with i from 0 to (fileCount – 1)
　　set anItem to (aResList’s objectAtIndex:i)
　　
　　set aFileName to (anItem’s valueForKeyPath:"kCFFTPResourceName") as string
　　set the end of fileNameList to aFileName
end repeat

fileNameList
–>　　{".", "..", "xls1a.png", "xls3.png"}