単純に接続後DataGridViewにクエリを表示
NuGetを使いOracle.ManagedDataAccessを導入
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 |
Imports System.Data.SqlClient Imports Oracle.ManagedDataAccess.Client Public Class Form1 'SQLサーバ用 Private Sub btnShow_Click(sender As Object, e As EventArgs) Handles btnShow.Click Dim cnStr As String = "Data Source=localhost\sqlexpress;Initial Catalog=SMS01;Persist Security Info=True;User ID=sa;Password=hogehoge" Dim sql As String = "select * from T分類マスタ" Dim dt As New DataTable Dim da As New SqlDataAdapter(sql, cnStr) Try da.Fill(dt) DataGridView1.DataSource = dt Catch ex As Exception MessageBox.Show(ex.ToString) End Try End Sub 'ORACLE用 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click Dim cnStr As String = "DATA SOURCE=XE;PASSWORD=hogehoge;PERSIST SECURITY INFO=True;USER ID=SHUKEI" Dim sql As String = "select * from EMP" Dim dt As New DataTable Dim da As New OracleDataAdapter(sql, cnStr) Try da.Fill(dt) DataGridView1.DataSource = dt Catch ex As Exception MessageBox.Show(ex.ToString) End Try End Sub End Class |
こちらがSQLServer
こちらがOracleから
コメント