1.读取文件到一个FileStream 2.设置ftp服务器访问信息,主要是ftp服务器地址,访问ftp服务器的用户名和密码,访问类型,等待时间等待。 3.在ftp服务器中创建一个空的文件 3.将源文件读取到byte()数组中 4.将byte()数组中存放的数据写入到另外一个Stream, 这个stream是我们刚在ftp服务器上创建的空文件 5.完成写入 ...
最简单的方法是用ftp批处理,代码如下open app.path & "\ftpcmd.ftp" for output as #1 '创建一个ftp命令文件print #1, "open " & "IP" '打开ftp服务器print #1, "user " & "用户名" print #1, "pass " & "密码"print #1, "lcd " & "本地文件路径" '指定本地文件所在目录print #1, "put ...
FTP.UserName = 用户名 FTP.Password = 密码 FTP.Connect FTP.LocalFile = 文件本地地址 FTP.RemoteFile = ftp上的地址 On Error Resume Next FTP.PutFile If Err <> 0 Then MsgBox "未能连接到远程服务器，请检测网络", vbExclamation, "注意"Exit Sub End If MsgBox "上传成功", , "成功！
原理是生成一个临时DOS批处理文件，利用DOS FTP命令完成上付，参考以下代码 dim FSO as object dim tempFileName as string tempFileName="C:\tempFTP.bat"set FSO=createoject("scripting.filesystemobject")With FSO.OpenTextFile(tempFileName,2,True).WriteLine "open 192.168.2.2".WriteLine "12...
用inet控件是可以实现啊。Inet1.URL = "ftp://用户名:密码@IP"Inet1.OpenURL Inet1.Execute "ftp://用户名:密码@IP", "put c:\a.txt a.txt" 'put后第一个参数是文件具体路径，后一个参数是上传到FTP后的文件名，可以与原来相同，也可以另外起名字。有不清楚的，可以qq:83159173 ...
华为云帮助中心为你分享云计算行业信息,包含产品介绍、用户指南、开发指南、最佳实践和常见问题等文档,方便快速查找定位问题与能力成长,并提供相关资料和解决方案。本页面关键词:vb上传文件到ftp服务器。
华为云帮助中心为你分享云计算行业信息,包含产品介绍、用户指南、开发指南、最佳实践和常见问题等文档,方便快速查找定位问题与能力成长,并提供相关资料和解决方案。本页面关键词:vb上传文件到ftp服务器。
可执行文件一般都是禁止的，你可以直接把扩展名改了，比如改成.doc这样。使用时下载下来再改回来 或者，你压缩后，再上传压缩文件。
'上传文件:Inet1.Execute "", "PUT d:\11.xls 11.xls"ri = Inet1.StillExecuting Do While ri ri = Inet1.StillExecuting DoEvents Loop End Sub Private Sub Form_Load()Inet1.Protocol = icFTP Inet1.RemoteHost = "192.168.1.1" '服务器地址 Inet1.RemotePort = 21 'FTP端口 Inet1...
文件上传步骤: 1.读取文件到一个FileStream 2.设置ftp服务器访问信息,主要是ftp服务器地址,访问ftp服务器的用户名和密码,访问类型,等待时间等待。 3.在ftp服务器中创建一个空的文件 3.将源文件读取到byte()数组中 4.将byte()数组中存放的数据写入到另外一个Stream, 这个stream是我们刚在ftp服务器上创建的空文...