<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
::: Predicciones de Corrientes y otras variables en el Golfo de Bizkaia :::
<%dim fich, texto_fichero, confile, archivo
'creamos el nombre del archivo
archivo= request.serverVariables("APPL_PHYSICAL_PATH") & "impres\predicciones\dia.txt"
'conectamos con el FSO
set confile = createObject("scripting.filesystemobject")
'volvemos a abrir el fichero para lectura
set fich = confile.OpenTextFile(archivo)
'leemos el contenido del fichero
texto_fichero = fich.readAll()
'imprimimos en la página el contenido del fichero
'response.write(MID(texto_fichero,4))
'cerramos el fichero
fich.close()
%>
