Local oCat As "adox.catalog" LOCAL oConn As "Adodb.Connection" LOCAL oCmd As "Adodb.Command" LOCAL oRs As "Adodb.Recordset" oConn = CREATEOBJECT("adodb.Connection") oCat = CREATEOBJECT("adox.catalog") oCmd = CREATEOBJECT("Adodb.Command") oConn.ConnectionString = "dsn=vfptest" oConn.CursorLocation = 3 && adUseClient oConn.Open oCat.ActiveConnection = oConnWorks like a champ. Can you be more specific about what's breaking?