var DBFconn = WScript.CreateObject ("ADODB.Connection");
var ORAconn = WScript.CreateObject ("ADODB.Connection");
ORAconn.ConnectionString = "Provider=OraOLEDB.Oracle;Data Source=myDBid;User Id=myUser;Password=myPass;";
DBFconn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\\dbf_dir;Extended Properties=dBASE IV;";
DBFconn.Open();
ORAconn.Open();

var vCOL_clause=ORAconn.Execute("select COLUMN_CLAUSE from SettingsTable WHERE TABLE_NAME='myTable'");
var DBFrecord_set = DBFconn.Execute("select "+vCOL_clause(0)+" from myTable");

var ORArecord_set = ORAconn.Execute("insert into myTable ("+vCOL_clause(0)+") select "+vCOL_clause(0)+" from [Microsoft.Jet.OLEDB.4.0;Data Source=c:\\dbf_dir;Extended Properties=dBASE IV;].[myTable]");

var strSQL = "DBFrecord_set(0)";
var i = 1;
while (i<DBFrecord_set.fields.Count)
	{strSQL = strSQL+"+\",\"+DBFrecord_set("+i+")";
	i=i+1;
	}
var strSQL = "insert into myTable ("+vCOL_clause(0)+") values (\"+"+strSQL+"+\")";
while (!DBFrecord_set.eof)
{
var ORArecord_set = ORAconn.Execute(strSQL);
DBFrecord_set.MoveNext;
}