Es la primera vez que entro en este foro y la verdad es que, aunque llevo mucho tiempo visitando cristalab para ver sus tutoriales, no me había atrevido a escribir nada en el foro.
Bueno, llevo poco tiempo en esto de la programación, y ahora estoy intentado hacer un libro de visitas. Cuando se escribe un mensaje nuevo, sale el nombre del que lo escribe, la fecha y el mensaje. Lo que sucede es que la feha siempre sale 1991, y a verdad es que no se por qué.
Tengo 6 archivos. libro.swf, enviar.swf, grabar.asp, texto.xml, skipCache.as y estyles.css.
¿Dónde puede estar el problema?
Creo que puede estar el archivo grabar.asp aunque no estoy seguro del todo
Código :
<% Dim stringNuevo ,cadena Dim cuerpo2,asunto2,fecha2,noticiaLarga2,Nodo,Numero cuerpo2=Request.QueryString("nombre") asunto2=Request.QueryString("titulo") fecha2=Request.QueryString("fecha") noticiaLarga2=Request.QueryString("comentario") Set xmlObj = CreateObject("Microsoft.XMLDOM") xmlObj.Async = False xmlObj.Load(Server.MapPath("texto.xml")) Set Nodo = xmlObj.DocumentElement 'Cuentas el número de hijos Numero = Nodo.ChildNodes.Length Set xmlObj2 = CreateObject("Microsoft.XMLDOM") xmlObj2.Async = False Set aNode2=xmlObj.SelectSingleNode("noticias/mensaje") stringNuevo = "<mensaje titulo='"&asunto2&"' nombre='"&cuerpo2&"' fecha='"&fecha2&"' comentario='"¬iciaLarga2&"' />" Response.write "numero de nodos" & Numero xmlObj2.LoadXML(stringNuevo) Set root = xmlObj.documentElement Set root2 = xmlObj2.documentElement root.appendChild(root2) xmlObj.Save(Server.MapPath("texto.xml")) Set xmlObj = nothing Set xmlObj2 = nothing %>
Espero que alguno encontreis la solución.
Y muchas gracias de antemano.
Intentaré aprender poco a poco.
Un saludo de Sanpancracio.
[moderador]agregadas las etiquedas code para mejor lectura[/moderador]