HTML (aus Filesystem) to PDF mit itextsharp in vb.net

Public Sub AttachmentHTMLToPDF(ByVal strAttHTMLPfadMDateiname As String, ByVal AttFilename As String)

'Quelle:  
'http://www.mindfiresolutions.com/HTML-to-PDF-conversion-using-iTextsharp-1088.php  

' Read html file to a string  
  Using sr As StreamReader = New StreamReader(strAttHTMLPfadMDateiname)
    Dim line As String = sr.ReadToEnd

    ' Code to convert to pdf  
    Using doc As New iTextSharp.text.Document(iTextSharp.text.PageSize.A4, _
                                                          singLinkerRand, singRechterRand, _
                                                          singObererRand, singUntererRand)
      Using fs As New FileStream(AttFilename, FileMode.Create)
        PdfWriter.GetInstance(doc, fs)
          Using stringReader As New StringReader(line)

            Try

              Dim parsedList As System.Collections.Generic.List(Of IElement) = _
                               html.simpleparser.HTMLWorker.ParseToList(stringReader, Nothing)

              doc.Open()
              ' parse each html object and add it to the pdf document  
              For Each item As Object In parsedList
                doc.Add(DirectCast(item, IElement))
              Next
              doc.Close()

            Catch ex As Exception

              MsgBox(ex.Message)
              doc.Close()

            End Try

          End Using
        End Using
      End Using
    End Using
End Sub

Dim parsedList As System.Collections.Generic.List(Of IElement) = _
                               html.simpleparser.HTMLWorker.ParseToList(stringReader, Nothing)