【发布时间】:2016-08-15 08:26:37
【问题描述】:
我正在尝试在我的 MDI 应用程序中使用 BackgroundWorker 来处理将文件上传到 FTP 服务器并在进度条上显示进度的过程。
当我尝试在一个单独的概念验证应用程序上使用一个简单的窗口和一个按钮时,它工作正常。但是当我尝试在我的真实应用程序中执行此操作时 - doWork 子程序没有运行。取而代之的是,应用程序立即运行 RunWorkerCompleted 子程序并向我显示“上传完成”,而无需执行实际工作。
MDI 是否有什么东西会阻止 BackgroundWorker 以与常规窗口应用程序相同的方式运行?
提前感谢您的帮助
代码:
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
bWorker.RunWorkerAsync()
End Sub
Private Sub bWorker_DoWork(sender As Object, e As System.ComponentModel.DoWorkEventArgs) Handles bWorker.DoWork
Dim source = Application.StartupPath + "\Db\test.mdb"
Dim NameToUpload As String = Path.GetFileName(source)
NameToUpload = NameToUpload.Replace(".", DateTime.Now.ToShortTimeString() + ".")
Dim request As FtpWebRequest = DirectCast(WebRequest.Create(Host + "/" + txtLogin.Text + "/" + NameToUpload), FtpWebRequest)
request.Method = WebRequestMethods.Ftp.UploadFile
request.Credentials = New NetworkCredential(txtLogin.Text, txtPassword.Text)
Dim FileStream() As Byte = File.ReadAllBytes(source)
Dim requestStream As System.IO.Stream = request.GetRequestStream()
For offset As Integer = 0 To FileStream.Length Step 1024
bWorker.ReportProgress(CType(offset * ProgressBar1.Maximum / FileStream.Length, Integer))
Dim chSize As Integer = FileStream.Length - offset
If chSize > 1024 Then chSize = 1024
requestStream.Write(FileStream, offset, chSize)
Next
requestStream.Close()
requestStream.Dispose()
End Sub
Private Sub bWorker_ProgressChanged(sender As Object, e As System.ComponentModel.ProgressChangedEventArgs)
ProgressBar1.Value = e.ProgressPercentage
End Sub
Private Sub bWorker_RunWorkerCompleted(sender As Object, e As System.ComponentModel.RunWorkerCompletedEventArgs)
MsgBox("Upload complete")
End Sub
【问题讨论】:
-
所以如果你在
bWorker_DoWork事件上设置断点它不会被命中?另一方面,您不应该尝试从后台工作人员访问 UI 线程,将这些值传递给 do work 事件。这可能不是问题,因为您没有更新 UI……但它仍然是一个很好的做法,因为后台工作线程与 UI 不同。
标签: .net vb.net backgroundworker mdi