Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.
Keywords: ADO ADODB
AddrBk = C:\Documents and Settings\User\Application Data\Microsoft\Address Book cConn = StrCat("Provider=Microsoft.JET.OLEDB.4.0;Exchange 4.0;MAPILEVEL=Outlook Address Book\;PROFILE=Outlook;TABLETYPE=1;DATABASE=",AddrBk) DB = ObjectOpen("ADODB.Connection") RS = ObjectOpen("ADODB.Recordset") BoxOpen( "Creating Address Book XML File","Please Wait...") DB.Open( cConn ) cSQL = "SELECT * from [Contacts]" RS.Open( cSQL,cConn,3,1 ) RS.Save( "Contacts.xml",1) RS.Close() ObjectClose(RS) DB.Close() ObjectClose(DB) BoxShut() Message("Finished", "XML file created") Exit
Article ID: W15596
File Created: 2003:05:13:11:29:10
Last Updated: 2003:05:13:11:29:10