ASP - ayuda para actualizar una web

   
Vista:

ayuda para actualizar una web

Publicado por Pepe (1 intervención) el 25/02/2010 10:30:37
Hola, necesito actualizar una web realizada en asp. es un apartado de la misma. Os dejo el código del script para que lo veais:

<!-- #INCLUDE FILE="librerias/adovbs.inc" -->
<!-- #INCLUDE FILE="librerias/libreria.asp" -->
<!-- #INCLUDE FILE="librerias/util.asp" -->
<%

'Saco el id
sql = "select max(id) as ident from natural_conferencias"
sqldb rs, sql

if isnumeric(rs("ident")) then
max=cInt(rs("ident"))
else
max = 0
end if

id=max+1

titulo = Replace("Contando el mundo con las matemáticas","'","''")
titulova = Replace("Comptant el món amb les matemàtiques","'","''")
'contenido = Replace("<table style='border:1px solid black; width:350px;'><tr><td><img src='imagenes/JavierArmenta.jpg' align='left' style='padding-right:15px;' /><div class='titulo'>Javier Armentia</div><br />(Vitoria - 1962)<br />Astrofísico.<br />Director Planetario de Pamplona</td></tr></table><br /><br /><br /><img src='imagenes/conferencias/postal-octubre.jpg' align='left' style='padding-right:15px'>Director del planetario de Pamplona, desde donde comparte sus conocimientos y opiniones, como uno de los importantes divulgadores de la ciencia en los medios de comunicación. Autor del blog 'Por la boca muere el pez' y presidente de la Sociedad para el Avance del Pensamiento Crítico. Cuando escribe sus artículos o habla con el público, Armentia hace gala de su condición de científico y escéptico.<br /><br /><img src='imagenes/conferencias/armentia1.jpg'>  <img src='imagenes/conferencias/armentia2.jpg'><br /><br />Archivos:<br />- Pdf de 'El sistema del Sol' (<a href='archivos/elsistemadelsol.pdf' target='_blank'>Descargar (15.3 Mb)</a>)<br />- Recortable del sistema solar (<a href='archivos/Recortable.pdf' target='_blank'>Descargar (8.41 Mb)</a>)","'","''")

contenido = Replace("<table style='border:1px solid black; width:350px;'><tr><td><img src='imagenes/pablo-pineda.jpg' align='left' style='padding-right:15px;' /><div class='titulo'>Pablo Pineda</div><br />(Málaga - 1979)</td></tr></table><br /><br /><br /><img src='imagenes/conferencias/postal-diciembre.jpg' align='left' style='padding-right:15px'>Pablo Pineda nos presenta un reflexión muy personal sobre el esfuerzo por demostrarse a si mismo y al resto de personas que es CAPAZ. No tiene prejuicios ni reproches ante la gente que no quiso apostar por él. Cada día, en cada situación de su vida, tiene el compromiso de denunciar los prejuicios y demostrar que cada día es capaz.<br /><br />La sencillez con la que expresa que hay que >>creer en las personas con discapacidad<< nos hace ver a todos que es posible aprender y conocer mucho más de lo que uno cree.<br /><br />En todos los casos y personas, el papel de la familia es fundamental, apoyando pero no sobreprotegiendo entre algodones. Este mensaje clarificador, refleja hacia dónde debemos aspirar las personas, reconociendo a cada uno como somos.<br />","'","''")

'contenidova = Replace("<table style='border:1px solid black; width:350px;'><tr><td><img src='imagenes/juanMoreno.jpg' align='left' style='padding-right:15px;' /><div class='titulo'>Juan Moreno</div><br />(Madrid - 1954)<br />Biòleg.<br />Professor d'Investigació.</td></tr></table><br /><br /><br /><img src='imagenes/conferencias/postal-noviembre.jpg'
align='left' style='padding-right:15px'>S'ha afirmat repetidament en certs cercles acadèmics que la teoria sobre evolució per selecció natural proposta fa segle i mig per Charles Darwin està desfasada i obsoleta i no és capaç d'absorbir els més recents descobriments científics en paleontologia, biologia del desenrotllament, epigenética o modelització de processos autoorganitzats. Estes afirmacions es basen normalment en una lectura superficial de l'obra de Darwin i en certes ànsies injustificades de canvi de paradigma científic. No obstant això, l'evidència científica i una interpretació correcta del que afirma la teoria permet assegurar que no hi ha alternativa actualment al mecanisme de la selecció natural com a motor de l'evolució. Seguim per tant en l'era de Darwin, que els descobriments més recents desvelen els processos de producció de nova variació en les poblacions d'organismes sobre la qual opera la selecció i com als dits processos són l'herència d'antiquíssims processos de selecció natural.<br /><br /><img src='imagenes/conferencias/armentia1.jpg'>  <img src='imagenes/conferencias/armentia2.jpg'><br /><br />Arxius:<br />- 20 Malentendidos sobre la teoría de Darwin.pptm (<a href='archivos/20 Malentendidos sobre la teoría de Darwin.pptm' target='_blank'>Decarregar (10.25 Mb)</a>)<br />)","'","''")

