<%@ Language=VBScript%> <% Dim fso, txtArchivo, txtLinea, ts set fso = CreateObject("Scripting.FileSystemObject") set ts = fso.OpenTextFile ("d:\MariaReina\TxtNoticias\Apafa.txt") txtArchivo = "" Do While Not ts.AtEndOfStream = True txtLinea = ts.ReadLine & "
" txtArchivo = txtArchivo & txtLinea Loop ts.Close set ts = nothing 'response.write txtArchivo' %> Maria Reina Marianistas - Departamento de Investigación e Innovación Educativa
Página Principal





ASESORÍA VIRTUAL
Regresar


Objetivos


Proyectos



Equipo
 


CONTÁCTENOS

Noticias