Ole-Objekt (Access2002) als Datei speichern

02/02/2008 - 19:10 von Wolfgang Kraus | Report spam
Servus Experten,

ich habe wieder einmal ein Problem.
Ich habe in einer Access2002-Datenbank eine Tabelle, welche ein Feld im
Format <Ole-Objekt> enthàlt. Dort sind Word-Dokumente abegspeichert. Wie
kann ich nun so ein Word-Dokument mittels VB2005-Programm aus der Tabelle
lesen und in einer Doc-Datei speichern, sodass diese Datei mittels
Office-Word korrekt geöffnet werden kann.

Vielen Dank und liebe Grüße,
Wolfgang
 

Lesen sie die antworten

#1 Peter Fleischer
03/02/2008 - 18:57 | Warnen spam
"Wolfgang Kraus" schrieb im Newsbeitrag
news:%

ich habe wieder einmal ein Problem.
Ich habe in einer Access2002-Datenbank eine Tabelle, welche ein Feld im
Format <Ole-Objekt> enthàlt. Dort sind Word-Dokumente abegspeichert. Wie
kann ich nun so ein Word-Dokument mittels VB2005-Programm aus der Tabelle
lesen und in einer Doc-Datei speichern, sodass diese Datei mittels
Office-Word korrekt geöffnet werden kann.



Hi Wolfgang,
hier mal ein möglicher Lösungsweg:

Sub PasteAccessDbIntoStream(ByVal str As IO.MemoryStream, ByVal id As
Integer)
Try
Dim strSQL As String = "SELECT fldOle FROM Tab WHERE ID = @ID"
Dim myCommand As New OleDbCommand(strSQL, myOleDbConnection)
myCommand.Parameters.Add(New OleDbParameter("@ID",
OleDbType.Integer)).Value = id
myOleDbConnection.Open()
Dim myReader As OleDbDataReader
myReader = myCommand.ExecuteReader
If myReader.Read() Then
Dim myArrayBuffer(999999) As Byte
myReader.GetBytes(0, 0, myArrayBuffer, 0, 1000000)
Return New System.IO.MemoryStream(myArrayBuffer)
End If
Catch ex As Exception
MsgBox(ex.Message)
Finally
myOleDbConnection.Close()
End Try
End Sub


Viele Gruesse

Peter

Ähnliche fragen