(내가 전에 작업을 했어.)코드까지 오류없이 실행되어 "Microsoft에 오류 보고서 보내기"가 나는 Teklynx LabelView와 소프트웨어를 사용하여 라벨을 인쇄 할 몇 가지 vb.net 코드가
문제 그것은 Dev 컴퓨터에서 정상적으로 실행되지만 최종 사용자의 PC에서 실행할 때 "Microsoft에 오류보고 보내기"메시지와 함께 완전히 사라질 때까지 오류 메시지가 표시되지 않습니다.
이 문제를 어떻게 해결할 수 있습니까?
관련 코드 : 당신이 구축하고 .NET의 버전 클라이언트가 자신의 컴퓨터에이되는 .NET의 버전을
Shared Function PrintLabels(ByVal itemDescription As String, ByVal starting As String, ByVal ending As String, ByVal qty As Integer) As Boolean
'Create "Document" (Label) object
'Close all open lv.exe processes
Dim pProcess() As Process = System.Diagnostics.Process.GetProcessesByName("lv")
For Each p As Process In pProcess
p.Kill()
Next
Dim Lbl As Object
Lbl = CreateObject("Lblvw.Document")
Lbl.Open(labelFileName)
Dim barcodeVal As String
Dim labelText As String
Try
Dim infoArray As String()
infoArray = itemDescription.Split(New Char() {","c})
labelText = infoArray(1).ToString().Trim()
barcodeVal = infoArray(2).Trim() & starting & ending
'Load label in ReadOnly mode
Lbl.Open(labelFileName, True)
'Get field information
Dim Flds As Object
Flds = Lbl.LabelFields
Flds.Item("TEXT1").Value = labelText
Flds.Item("BARCODE1").Value = barcodeVal
Lbl.PrintLabel(qty)
Lbl = Nothing
barcodeVal = Nothing
labelText = Nothing
Return True
Catch ex As Exception
If printStatements Then
MsgBox("Error Message: " & ex.Message.ToString())
End If
Using writer As New StreamWriter(errorLog, True)
writer.AutoFlush = True
writer.WriteLine()
writer.WriteLine(DateTime.Now.ToString() & ": " & ex.Message)
End Using
Lbl = Nothing
barcodeVal = Nothing
labelText = Nothing
Return False
End Try
End Function
배포를 위해 어떤 노력을 했습니까? –
\ bin \ Release \ 폴더를 복사하고 exe를 실행했습니다. – MAW74656
GAC에 설치되어있는 3rdparty 구성 요소를 사용하고 있으므로 확인이 어려울 수 있습니다. 답장을 참조하십시오 + 컨트롤의 재배포 가능 항목을 배포했는지 확인하십시오 (Teklinx) –