<%@ 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 - Asesoría Virtual
Página Principal





Regresar


Objetivos


Metodología



Artículos
Escuela de Padres


FOROS INTERACTIVOS    CONTÁCTENOS

Noticias