error leyendo de un xml Microsoft.XMLDOM

[lmalvarez]

Buenas,

tengo un fichero XML del cual quiero coger los nodos y pasárselos a una función (LecturaNodos), hecha en VB, que está en otra página asp, la cual según el tipo de nodo, hará una cosa u otra.

Bien, el problema es que al pasarle los nodos a LecturaNodos con xmlDoc.documentElement.childNodes , me da un error de que se esperaba un objeto en la línea de llamada a LecturaNodos.

Y si almaceno en una variable los nodos, me da error en la página de LecturaNodos y me dice que la variable Nodos no es una colección.

Espero que puedan ayudarme, muchas gracias.

Saludos

[u_goldman]

Bueno, primero que nada habría que cerciorarse que efectivamente esté leyendo el xml, y después, necesitamos ver tu código.

Saludos

[lmalvarez]

u_goldman supongo que te refieres a si hay un error en el parser, pues no lo hay ya que tengo puesto que si los hay los muestre:

Código asp:

'este no es el código exacto, ahora mismo no lo tengo delante
xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
xmlDoc.async = false
xmlDoc.load("ksdjf.xml")
 
if xmlDoc.parseError then
   Set errorCode = xmlDoc.parseError.errorCode
   Set reason = xmlDoc.parseError.reason
   Set line = xmlDoc.parseError.line
end if
 
'más adelante
LecturaNodos(xmlDoc.documentElement.childNodes)
 

ED: Por cierto, el objeto xmlDoc (variable global) lo quiero cargar con el documento XML en una función, pero al salir de la función el objeto está vacío. Si lo hago justo antes de llamar a la función LecturaNodos, entonces sí que me funciona y me muestra los nodos del documento. El problema es que empleo un objeto aspSmartUpload para subir el fichero XML al server y guardarlo en una carpeta, pero no me lo guarda.

Concretamente me da el siguiente error:

Unable to save file (Error 1120)

Err.number -2147220384

Código asp:

set smartUp=Server.CreateObject("aspSmartUpload.SmartUpload")
 
    smartUp.MaxFileSize=50000 'aprox 50K
    smartUp.AllowedFilesList="xml,XML"
    smartUp.Upload
 
if Err then
        Response.Redirect "../Success.asp?code=fileup&tipo=excl"
    end if
 
FileBox=smartUp.Files.Item(1).Name
FileName=smartUp.Files(FileBox).FileName
FilePathName=smartUp.Files(FileBox).FilePathName
TamFile=smartUp.Files.Item(1).Size
 
 
ruta = request.serverVariables("APPL_PHYSICAL_PATH") 
XMLFile = FechaExacta() & "." & smartUp.Files.Item(1).FileExt
NuevoNombre = ruta & "admin\xmlup\" & XMLFile
subido = smartUp.Files.Item(1).SaveAs (NuevoNombre)
 

[lmalvarez]

Solucionado,

era un problema con el aspsmartupload, al guardar el fichero hay que especificar la ruta absoluta.

Código asp:

NuevoNombre2 = ruta & "\admin\xmlup\" & XMLFile