oOlApp = CreateObject("Outlook.Application") && Open Outlook oOlNS = oOlApp.GetNameSpace("MAPI") && Set name space oOlC = oOlNS.GetDefaultFolder(10) && 10 = Default Contacts Folder SELECT emcontact FOR i = 12 TO oOlC.Items.Count WAIT WIND "Record # "+ALLT(STR(i))+" of "+ALLT(STR(oOlC.Items.Count)) NOWAIT INSERT INTO emcontact (ctname, ctaddress) ; VALUES ; (oOlC.Items(i).email1address,; oOlC.Items(i).fullname) ENDFOROn the insert statement, I get an "unknown name" message...