diff --git a/UID/usrctlProcedures.vb b/UID/usrctlProcedures.vb
index 2162c00..5412c90 100644
--- a/UID/usrctlProcedures.vb
+++ b/UID/usrctlProcedures.vb
@@ -585,7 +585,7 @@ Public Class usrctlProcedures
             For Each file As String In System.IO.Directory.GetFiles("C:\Users\DEVELOPER1\Desktop\Verpfl\Fahrer_NCTS_Verpflichtungserklärungen\") ' Ermittelt alle Dateien des Ordners 
                 Try
 
-                    Dim pdf As iTextSharp.text.pdf.PdfReader = New iTextSharp.text.pdf.PdfReader(file)
+                    Dim pdf As itextsharp.text.pdf.PdfReader = New itextsharp.text.pdf.PdfReader(file)
                     Dim stamper = New PdfStamper(pdf, New FileStream("C:\Users\DEVELOPER1\Desktop\Verpfl\tmp.pdf", FileMode.Create))
                     Dim f = stamper.AcroFields
 
@@ -647,7 +647,7 @@ Public Class usrctlProcedures
         Return file
     End Function
     Sub pdf2()
-        Dim pdf As iTextSharp.text.pdf.PdfReader = New iTextSharp.text.pdf.PdfReader("C:\Users\DEVELOPER1\Desktop\Verpfl\test.pdf")
+        Dim pdf As itextsharp.text.pdf.PdfReader = New itextsharp.text.pdf.PdfReader("C:\Users\DEVELOPER1\Desktop\Verpfl\test.pdf")
 
 
         Using fw As New FileStream("C:\Users\DEVELOPER1\Desktop\Verpfl\tmp.pdf", FileMode.Open)
@@ -3716,7 +3716,7 @@ Public Class usrctlProcedures
 
                                             'MsgBox(currentRow(2))
                                         End If
-                                            End If
+                                    End If
                                 End If
 
                                 'For Each currentField In currentRow