vb ftp文件到服务器,VB .Net 利用FTP.exe上传文件至FTP服务器

Public Class Form1

Private Sub CmdTrans_Click(ByVal sender As System.Object,ByVal e As System.EventArgs) Handles CmdTrans.Click

Dim psi As New System.Diagnostics.ProcessStartInfo

Dim ftpFileName As String

psi.FileName = "ftp.exe"

psi.RedirectStandardInput = False

psi.RedirectStandardOutput = True

psi.UseShellExecute = False

ftpFileName = "E:/ftp.txt"

psi.Arguments = "-s:" & ftpFileName

Dim proc As Process

proc = Process.Start(psi)

'Wait process

proc.WaitForExit()

Console.WriteLine(proc.StandardOutput)

Console.ReadLine()

End Sub

End Class

open 192.168.1.110

user dumeifang dumeifang

put E:/ip.html

quit

控制台中的输出:

ftp> open 192.168.1.110

Connected to 192.168.1.110.

220 Serv-U FTP Server v8.2 ready...

User (192.168.1.110:(none)):

530 Invalid user name.

Login Failed.

ftp> user dumeifang dumeifang

331 User name okay,need password.

230 User logged in,proceed.

ftp> put E:/ip.html

200 PORT Command successful.

150 opening ASCII mode data connection for ip.html.

226 Transfer complete. 1,672 bytes transferred. 1.63 KB/sec.

ftp: 发送 1672 字节,用时 0.00Seconds 1672000.00Kbytes/sec.

ftp> quit

221 Goodbye,closing session.

ftp -s:filename是把一些ftp的命令写入filename中,FTP自动运行里面的内容

总结

如果觉得编程之家网站内容还不错,欢迎将编程之家网站推荐给程序员好友。

本图文内容来源于网友网络收集整理提供,作为学习参考使用,版权属于原作者。

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值