Hola.

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='"&noticiaLarga2&"' />" 
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]