Leggere file formato doc

[Giro12]

Ciao a tutti pongo il seguente quesito se è possibile leggere un file in formato doc?
io ho provato il seguente codice ma non visualizzo nulla

  <%
ilfile=server.mappath("pdf/Bilancio_Aprile_2016.doc")

Set file = CreateObject("Scripting.FileSystemObject")
Set ilfile = file.OpenTextFile(ilfile, 1, False)

counter=0
do while not ilfile.AtEndOfStream
counter=counter+1
illine=ilfile.readline
response.write illine & "<br />"
loop

ilfile.Close
set ilfile=nothing
set file=nothing
%>