form1.ADOConnection1.ConnectionString:="Provider=Microsoft.Jet.OLEDB.4.0;Data Source="+s+";Extended Properties=dBASE IV;User ID=Admin;Password=";
form1.ADOConnection1.ConnectionString:=`Provider=Microsoft.Jet.OLEDB.4.0;Data Source=`+s+`;Extended Properties=dBASE IV;User ID=Admin;Password=`;
ADOConnection1.Connected :=false; ADOConnection1.ConnectionString := 'new string'; ADOConnection1.Connected :=true;