间接下载资源工具:FlashFXP v340 多国语言版 >
打开浏览器
地址栏输入ftp://usename:用户名@usepassword:密码/主机地址:端口号
回车确定即可连接打开FTP的资源
如果时间超时连接断开,可在页面右键选择连接即可重新输入账号密码进行连接。
如果是用资源管理查看ftp上的文件,在文件上右键点属性,d出的属性对话框中,位置就是地址。
如果是在FlashFXP中查看,在文件上右击,复制URL,就可以把地址复制下来了。
例如文件FreeRenamerar的地址是
ftp://upload:upload@6113097118/FreeRenamerar
其他根目录文件就是把后面的文件名换一下
如果不是在根目录下,就加上相应的目录。
要用到inet控件。public strData as string
'这段可以返回服务器中的第一级目录名,保存在strData中, 如有多个文件夹名每个文件夹名会以空格分开。读取时判段一下。
Inet1Execute Inet1URL, "dir """ & dirName & """"
Do
DoEvents
Loop While Inet1StillExecuting = True
msgbox strData
'这段是进入目录中,要想获得服务器中所有的文件夹名,就可以用递规的办法来获得。
Inet1Execute Inet1URL, "cd """ & dirName & """"
Do
DoEvents
Loop While Inet1StillExecuting = True
Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
StatusBar1PanelsItem(1)Text = "该控件正在查询所指定的主机的 IP 地址"
Case 2
StatusBar1PanelsItem(1)Text = "该控件已成功地找到所指定的主机的 IP 地址"
Case 3
StatusBar1PanelsItem(1)Text = "该控件正在与主机连接"
Case 4
StatusBar1PanelsItem(1)Text = "该控件已与主机连接成功"
Case 5
StatusBar1PanelsItem(1)Text = "该控件正在向主机发送请求"
Case 6
StatusBar1PanelsItem(1)Text = "该控件发送请求已成功"
Case 7
StatusBar1PanelsItem(1)Text = "该控件正在接收主机的响应"
Case 8
StatusBar1PanelsItem(1)Text = "该控件已成功地接收到主机的响应"
Case 9
StatusBar1PanelsItem(1)Text = "该控件正在解除与主机的连接"
Case 10
StatusBar1PanelsItem(1)Text = "该控件已成功地与主机解除了连接"
Case 11
MsgBox "与主机通讯时出现了错误", vbInformation, "个人资料"
Case 12
Dim vtData As Variant
Dim bDone As Boolean
bDone = False
'取得第一个块。
vtData = Inet1GetChunk(1024, icString)
DoEvents
Do While Not bDone
strData = strData & vtData
'取得下一个块。
vtData = Inet1GetChunk(1024, icString)
DoEvents
If Len(vtData) = 0 Then
bDone = True
End If
Loop
StatusBar1PanelsItem(1)Text = "该请求已经完成,并且所有数据均已接收到"
Case Else
StatusBar1PanelsItem(1)Text = Inet1ResponseCode & ": " & Inet1ResponseInfo
End Select
End Sub
关于inet控件的祥细用法可以看msdn中的帮助。
找个FTP的jar包(apache,jsch),先链接上FTP。
然后进入/test/目录,list下这个目录,就能获取到找个目录下的所有文件夹或者文件,如果是文件夹,就循环递归下去,然后拼接路径,就能获取到所有文件的路径
当启动FTP从远程计算机拷贝文件时,你事实上启动了两个程序:一个本地机上的FTP客户程序:它向FTP服务器提出拷贝文件的请求。另一个是启动在远程计算机的上的FTP服务器程序,它响应你的请求把你指定的文件传送到你的计算机中。FTP采用“客户机/服务器”方式,用户端要在自己的本地计算机上安装FTP客户程序。FTP客户程序有字符界面和图形界面两种。字符界面的FTP的命令复杂、繁多。图形界面的FTP客户程序, *** 作上要简洁方便的多。
FTP工作原理示意图
(1)FTP服务器运行FTPd守护进程,等待用户的FTP请求。
(2)用户运行FTP命令,请求FTP服务器为其服务。
public strData as string
'这段可以返回服务器中的第一级目录名,保存在strData中, 如有多个文件夹名每个文件夹名会以空格分开。读取时判段一下。
Inet1Execute Inet1URL, "dir """ & dirName & """"
Do
DoEvents
Loop While Inet1StillExecuting = True
msgbox strData
'这段是进入目录中,要想获得服务器中所有的文件夹名,就可以用递规的办法来获得。
Inet1Execute Inet1URL, "cd """ & dirName & """"
Do
DoEvents
Loop While Inet1StillExecuting = True
Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 1
StatusBar1PanelsItem(1)Text = "该控件正在查询所指定的主机的 IP 地址"
Case 2
StatusBar1PanelsItem(1)Text = "该控件已成功地找到所指定的主机的 IP 地址"
Case 3
StatusBar1PanelsItem(1)Text = "该控件正在与主机连接"
Case 4
StatusBar1PanelsItem(1)Text = "该控件已与主机连接成功"
Case 5
StatusBar1PanelsItem(1)Text = "该控件正在向主机发送请求"
Case 6
StatusBar1PanelsItem(1)Text = "该控件发送请求已成功"
Case 7
StatusBar1PanelsItem(1)Text = "该控件正在接收主机的响应"
Case 8
StatusBar1PanelsItem(1)Text = "该控件已成功地接收到主机的响应"
Case 9
StatusBar1PanelsItem(1)Text = "该控件正在解除与主机的连接"
Case 10
StatusBar1PanelsItem(1)Text = "该控件已成功地与主机解除了连接"
Case 11
MsgBox "与主机通讯时出现了错误", vbInformation, "个人资料"
Case 12
Dim vtData As Variant
Dim bDone As Boolean
bDone = False
'取得第一个块。
vtData = Inet1GetChunk(1024, icString)
DoEvents
Do While Not bDone
strData = strData & vtData
'取得下一个块。
vtData = Inet1GetChunk(1024, icString)
DoEvents
If Len(vtData) = 0 Then
bDone = True
End If
Loop
StatusBar1PanelsItem(1)Text = "该请求已经完成,并且所有数据均已接收到"
Case Else
StatusBar1PanelsItem(1)Text = Inet1ResponseCode & ": " & Inet1ResponseInfo
End Select
End Sub
用FTP命令打开一个文本文件的具体方法如下:
DOS下或工具下都不能直接在服务器上打开文件,一定要下载下来才能打开的!GET命令用来获取文件。如果你想在默认目录使用原始文件名下载文件,你要输入GET <filename> <回车>
可以只输入GET,系统会提示要下载的文件名,然后提示存储到的新文件名(及目录)。 ftp> get readmetxt 200 PORT command successful 150 Opening BINARY mode data connection for readmetxt(1571 bytes) 226 Transfer complete 1571 bytes received in 346 seconds (045 Kbytes/sec)
上传 。可以使用SEND命令上传文件。当然服务器要允许上传文件才行。
以上就是关于如何访问ftp站点并获取资料全部的内容,包括:如何访问ftp站点并获取资料、怎样访问ftp服务器上的文件在地址栏应该输入些什么、ftp单个文件地址怎么获取等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)