Asp E Xml

[®HEX®]

Ola galera a duvida e o seguinte preciso inserir registros em um .mdb

mas esses registros estao em um xml

como faço isso em asp...

inserir registros de um xml no access ultilizando asp

e isso ai pessoal, desde já agradeço...

[explore]

cara registro de um XML!!!!!!

você pode gravar os registros em outro arquivo XML como se foce um BD, fica mais rapido a conexao.........hj em dia usa bastante isso!

respondendo sua pergunta:

<%
' Acima, colocamos o arquivo com as constantes VB - ADO.

' Primeiro, vamos verificar se o arquivo já existe;
Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
If objFSO.FileExists(Server.MapPath("netpedia.xml")) Then
     objFSO.DeleteFile Server.MapPath("netpedia.xml")
End IF
Set objFSO = Nothing

' Declarar as variáveis.
Dim cnnXML ' Conexão ADO
Dim rstXML ' Recordset ADO

' Cria a conexão ADO.
Set cnnXML = Server.CreateObject("ADODB.Connection")

' Esta Linha é para quem usa ACCESS:
'cnnXML.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" _
' & Server.MapPath("netpedia.mdb") & ";"

' Para quem usa o SQL:
cnnXML.Open "Provider=SQLOLEDB;Data Source=xx.xx.xxx;" _
& "Initial Catalog=ti_netpedia;User Id=ti_netpedia;Password=senha;" _
& "Connect Timeout=15;Network Library=dbmssocn;"

' Executa a query o coloca em um recordset
Set rstXML = Server.CreateObject("ADODB.Recordset")
Set rstXML = cnnXML.Execute("SELECT * FROM tabela ORDER BY registro;")

Response.Write "<p>Gravando o arquivo XML...</p>" & vbCrLf

' Finalmente grava o arquivo.
rstXML.Save Server.MapPath("netpedia.xml"), adPersistXML

' Fecha todos os objetos
rstXML.Close
Set rstXML = Nothing
cnnXML.Close
Set cnnXML = Nothing

Response.Write "<p>XML GRAVADO COM SUCESSO !!!</p>" & vbCrLf
Response.Write "<p>Clique <a href=""netpedia.xml"">aqui</a> para ver como ficou o arquivo.</p>" & vbCrLf
%>

Falo!!!!!!!!!!!!!!!!!!

[TIO CARNEGO]

Procura uns tutoriais sobre esse cara -> Microsoft.XMLDOM