02/11/2009, 11:37
|
 | | | Fecha de Ingreso: septiembre-2009
Mensajes: 502
Antigüedad: 14 años, 7 meses Puntos: 47 | |
| Respuesta: Leer archivo doc
Trata el archivo como txt, a mi me funcionó:
Dim DataList
Archivo = Dir(App.Path & "\List.doc")
If Archivo <> "List.doc" Then Exit Sub
Open App.Path & "\List.doc" For Input As #1
Do While Not EOF(1)
Input #1, DataList
Loop
Close #1 |