ftp上传文件(百度网盘ftp上传文件)

可以使用重定向“<”来实现 不过需要写好FTP脚本。FTP命令可以自己百度下试试。基本上是这样ftp 连接的服务器　端口输入用户名密码bin（如果有下层文件夹需要先CD　文件夹）get 文件名　　（这是下载单个文件）mget 文件名1 文件名2等　支持通配符quit 退出扩展什么是FTP呢？FTP 是 TCP/IP 协议组中的协议之一，是英文File Transfer Protocol的缩写。该协议是Internet文件传送的基础，它由一系列规格说明文档组成，目标是提高文件的共享性，提供非直接使用远程计算机，使存储介质对用户透明和可靠高效地传送数据。简单的说，FTP就是完成两台计算机之间的拷贝，从远程计算机拷贝文件至自己的计算机上，称之为“下载（download）”文件。若将文件从自己计算机中拷贝至远程计算机上，则称之为“上载（upload）”文件。在TCP/IP协议中，FTP标准命令TCP端口号为21，Port方式数据端口为20。FTP协议的任务是从一台计算机将文件传送到另一台计算机，它与这两台计算机所处的位置、联接的方式、甚至是是否使用相同的操作系统无关。假设两台计算机通过ftp协议对话，并且能访问Internet， 你可以用ftp命令来传输文件。每种操作系统使用上有某一些细微差别，但是每种协议基本的命令结构是相同的。FTP的传输有两种方式：ASCII传输模式和二进制数据传输模式。1．ASCII传输方式：假定用户正在拷贝的文件包含的简单ASCII码文本，如果在远程机器上运行的不是UNIX，当文件传输时ftp通常会自动地调整文件的内容以便于把文件解释成另外那台计算机存储文本文件的格式。但是常常有这样的情况，用户正在传输的文件包含的不是文本文件，它们可能是程序，数据库，字处理文件或者压缩文件（尽管字处理文件包含的大部分是文本，其中也包含有指示页尺寸，字库等信息的非打印字符）。在拷贝任何非文本文件之前，用binary 命令告诉ftp逐字拷贝，不要对这些文件进行处理，这也是下面要讲的二进制传输。2．二进制传输模式：在二进制传输中，保存文件的位序，以便原始和拷贝的是逐位一一对应的。即使目的地机器上包含位序列的文件是没意义的。例如，macintosh以二进制方式传送可执行文件到Windows系统，在对方系统上，此文件不能执行。如果你在ASCII方式下传输二进制文件，即使不需要也仍会转译。这会使传输稍微变慢 ，也会损坏数据，使文件变得不能用。（在大多数计算机上，ASCII方式一般假设每一字符的第一有效位无意义，因为ASCII字符组合不使用它。如果你传输二进制文件，所有的位都是重要的。）如果你知道这两台机器是同样的，则二进制方式对文本文件和数据文件都是有效的。5. FTP的工作方式FTP支持两种模式，一种方式叫做Standard (也就是 PORT方式，主动方式)，一种是 Passive (也就是PASV，被动方式)。 Standard模式 FTP的客户端发送 PORT 命令到FTP服务器。Passive模式FTP的客户端发送 PASV命令到 FTP Server。下面介绍一个这两种方式的工作原理：Port模式FTP 客户端首先和FTP服务器的TCP 21端口建立连接，通过这个通道发送命令，客户端需要接收数据的时候在这个通道上发送PORT命令。 PORT命令包含了客户端用什么端口接收数据。在传送数据的时候，服务器端通过自己的TCP 20端口连接至客户端的指定端口发送数据。 FTP server必须和客户端建立一个新的连接用来传送数据。Passive模式在建立控制通道的时候和Standard模式类似，但建立连接后发送的不是Port命令，而是Pasv命令。FTP服务器收到Pasv命令后，随机打开一个高端端口（端口号大于1024）并且通知客户端在这个端口上传送数据的请求，客户端连接FTP服务器此端口，然后FTP服务器将通过这个端口进行数据的传送，这个时候FTP server不再需要建立一个新的和客户端之间的连接。 很多防火墙在设置的时候都是不允许接受外部发起的连接的，所以许多位于防火墙后或内网的FTP服务器不支持PASV模式，因为客户端无法穿过防火墙打开FTP服务器的高端端口；而许多内网的客户端不能用PORT模式登陆FTP服务器，因为从服务器的TCP 20无法和内部网络的客户端建立一个新的连接，造成无法工作。

这个情况你需要先使用FTP工具连接到你需要上传的服务器，然后连接成功之后点击里面的目录，选择你需要上传的目录，然后把文件拖拽进去，等待上传完成就可以了。

