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 コントロールには何も表示されません。私のやり方の間違いを教えていただけますか?