|
| BIBLIOTECAS
POR LA CONVIVENCIA 2006 |
|
|
En
tierra de todos |
Este
año 2006 el tema de la campaña es el
medio ambiente y el lema “en
tierra de todos”, lo cual alude a la
vinculación de todo ser vivo con el entorno,
situación concreta y alejada de ese espacio
indefinido que es la tierra de nadie.
|
 |
| Bibliotecas
por la convivencia |
|
Es
un proyecto de cooperación en el que las bibliotecas
públicas de la Comunidad de Madrid, bajo la coordinación
de la Subdirección General de Bibliotecas, aúnan
esfuerzos para mostrarse como servicio público
que trata de dar respuesta a la realidad social y como
espacios de convivencia, diversidad e información
para personas de cualquier procedencia.
Estas inquietudes
se recogen en el lema general, Bibliotecas por
la convivencia, así como en el trabajo
de las personas implicadas. Cada año, desde
2001, las bibliotecas acuerdan un tema al que dedican
las actividades que programan en el mes de octubre.
|
|
|
|
|
|
Comunicación
al III Congreso Nacional de Bibliotecas Públicas. Murcia,
2006
|
| ..................................................................................................................................................................... |
<%
Dim buscar
buscar = Request.Form("Texto")
%>
<%
Function fBuscar(cnn)
SQL="SELECT Titulo, Comentarios, PALAC, Link FROM Busqueda WHERE PALAC LIKE '%"&buscar&"%';"
rs.Open SQL
While Not rs.EOF
str = str & "" & rs("Titulo") & " >>
" & "" & rs("Comentarios")& "
"
rs.MoveNext
Wend
if str = "" then str ="Lo siento, no se encontraron resultados"
if buscar = "" then str ="Por favor, especifique su búsqueda"
fBuscar = str
End Function
Dim cnn, str, rs, SQL
DBName = "driver={Microsoft Access Driver (*.mdb)};dbq=http://www.lecturedes.com/bab/bab.mdb"
Set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open DBName = "http://www.lecturedes.com/bab/bab.mdb"
Set rs = CreateObject("ADODB.Recordset")
rs.ActiveConnection = cnn
Response.write " "
Response.write "Resultados "
Response.write "de la busqueda: "
Response.write " "
Response.write " "
Response.Write fBuscar(cnn)
Response.write "
"
%>
|
|
| |
| .......................................................................................................................................................................................................................... |
| |
|
| |
 |
Descargas
de imágenes |
| |
................................................... |
| |
Aquí
puedes descargar las imágenes corporativas, notas
de prensa, etc. |
|
|
|