1、下载软件FileZilla（用的比较多的一款），2、下载之后，打开软件就能看到下面第一张图的界面了，然后点击文件，选择站点管理器，3、然后弹出如下的界面：主机（你的主机名），端口（写21），协议（选择FTP-文本传输协议），加密（选择只使用普通），登录类型（正常），用户名（写你域名管理站的账号），密码（账号对应的密码），都填完之后，点击连接，4、点击连接之后看主页面，如下图，如果出现“成功”字样，而且右下角的框框里，也有ftp中的文件，说明连接成功，接下来就可以放入文件了，5、左边红色框中，是自己电脑的目录，右边蓝色框中，是ftp（也就是你网站）里的目录，6、最后，选中要上传的文件，右键点击上传即可，完毕。
通常我都是用IIS7服务器管理工具来作为ftp的客户端，这样上传软件也很方便，效率也高。同时它还具有批量管理Winduws、Linux系列系统和VNC，能方便、快速、直接的提高需要大量服务器工作者的使用需求。能适合不同从业者的需求。使用的方法如下：第一步：下载服务器管理工具；第二步：打开软件，点击“上传下载”;第三步：点击“添加”，在弹出的窗口中输入服务器的IP和端口、账号、密码，再点击“添加”;第四步：勾选服务器，然后点击“打开”;第五步：打开后就能看到ftp使用界面，然后就能选择文件进行上传了。
先假设有一FTP服务器，FTP服务器：qint.ithot.net，用户名：username 密码：user1234。在本地电脑D：盘创建一个文件夹"qint"。将要上传的文件复制到d:qint里。通过FTP命令将文件从本地上传到服务器的步骤如下： 1.“开始”-“运行”-输入“FTP”2.open qint.ithot.net/*这一步可以与第一步合并，在“运行”里直接输入"ftp qint.ithot.net"。如果你的FTP服务器不是用的21默认端口，假如端口是2121，那么此步的命令应在后面空格加2121，即“open qint.ithot.net 2121”*/3.username/*提示你输入用户名*/4.user1234/*提示你输入密码，密码不回显，打完密码后回车即可。如果你的密码输入错误，将不会提示你重新输入，这时你要键入“user”命令，将会出现第三步，你可以重新输入用户名和密码。*/5.dir/*你成功登陆后就可以用dir查看命令查看FTP服务器中的文件及目录，用ls命令只可以查看文件。*/6.mkdir qint/*在FTP服务器上根目录下建立qint目录。*/7.cd qint/*进入目录qint,用“cd 你的目录名”可以进入当前目录的下一级目录，这跟DOS一样。*/8.bin/*采用二进制传输。如果你要上传下载，这一步很重要，不先执行这个命令，上传下载会很慢。*/9.lcd d:qint/*定位本地默认文件夹，在前面我事先在D：盘创建的。*/10.!dir/*查看本地文件夹中的文件及目录*/11.put i001.jpg /*将当前目录(d:qint)中的文件i001.jpg上传到FTP服务器默认目录。可以用"mput *.*"将所有文件上传到FTP服务器上。*/
1.进入官网,选择绿色版下载 2.待安装完毕后,双击打开,便发现已经进入软件界面(不需安装).其中主界面左侧是本地文件,右侧是服务器端文件.由于没有连接服务器,因此是一片空白3.连接服务器,通常FTP信息在你的服务器控制板中都有4.记下FTP用户名,FTP密码和FTP上传地址,输入到FTP软件中,如果没有特别说明,端口为默认的21.点击"连接"5.成功连接后,右侧显示出服务器文件信息6.双击打开wwwroot文件夹(通常而言,并不绝对,有的服务器可以直接把程序传到根目录下就可忽略这一步)7.服务端打开要上传文件的文件夹后,在左侧选取储存在本地的网站程序,选中>右键>上传.8.然后可以在左下方区域查看文件上传进度 9.稍后,文件上传完毕,左侧的服务器端已经可以看到自己上传的文件.至此,我们成功使用FTP功能上传了自己网站的程序!
FTP新手入门及构建个人 FTP服务器从O开始FTP简介FTP的全称是FileTransferProtocol(文件传输协议)。顾名思义，就是专门用来传输文件的协议。而FTP服务器，则是在互联网上提供存储空间的计算机，它们依照FTP协议提供服务。当它们运行时，用户就可以连接到服务器上下载文件，也可以将自己的文件上传到FTP服务器中。因此，FTP的存在，大大方便了网友之间远程交换文件资料的需要，充分体现了互联网资源共享的精神。现在许多朋友都已经用上了宽带网，而且硬盘也有足够的空间，完全可以通过软件手段把自己的电脑变为一台FTP服务器，和网络中的朋友们一起分享大家各自收藏的好东东!架设FTP服务器，其实并没有技术难度，只需用Serv-U这个软件就可轻松搞定了。Serv-U支持所有版本的Windows操作系统，可以设定多个FTP服务器，可以限定登录用户的权限、登录目录及服务器空间大小，功能非常完善。以下笔者就以Serv-U汉化版为例，给大家讲讲架设个人FTP的具体步骤。首先下载安装Serv-U，运行，将出现“设置向导”窗口，我们就来跟随着这个向导的指引，一步步进行操作。1.设置Serv-U的IP地址与域名一路单击“下一步”跳过系统提示信息，来到“您的IP地址”窗口，这里要求输入本机的IP地址。如果你的电脑有固定的IP地址，那就直接输入;如果你只有动态IP(例如拨号用户)，那该处请留空，Serv-U在运行时会自动确定你的IP地址。下一步，进行“域名”设定。这个域名只是用来标识该FTP域，没有特殊的含义，比如笔者输入“ftp.oray.net”。接下来的“系统服务”选项必须选“是”，这样当你的电脑一启动，服务器也会跟着开始运行。2.设置匿名登录匿名访问就是允许用户以Anonymous为用户名，无需特定密码即可连接服务器并拷贝文件。如果你不想让陌生人随意进入你的FTP服务器，或想成立VIP会员区，就应该在“匿名账号”窗口中选“否”，这样就只有经过你许可的用户才能登录该FTP。鉴于匿名登录尚有一定的实用需求，笔者在此选“是”。之后就要为匿名账户指定FTP上传或下载的主目录，这是匿名用户登录到你的FTP服务器后看到的目录。设定后，向导还会继续询问你是否将匿名用户锁定于此目录中，从安全的角度考虑，建议选“是”。这样匿名登录的用户将只能访问你指定的主目录及以下的各级子目录，而不能访问上级目录，便于保证硬盘上其他文件的安全。3.创建新账户除了匿名用户，我们一般还需要建立有密码的专用账号，也就是说可以让指定用户以专门的账号和密码访问你的服务器，这样做适用于实行会员制下载或只让好友访问。在“命名的账号”窗口中将“创建命名的账号吗”选为“是”，进入“账号名称”设置，填入你制定的账号名称，而后在“账号密码”窗口输入该账号的密码。单击“下一步”，会要求你指定FTP主目录，并询问是否将用户锁定于主目录中，选“是”，作用与匿名账户设定基本相同，不再赘述。紧接着要设置该账户的远程管理员权限，分为“无权限”、“组管理员”、“域管理员”、“只读管理员”和“系统管理员”五种选项，每项的权限各不相同，可根据具体情况进行选择。至此，我们已拥有了一个域--ftp.oray.net及两个用户--Anonymous和oray。点击“完成”退出向导，稍等片刻Serv-U软件主界面将自动弹出，我们还要在此进行一些管理员设置。4.管理员设置每个Serv-U引擎都能用来运行多个虚拟的FTP服务器，而虚拟的FTP服务器就称为“域”。对FTP服务器来说，建立多个域是非常有用的，每个域都有各自的用户、组和相关的设置。以下笔者就简要说说管理器界面上必要的各项设置。★首先点击窗体左方的“本地服务器”，勾选右边的“自动开始(系统服务)”。★选择左方的“域→活动”，这里记载了该域下所有用户的活动情况，是非常重要的监控数据。★“域→组”:在此可自建一些用户组，把各类用户归到相应的组中，便于管理。★“域→用户”:这里有我们刚建立的两个账号，其中的细节设置十分重要，具体如下。账号:如果有用户违反FTP的规定，你可以点击此处的“禁用账号”，让该用户在一段时间内被禁止登录。另外此处的“锁定用户于主目录”一定要勾选，否则你硬盘的绝对地址将暴露。常规:根据自身的实际需要，在此设置最大的下载和上传速度、登录到本服务器的最大用户数、同一IP的登录线程数等。IP访问:你可以在此拒绝某个讨厌的IP访问你的FTP服务器，只要在“编辑规则”处填上某个IP地址，以后该IP的访问将会全部被拦下。配额:勾选“启用磁盘配额”，在此为每位FTP用户设置硬盘空间。点击“计算当前”，可知当前的所有已用空间大小，在“最大”一栏中设定最大的空间值。最后，请在有改动内容的标签卡上点击右键，选择“应用”，如此才能使设置生效!好了!现在，一个简单的个人FTP服务器就已经完整地呈现在你面前了。不过这时还要测试一下能否成功地下载和上传。下载和上传要使用FTP服务器下载和上传，就要用到FTP的客户端软件。常用的FTP客户端软件有CuteFTP、FlashFXP、FTPExplorer等等。对于它们的具体使用，这里就不细讲了。基本上只要在这些软件的“主机名”处中填入你庙宇的FTP服务器IP地址，而后依次填入用户名，密码和端口(一般为21)，点击连接，只要能看到你设定的主目录并成功实现文件的下载和上传，就说明这个用Serv-U建立起来的FTP服务器能正常使用了! !

