0

Access データベースに OLE オブジェクト "Microsoft Word 97 - 2003" が含まれています。これは、OLE オブジェクトを .doc ファイルに書き込んで WebBrowser コントロールに表示しようとする私の試みです。

Private Sub LoadBlob (objDataTable As DataTable)

    Dim WordBlob() As Byte = Nothing
    Dim TrimWordBlob() As Byte = Nothing
    Dim FileName As String
    Dim objStream As Stream

    Try
        If objDataTable(0).Item("DescriptionWord") IsNot DBNull.Value Then
            WordBlob = CType(objDataTable(0).Item("DescriptionWord"), Byte())
        End If
        FileName = libGlobal.App_Path & "\temp.doc"

        TrimWordBlob = New Byte(WordBlob.Length - 86) {}
        Buffer.BlockCopy(WordBlob, 85, TrimWordBlob, 0, TrimWordBlob.Length)
        System.IO.File.WriteAllBytes(FileName, TrimWordBlob)

        objStream = New MemoryStream(TrimWordBlob)
        objStream.Position = 0
        Me.wbrDocument.DocumentStream = objStream

    Catch ex As Exception
        libError.ShowErrorMessage(ex)
    End Try
End Sub

Temp.doc は有効な Word ドキュメントではなく、WebBrowser コントロールには何も表示されません。私のやり方の間違いを教えていただけますか?

4

1 に答える 1