Anybody has any idea to solve this problem? thanks in advance.
OBJECT pADOObj, pADOCommObj;
STRING szADOObjID, szADOCommObjID;
STRING svLine, szConnString, szSQL[1024];
begin
// Create ADO Connection Object to connect to the SQL server
szADOObjID = "ADODB.Connection";
set pADOObj = CreateObject(szADOObjID);
// Create the SQL string to complete the connection
szConnString = "driver={Oracle ODBC Driver};";
szConnString = szConnString + "server=myoracleserver;";
szConnString = szConnString + "uid=mydatabase;";
szConnString = szConnString + "pwd=mypassword;";
// Open the ADO Connection
pADOObj.Open(szConnString);
// Create the ADO Command object to execute the script
szADOCommObjID = "ADODB.Command";
set pADOCommObj = CreateObject(szADOCommObjID);
pADOCommObj.ActiveConnection = pADOObj;
szSQL = "CREATE TABLE test(END NUMBER(11, 0) );pADOCommObj.CommandText = szSQL;
pADOCommObj.CommandType = 1;
pADOCommObj.Execute();