• vb.net winform Ftp上传。。。。方法很多,我用的一种。。。。。


    代码
     1 Imports System
     2 Imports System.IO
     3 Imports System.Net
     4 Imports System.Text
     5 Public Class ftpUpload
     6 
     7     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
     8 
     9         Dim request As FtpWebRequest = DirectCast(WebRequest.Create("http://www.cnblogs.com/Believeme/admin/ftp://76.73.62.252/123.xml"), FtpWebRequest)
    10         request.Method = WebRequestMethods.Ftp.UploadFile
    11 
    12 
    13         request.Credentials = New NetworkCredential("3339""libaoxin"'用户名,密码
    14 
    15         Dim sourceStream As New StreamReader("D:\123.xml"'要上传的文件
    16         Dim fileContents As Byte() = Encoding.UTF8.GetBytes(sourceStream.ReadToEnd())
    17         sourceStream.Close()
    18         request.ContentLength = fileContents.Length
    19         Dim requestStream As Stream = request.GetRequestStream()
    20         requestStream.Write(fileContents, 0, fileContents.Length)
    21         requestStream.Close()
    22         Dim response As FtpWebResponse = DirectCast(request.GetResponse(), FtpWebResponse)
    23         response.Close()
    24     End Sub
    25 End Class
    26 
    27 
    28  附:http://msdn.microsoft.com/zh-cn/library/ms229715(VS.80).aspx
    29 


    提示

           如果您觉得本篇文章对您有用请评论。

  • 相关阅读:
    centos 查看版本(转)
    防火墙内设置FileZilla Server注意事项
    mycat读写分离与主从切换
    用mycat做读写分离:基于 MySQL主从复制
    mysql处理海量数据时的一些优化查询速度方法
    CentOS下LVS DR模式负载均衡配置详解
    Linux清除arp缓存
    扫描局域网内所有主机和MAC地址的Shell脚本
    Windows+Python 3.6环境下安装PyQt4
    Python 爬虫-豆瓣读书
  • 原文地址:https://www.cnblogs.com/Believeme/p/1567954.html
Copyright © 2020-2023  润新知