<Microsoft.SqlServer.Server.SqlProcedure()> _
    Public Shared Function CLR_ExportTableToHTML(ByVal TableName As SqlString, ByVal FilePath As SqlString, ByVal IncludeHeaders As SqlInt32, ByVal FileName As SqlString, ByVal Title As SqlString, ByVal Summary As SqlString, ByVal HTMLStyle As SqlInt32) As IEnumerable
        Dim str As String = "SELECT * FROM {0}"
        Dim _sFilePath As String = FormattedPath(FilePath.ToString.Trim)
        Dim _sFileName As String = FormattedFileName(FileName.ToString.Trim)
        Dim _sFileNameWithPath As String = _sFilePath & _sFileName

        Dim MyConnection As New SqlConnection("context connection=true")

        str = String.Format(str, TableName)
        Try

            str = String.Format(str, TableName)

            MyConnection.Open()

            Dim myCommand As New SqlCommand(str, MyConnection)
            Dim myDataReader As SqlDataReader
            myDataReader = myCommand.ExecuteReader()
            Dim MyDataTable As New DataTable(TableName.ToString)
            MyDataTable.Load(myDataReader)

            'NOW we can, in theory, do something with the DataTable.
            str = FormatDataTableAsHTML(MyDataTable, GetInteger(IncludeHeaders.Value), GetString(Title), GetString(Summary), GetInteger(HTMLStyle.Value))
            SaveTextToFile(_sFileNameWithPath, str)

            FilePath = "Created: " & _sFileNameWithPath
            Dim _sResults(0) As SqlChars
            _sResults(0) = New SqlChars(New SqlString("Created: " & _sFileNameWithPath))
            Return _sResults

        Catch sqlex As SqlException
            Throw New Exception("FileName: " & _sFileNameWithPath, sqlex)
        Catch ex As Exception
            Throw New Exception("FileName: " & _sFileNameWithPath, ex)
        End Try

    End Function