Correzione stampa indice di errore

ZebraPrinter.vb

@@ -73,6 +73,7 @@ Class ZebraPrinter
          Dim sMessage As StreamWriter = File.CreateText(m_FileError)
          sMessage.WriteLine("Error=" & sIndexError)
          sMessage.Close()
+         m_sError = sIndexError
       Catch ex As Exception
          EmitLog("Impossible to create file Error.txt: " & ex.Message)
       End Try
@@ -217,6 +218,9 @@ Class ZebraPrinter
 
       ' metto il programmma in attesa
       Threading.Thread.Sleep(1000)
+      ' se sono arrivato fino a qui provo a impostare che non ci sono stati errori
+      ' se ci fossero degli errori questo comando viene ignorato
+      EmitError("0")
 
       ' elimino il file dei dati
       Try