Ver Mensaje Individual
  #3 (permalink)  
Antiguo 07/12/2009, 05:46
lmalvarez
 
Fecha de Ingreso: julio-2009
Mensajes: 82
Antigüedad: 15 años, 9 meses
Puntos: 0
Respuesta: error leyendo de un xml Microsoft.XMLDOM

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:
Ver original
  1. 'este no es el código exacto, ahora mismo no lo tengo delante
  2. xmlDoc = Server.CreateObject("Microsoft.XMLDOM")
  3. xmlDoc.async = false
  4. xmlDoc.load("ksdjf.xml")
  5.  
  6. if xmlDoc.parseError then
  7.    Set errorCode = xmlDoc.parseError.errorCode
  8.    Set reason = xmlDoc.parseError.reason
  9.    Set line = xmlDoc.parseError.line
  10. end if
  11.  
  12. 'más adelante
  13. 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:
Ver original
  1. set smartUp=Server.CreateObject("aspSmartUpload.SmartUpload")
  2.  
  3.     smartUp.MaxFileSize=50000 'aprox 50K
  4.     smartUp.AllowedFilesList="xml,XML"
  5.     smartUp.Upload
  6.  
  7. if Err then
  8.         Response.Redirect "../Success.asp?code=fileup&tipo=excl"
  9.     end if
  10.  
  11. FileBox=smartUp.Files.Item(1).Name
  12. FileName=smartUp.Files(FileBox).FileName
  13. FilePathName=smartUp.Files(FileBox).FilePathName
  14. TamFile=smartUp.Files.Item(1).Size
  15.  
  16.  
  17. ruta = request.serverVariables("APPL_PHYSICAL_PATH")
  18. XMLFile = FechaExacta() & "." & smartUp.Files.Item(1).FileExt
  19. NuevoNombre = ruta & "admin\xmlup\" & XMLFile
  20. subido = smartUp.Files.Item(1).SaveAs (NuevoNombre)

Última edición por lmalvarez; 09/12/2009 a las 04:45 Razón: El error está ahora en aspSmartUpload