Я создал службу Windows для загрузки файлов с клиента в общую папку на сервере с общим разрешением, с которым все имеют полный контроль над ним с помощью службы Microsoft BITS, эта служба работает с локальная системная учетная запись. Проблема в том, что задания BITS всегда отменяются, и я не знаю, почему. Пожалуйста, любая помощь будет оценена по достоинству.Работы BITS отменены без уважительной причины
Я использую этот код
Try
Using BITSManager = New System.Net.BITS.Manager
For Each sItem In arrlDriversFilesUploadList
Using job = New System.Net.BITS.Job("UploadJob", Net.BITS.JobType.Upload)
Dim sRemoteFileName As String = String.Format("{0}\{1}", "\\RemoteServer\SharedFolder", "File.txt")
Dim sLocalFileName As String = String.Format("{0}\{1}", "C:\LocalLocation", "File.txt")
job.Files.Add(sRemoteFileName, sLocalFileName)
BITSManager.Jobs.Add(job)
job.NoProgressTimeout = 300 '5 Minutes
job.Resume()
Dim JobComplete As Boolean = False
Do Until JobComplete
System.Threading.Thread.Sleep(3000)
If job.State = System.Net.BITS.JobState.Transferred Then
evntlg.WriteEntry("Job done")
JobComplete = True
End If
If job.State = System.Net.BITS.JobState.Acknowledged Then
evntlg.WriteEntry("Job done")
JobComplete = True
End If
If job.State = System.Net.BITS.JobState.Error Then
evntlg.WriteEntry("Job has error")
JobComplete = True
End If
If job.State = System.Net.BITS.JobState.Cancelled Then
evntlg.WriteEntry("Job cancelled")
JobComplete = True
End If
Loop
End Using
Next
End Using
Catch ex As Exception
evntlg.WriteEntry(ex.Message)
End Try
Посмотрите на другой конец провода, сервер, возможно, отменил задание. –
Но как я могу быть в этом уверен? –