........ cnnVFP = CreateObject("ADODB.Connection") cnnVFP.Open("Provider=VFPOLEDB.1;Data Source=" + VFPDirectory + ";Collating Sequence=MACHINE") *'format foxpro prg text, prepare the proper vfp EXECSCRIPT call, and call it via ADO Execute. ofso = CreateObject("Scripting.FileSystemObject") With ofso.OpenTextFile("vfpcode.prg") lctmpstr = .readall .close() End With ctmpstr = "EXECSCRIPT('" + lctmpstr + "', '" + VFPDirectory + "', '" + _ lctmp1 + "', '" + lctmp2 + "')" lctmpstr = lctmpstr.Replace(Chr(13) + Chr(10), "' +CHR(13)+CHR(10)+'") cnnVFP.Execute(lctmpstr) .......Just my 2 cents.