Here is the code to import xml to Access:
Dim appAccess As Object
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase ("C:\test.mdb")
appAccess.ImportXML "http://192.168.100.60/index.xml"
appAccess.CloseCurrentDatabase
appAccess.Quit acExit...