Para leer un archivo podes usar en vbs lo siguiente:
Código:
Dim fso: Set fso = CreateObject("Scripting.FileSystemObject")
Dim file: Set file = fso.OpenTextFile(nombreArchivo)
datos = file.ReadLine
msgbox datos
file.Close
Set fso = nothing
para enteder mejor busca acerca de la clase FileSystemObject.
Suponiendo que queres que se muestre el contenido de la variable var1 y de la misma forma en que se muestra "125.09" en tu ejemplo tendrias que hacer algo como:
Código:
ruta = "X:\Mis documentos\125.09\" & var1 & ".proyecto.doc"
Saludos
Marcadores