Oracle and VB

How will I connect to Oracle Database using VB ? i am using:

Set dbsPubs = wrkJet.OpenDatabase(pdedb, _
dbDriverNoPrompt, True, _
"ODBC;DATABASE=pubs;UID=sa;PWD=;DSN=pdedb")

i am not sure what i am doing wrong, HELP


Farhan Shah
Bosch Co.

NO, DON'T USE THAT IS WRONG, HERE IS THE CODE TO START A SESSION IN ORACLE

YOU MUST PUT THIS IN A MODULE

Global Conn As New rdoConnection
Global oConn As New rdoConnection
Global gsConnectString As String
Global gsUserName As String
Global gsPassword As String
Global DSN As String

Public Sub close_session()

Conn.Close

End Sub

Public Sub Session()
Dim sconnect As String
On Error GoTo errorlabel

sconnect = "UID=" & gsUserName & ";PWD=" & gsPassword & _
";DSN=" & DSN & ";"

With Conn
.Connect = sconnect
.CursorDriver = rdUseOdbc
.EstablishConnection (rdDriverNoPrompt)
End With

frmLogin.Hide

Exit Sub

errorlabel:
msgbox "Error starting a session, call IT Department",vbInformation, "System Message"
exit sub

End Sub

THEN IN THE EVENT YOU LIKE THE MOST (MOST OF THE TIME AFTER THE LOGIN SCREEN) CALL THE SUB SESSION, THEN YOU WILL HAVE A SESSION IN ORACLE, BUT REMEMBER THIS JUST START A SESSION, YOU STILL NEED CODE TO DO QUERIES, ETC.
REGARDS