vb.net2019-上传文件

最新推荐文章于 2021-08-06 05:46:26 发布

「已注销」

最新推荐文章于 2021-08-06 05:46:26 发布

阅读量1k

点赞数

文章标签： vb.net

本文链接：https://blog.csdn.net/AI_LX/article/details/88965671

版权

Public Class Form1
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        OpenFileDialog1.Filter = "ALL Files(*.*)|*.*"
        OpenFileDialog1.ShowDialog() '打开文件选择框
        Dim fn As String = OpenFileDialog1.FileName '得到选择的文件

        My.Computer.Network.UploadFile(
          fn,
          "http://www.cohowinery.com/upload.aspx", "", "", True, 500)
    End Sub
End Class