contenidova = Replace("<table style='border:1px solid black; width:350px;'><tr><td><img src='imagenes/pablo-pineda.jpg' align='left' style='padding-right:15px;' /><div class='titulo'>Pablo Pineda</div><br />Departament d'Àlgebra, Facultat de Matemàtiques, UCM.</td></tr></table><br /><br /><br /><img src='imagenes/conferencias/postal-diciembre.jpg' align='left' style='padding-right:15px'>Pablo Pineda ens presenta un reflexió molt personal sobre l'esforç per demostrar-se a si mateix i a la resta de persones que és CAPAÇ. No té prejuís ni reprotxes davant de la gent que no va voler apostar per ell. Cada dia, en cada situació de la seua vida, té el compromís de denunciar els prejuís i demostrar que cada dia és capaç<br /><br />La senzillesa amb què expressa que cal >>creer en les persones amb discapacidad<< ens fa veure a tots que és possible aprendre i conéixer molt més del que un creu.<br /><br />En tots els casos i persones, el paper de la família és fonamental, recolzant però no sobreprotegint entre cotons. Este missatge clarificador, reflectix cap a on hem d'aspirar les persones, reconeixent a cada un com som.<br />","'","''")

ponente = "D. Pablo Pineda"
audio = ""
video = ""
anyo = 2010
tiempo = Replace("2' 22''","'","''")

sql = "insert into natural_conferencias(id,titulo, titulova,contenido, contenidova, ponente, audio,video,anyo,tiempo) values("&id&",'"&titulo&"','"&titulova&"','"&conte nido&"','"&contenidova&"','"&ponente&"','"&audio&" ','"&video&"',"&anyo&",'"&tiempo&"')"
sqldb rs, sql

'Response.Write(sql)
'sql = "delete from natural_conferencias where id=30"
sql = "update natural_conferencias set contenido='"&contenido&"',contenidova='"&contenido va&"', titulo='"&titulo&"', titulova='"&titulova&"' where id=47"
'sql = "update natural_conferencias set audio='"&audio&"', video='"&video&"', tiempo='"&tiempo&"' where id=43"
'sqldb rs, sql

id = 34
titulo = Replace("Vuelta al mundo en bicicleta, un viaje sin prisas","'","''")
titulova = Replace("Volta al món amb bicicleta, un viatge sense presses","'","''")
contenido = Replace("<center><img src='imagenes/conferencias/bicicleta.jpg'></center>","'","''")
contenidova = Replace("<center><img src='imagenes/conferencias/bicicleta.jpg'></center>","'","''")
ponente = Replace("D. Juanjo Alonso Checa","'","''")
audio = ""
video = ""
anyo = 2008
tiempo = ""

sql = "insert into natural_conferencias(id,titulo, titulova,contenido, contenidova, ponente, audio,video,anyo,tiempo) values("&id&",'"&titulo&"','"&titulova&"','"&conte nido&"','"&contenidova&"','"&ponente&"','"&audio&" ','"&video&"',"&anyo&",'"&tiempo&"')"
'sqldb rs, sql
nombre = "ALACALLE - MARQ, Museo Arqueológico"
nombreva = Replace("ALACALLE - MARQ, Museu Arqueològic","'","''")

sql = "insert into natural_enlaces(id, nombre, nombreva, url, visible, prioridad) values(9,'"&nombre&"','"&nombreva&"','http://www.alacalle.com/listadoscomp.aspx?canal=palabra&entidad=157',1,Coo l"
'sqldb rs, sql

%>

---------------------------------------------------------------------------------

El apartado que quiero añadir es una conferencia (Pablo Pineda), cuyo párrafo es el último más largo que aparece en el código fuente. Desconozco si hay algún fallo en esas líneas, ya que lo he implementado yo mismo fijándome en las demás párrafos de antiguas conferencias.

El problema que tengo es al actualizar este script y subirlo al servidor (usando el dreamweaver), que parece que no se actualice, ya que me meto en el navegador y no se producen cambios.

Espero que me podáis ayudar.

Gracias de antemano, un saludo.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:ayuda para actualizar una web

Publicado por Miguel (4 intervenciones) el 03/03/2010 16:18:34
No me hagas mucho caso, pero me da la sensacion que este script lo que hace es añadir registros a la base de datos, no visualizarlos....Aunque no acabo de entender porque esta hecho por codigo pero.....
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar