$dsnado = "DBI:ADO:Provider=vfpoledb;DSN=FoxPro;";
$dbhfox = DBI->connect ($dsnado, '', '');