Talleres

<% Dim MM_authorizedUsers Dim MM_authFailedURL Dim MM_grantAccess Dim Escribe MM_authorizedUsers="" MM_authFailedURL="entrar.asp" MM_grantAccess=false if (Session("MM_Clientname")<>"") then if (Session("MM_ClientAuthorization")="") then MM_grantAccess = true end if end if if (not MM_grantAccess) then Response.Redirect(MM_authFailedURL+"?accesdenied="+Server.URLEncode(Request.ServerVariables("URL")+"?"+Request.QueryString())) else Set Conn = Server.CreateObject("ADODB.Connection") Conn.Provider = "Microsoft.Jet.OLEDB.4.0" Conn.ConnectionString = "Data Source=" & server.MapPath("/bases/salta.mdb") Conn.Open Set Rs = Server.CreateObject("ADODB.Recordset") Rs.Open "SELECT * from clientes where Id=" & Session("MM_Clientname"), Conn, 1,3 Escribe=year(now) Escribe=Escribe*100+month(now) Escribe=Escribe*100+day(now) Escribe=Escribe*100+hour(time) Escribe=Escribe*100+minute(time) Rs("url") = Escribe Rs.update set Rs = nothing set Conn = nothing end if %> Talleres

Cabeza

Talleres

Colega

En este espacio publicamos uno de los proyectos de taller que integra las áreas de Lengua y Computación como muestra de aquellos implementados en nuestro CD "Sala de Maestros"

Taller de Escritura:

Presentación ...al Taller

Puedes adquirir el CD, el que te será enviado contra reembolso.
Hoja1

Adquiere tu CD

[ Principal ] [ Arriba ] [ Fundamentación ] [ Taller de Escritura ]

Copyright © 2001 Síntesis Digital de Salta