%option explicit
Server.ScriptTimeout=1200
'Response.Expires = 0
%>
<%
dim sesion, id_noticias
dim sql,conn, rsNoticias
dim n,i
'id_taller=request.querystring("id_taller")
sesion=Session("Usuario")
n=1
i=2
'If sesion <> "" Then
conexionBD conn, "rw"
sql="SELECT * FROM tb_news"
'response.Write(sql & "
")
set rsNoticias=conn.execute(sql)
%>
Noticias
| 
|
| |
This is an restricted Acces Page only for Parents
Please type your Username and Password
|
|
|
|
 |
|
|
|
|
|
|
| |
|
| |
|
|
<%
conn.close
'else
'Response.redirect "error.asp?msg=Su sesion ha expirado"
'end if
%>