Ho un file xml dal quale leggo i dati e devo buttarli in un database access.
Al momento faccio così...
<--codice
Dim objXmlDom,lungh
Set objXmlDom = Server.CreateObject("Microsoft.XMLDOM")
objXmlDom.async = False
objXmlDom.load Server.MapPath("database.xml")
Set descr = objXmlDom.getElementsByTagName("Listino/descrizione")
Set codart = objXmlDom.getElementsByTagName("Listino/codicearticolo")
Dim i
i = 0
For i = 0 To (descr.length - 1)
SQL = "INSERT INTO Listini (descr, codart) VALUES ('" & descr(i).Text &"', '" & codart(i).Text')"
Set RS = Conn.Execute(SQL)
Next
codice-->
Il mio problema avviene però quando un valore non è presente nel database xml. Mi spiego meglio. Questo è il nodo Listino
<Listino>
<descrizione>balbalbal</descrizione>
<codicearticolo>19028</codicearticolo>
</Listino>
in alcuni casi però ho questa situazione:
<Listino>
<descrizione>balbalbal</descrizione>
</Listino>
Ora il problema è che non mi da problemi in lettura, il problema è che non so come verificare se il figlio esiste in modo da metterlo o non metterlo nel database access.
Mi servirebbe qualcosa del genere:
if codart(i).Text = "" then codart(i).Text = "&nbps;"
che ovviamente non funziona...
chi mi aiuta?
Rispondi quotando