Connection to Oracle db

Is this correct?

What should be my Driver?

function oracon

  dim AConnection, RecSet

  'Create a Connection object

  set AConnection = ADO.CreateADOConnection()

  'Specify the connection string

  DEVC11G =  "(DESCRIPTION = (ADDRESS = (PROTOCOL = TCP)(HOST = qm2ed-scan)(PORT = 1521)) (CONNECT_DATA = (SERVER = DEDICATED)(SERVICE_NAME = nysavvq)))"

  AConnection.ConnectionString = "Driver={};dbq=qck-scan:1521/DEVC11G;UId=aero_QA;Pwd=iosios;"

  'Suppress the login dialog box

  AConnection.LoginPrompt = false

  AConnection.Open()

    Set objRecordset = CreateObject("ADODB.Recordset")

    SqlQuery = "Select top 1 * from BLS_Users"

AConnection.Execute SqlQuery

end function