#include <Array.au3>
#include <String.au3>
#include <MsgBoxConstants.au3>
#include<File.au3>
#include <Excel.au3>
#include <IE.au3>
#include <IEXpath.au3>
#include <Date.au3>
#include <GuiComboBox.au3>
#include <DTC.au3>
#include <EventLog.au3>
#include <OutlookEX.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <ColorConstants.au3>
#include <ado.au3>


;_MySQLConnect("COPS", "copstest11g", "LABDEV", "10.160.36.19", "Oracle in OraClient11g_home1", 1521)

$ObjConn = ObjCreate("ADODB.Connection")
$conn="DRIVER={Oracle in OraClient11g_home1};DBQ=10.160.36.19;DATABASE=LABDEV;UID=COPS;PWD=copstest11g;PORT=1521;"
$Objconn.open ($conn)
If @error Then
	MsgBox(0,"",@error)
EndIf