Oracleのパラメータクエリを利用する方法です。
System.Data.OracleClientを利用するので、参照設定を行ってください。
Oracleの場合、パラメータ変数を識別するには、:(コロン)を利用します。
Imports System.Data.OracleClient
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles Button1.Click
Dim builder As New OracleConnectionStringBuilder
''ORACLE接続文字列
With builder
.DataSource = "hogehoge"
.UserID = "scott"
.Password = "tiger"
End With
Using con As New OracleConnection(builder.ConnectionString)
con.Open()
Using cmd As New OracleCommand
With cmd
.Connection = con
.CommandType = CommandType.Text
.CommandText = "SELECT * FROM EMP WHERE EMPNO = :EMPNO"
.Parameters.Add(New OracleParameter("EMPNO", _
OracleType.Number)).Value = 7782
Dim dr As OracleDataReader = .ExecuteReader
If dr.HasRows Then
While dr.Read
Debug.WriteLine(dr("JOB").ToString)
End While
End If
End With
End Using
End Using
End Sub
End Class
|