不知道你的winsock 是udp还是tcpip协议这里给你一个我写的实例 我是用的udp 这个发送了一段数据不一定接收就正确 所以我做了校验'以下是发送文件的Option ExplicitDim GetFileNum As Integer, LenFile As Long, SendByte() As Byte '发送的包Private Sub Command1_Click()On Error Resume NextCommand1.Enabled = FalseGetFileNum = FreeFile '取得未使用的文件号LenFile = FileLen(Text1.Text) '获得需传送的文件的长度If Text2.Text = "" Or Right(Left(Text2.Text, 2), 1) <> ":" Then Text2.Text = Text1.TextWinsock0.SendData "#SEND STA#" & LenFile & "//" & Text2.TextWt 0.5Open Text1.Text For Binary As #GetFileNum '打开需传送的文件Call TCPSendFile(Winsock0, GetFileNum, SplitFile) '传送文件Me.Caption = NowTi.Enabled = TrueEnd SubPrivate Sub Command2_Click()Unload MeEnd SubPrivate Sub Form_Load()Dim A As StringOn Error Resume NextCommand2.Top = -2000Winsock0.RemoteHost = IPX '服务器ipWinsock0.RemotePort = FilePortEnd SubPrivate Function SplitFile() As Long '拆包'为了清晰,下面分别用两个子过程来完成计算这次还可以传多少个字节的数据和传送数据On Error Resume NextDim GetCount As LongIf LenFile >= 4000 Then '计算出这次可发送的字节数GetCount = 4000LenFile = LenFile - GetCountElseGetCount = LenFileLenFile = LenFile - GetCountEnd IfSplitFile = GetCountEnd FunctionPrivate Sub TCPSendFile(objWinSock As Winsock, FileNumber As Integer, SendLen As Long)On Error Resume NextDim FileByte() As Byte, I As Long, j As Long, Temp As String * 4ReDim SendByte(0)ReDim FileByte(SendLen - 1)Temp = SendLen + 7SendByte = Temp '把长度负值给包头Get #FileNumber, , FileByte '读取文件ReDim Preserve SendByte(SendLen + 7) '把包头+到文件头For I = 0 To UBound(FileByte)SendByte(I + 7) = FileByte(I)'DoEventsNextWinsock0.SendData SendByteEnd SubPrivate Sub Form_Unload(Cancel As Integer)On Error Resume NextWinsock0.CloseErr.ClearEnd SubPrivate Sub TEnd_Timer()On Error Resume NextWinsock0.SendData "#END#"Err.ClearEnd SubPrivate Sub Ti_Timer()On Error Resume NextWinsock0.SendData "#ERR#"End SubPrivate Sub Winsock0_DataArrival(ByVal bytesTotal As Long)On Error Resume NextDim S As StringWinsock0.GetData SSelect Case SCase "ok" '成功继续发送If LenFile = 0 Then '发送完成If S <> "#SEND END#" Then Winsock0.SendData "#SEND END#"Me.Caption = "文件上传成功!"Command1.Enabled = TrueTi.Enabled = FalseTEnd.Enabled = TrueExit SubElseMe.Caption = "文件上传完成:[" & Left((FileLen(Text1.Text) - LenFile) / FileLen(Text1.Text) * 100, 4) & "%]"End IfCall TCPSendFile(Winsock0, GetFileNum, SplitFile)Case "#END#"TEnd.Enabled = FalseFMain.TiF.Enabled = TrueCase "no" '不成功重发上一个包Winsock0.SendData SendByteEnd SelectEnd Sub'以下是接收文件的Option ExplicitDim FOK As Boolean, Fs As Long, FileNumber As Integer, LenFile As Long  '文件的长度Private Sub Command1_Click()Unload MeEnd SubPrivate Sub Command2_Click()On Error Resume NextDim A As StringMe.Caption = "开始下载"If Dir(Text2.Text) <> "" And ChV.Value = 0 ThenIf MsgBox("文件已经存在,覆盖吗?", vbCritical + vbYesNo) = vbYes Then Kill Text2.Text Else Exit SubElseKill Text2.TextEnd IfIf Text2.Text = "" Then Text2.Text = Text1.Text'Command2.Enabled = FalseIf Ch.Value = 0 Then A = "#DOW#" Else A = "#DOV#"FMain.Wsk.SendData A & Text1.TextWt 1FMain.Wsk.SendData "#DOE#" & Text2.TextEnd SubPrivate Sub Form_Load()Dim A As String'FMain.Ts.Enabled = TrueOn Error Resume NextIf FMain.Cb.Text = "本地组" Or FMain.Cb.Text = "全部组" ThenMe.Caption = "请重选下载用户[“组”不能正确下载]"ElseCommand1.Top = -2000Winsock0.LocalPort = FilePortWinsock0.BindEnd IfEnd SubPrivate Sub Form_Unload(Cancel As Integer)On Error Resume NextWinsock0.CloseErr.ClearEnd SubPrivate Sub La_Click()CDL.FileName = ""CDL.ShowOpenText2.Text = CDL.FileNameEnd SubPrivate Sub Winsock0_DataArrival(ByVal bytesTotal As Long)On Error Resume NextDim FileByte() As Byte, A As String, MendByte() As Byte, I As Long, J As Long, Temp As String, W As StringWinsock0.GetData FileByte, vbArray + vbByte '接收类型为:字节数组J = UBound(FileByte) '获得包长For I = 0 To 7 Step 2 '合并包头Temp = Temp & Chr(FileByte(I))NextFor I = 0 To 9 '文件发送结束标记A = A & Chr(FileByte(I))NextIf A = "#ERR#" Then Winsock0.SendData "no"If A = "#END#" ThenFor I = 0 To Len(FMain.TIn.Text)If I < 100 ThenW = Left(Right(FMain.TIn.Text, I), 1)If W = "!" ThenW = Left(Right(FMain.TIn.Text, I + 4), 5)Exit ForEnd IfElseExit ForEnd IfNext IIf W <> "下载完成!" ThenFOK = FalseMe.Caption = "下载完成![" & Text2.Text & "]"FMain.TIn.Text = FMain.TIn.Text & "[" & Now & "]" & "下载完成!(" & Fs & "<=" & LenFile & ")" & vbCrLfCommand2.Enabled = TrueEnd IfElseIf Val(Temp) = J Then '比较长度看丢包没有ReDim MendByte(J - 8)For I = 0 To J - 8 '提出包头MendByte(I) = FileByte(I + 7)NextFs = Fs + UBound(FileByte) - 7Put #FileNumber, , MendByte '写文件Winsock0.SendData "ok" '发送继续发送的请求Me.Caption = "文件下载完成:[" & Left(Fs / LenFile * 100, 4) & "%]"ElseIf Left(A, 10) = "#SEND STA#" ThenA = ""For I = 10 To UBound(FileByte) '文件发送结束标记A = A & Chr(FileByte(I))NextLenFile = Val(Left(A, InStr(A, "//") - 1))For I = 0 To Len(Text2.Text)A = Left(Right(Text2.Text, I), 1)If A = "" Then Exit ForNextIf Dir(Left(Text2.Text, Len(Text2.Text) - I + 1), vbDirectory) = "" Then MkDir Left(Text2.Text, Len(Text2.Text) - I + 1)'"#SEND STA#" & FileLen(Text1.Text) & "//" & Text2.TextFileNumber = FreeFile '取得未使用的文件号Fs = 0Open Text2.Text For Binary As #FileNumber '打开文件ElseIf A <> "#SEND END#" ThenWinsock0.SendData "no" '出现丢包，请求重发ElseWinsock0.SendData "#END#" '发送继续发送的请求Close #FileNumberResetIf FOK = False ThenFOK = TrueMe.Caption = "下载完成![" & Text2.Text & "]"FMain.TIn.Text = FMain.TIn.Text & "[" & Now & "]" & "下载完成!(" & Fs & "<=" & LenFile & ")" & vbCrLfCommand2.Enabled = TrueElseFOK = FalseEnd IfEnd IfEnd IfEnd IfEnd IfEnd Sub

1、你先在网上下载一个FTP工具，如果没有 请下载附件； 2、打开FTP工具，点击右上边的快速连接:2、点击后会出现快速连接界面，再填入相应的FTP地址（可以是服务器的IP地址或域名）与登录名与密码，点击连接即可 3、先选择要上传的文件或文件夹所在的位置，在左边显示后直接将要上传的文件或文件夹拖到右边（可同时多选择）