Visual Basic

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click<br />
Dim ctoracleConnection As OleDbConnection<br />
Dim ctoracleCommand As OleDbCommand<br />
Dim dataRow As OleDbDataReader<br />
'MSDORA is the provider when working with Oracle<br />
ctoracleConnection = New OleDbConnection("Provider=MSDAORA.1;User ID=oracle username;password=orac le password; data source=ctoracle")<br />
'opens the connection<br />
ctoracleConnection.Open()<br />
'executes the command and assigns it to the connection<br />
ctoracleCommand = New OleDbCommand("Select EName from emp", ctoracleConnection)<br />
dataRow = ctoracleCommand.ExecuteReader()<br />
While dataRow.Read()<br />
'displays data from the table<br />
MessageBox.Show("Employee Name" & " " & dataRow(0))<br />
End While<br />
dataRow.Close()<br />
ctoracleConnection.Close()<br />
End Sub<br />
End Class<br />
_______________________________________________________________________________________________________________________________

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click<br />
       Dim derbyConnection As OleDbConnection<br />
       Dim derbyCommand As OleDbCommand<br />
       Dim dataRow As OleDbDataReader<br />
       'MSDORA is the provider when working with Oracle<br />
       derbyConnection = New OleDbConnection("Provider=MSDAORA.1;User ID=oracle ken;password=tigger; data source=derby.com")<br />
       'opens the connection<br />
       derbyConnection.Open()       '''''the code falls over here<br />
       'executes the command and assigns it to the connection<br />
       derbyCommand = New OleDbCommand("Select EName from emp", derbyConnection)<br />
       dataRow = derbyCommand.ExecuteReader()<br />
       While dataRow.Read()<br />
           'displays data from the table<br />
           MessageBox.Show("Employee Name" & " " & dataRow(0))<br />
       End While<br />
       dataRow.Close()<br />
       derbyConnection.Close()<br />
   End Sub<br />

kendo17 wrote:

when opening server explorer should the oracle database not be displayed there for me to point to and then test. As the database is not showing there.

Dave Kreskowiak wrote:

VB6 6 years ago.