Word Dokument in OLE-Box laden ?

Hallo,

ich möchte gerne ein Word Dokument in eine OLE-Box laden. Kann mir jemand helfen ? Über „dateiname“ wird ein Formular aufgerufen, über welches ich die Datei auswählen kann. Es wird dann der Dateiname übergeben, der geöffnet werden soll und in meiner OLE-Box ausgegeben nwerden soll (also das Word Dokument)

Option Explicit
Dim Word As Object
Dim input_file As String
Dim ntext As String

Private Sub Command1_Click()
Dim DateiNr As Integer
dateiname.Show
input_file = dateiname.Tag

DateiNr = FreeFile
Open input_file For Input As DateiNr

… ???

Close DateiNr
End Sub

Danke für jeden Tipp !!!
Grüße

Wenn ich es erst mal so versuche bekomme ich die Meldung:
„Systemfehler - Inhalt des OLEStream im falschen Format“
Was mach ich denn falsch ?

Private Sub Command1_Click()
Dim FileNum As Integer

FileNum = FreeFile
Open „c:\Test.doc“ For Binary As #FileNum
OLEObj1.ReadFromFile FileNum
Close #FileNum

End Sub