Parameters Property (OracleCommand)
Property Value
The parameters of a SQL statement or a stored procedure. The default value is an empty collection.
The following example creates a
OracleConnection,
OracleCommand, fills its parameters and displays them. An UPDATE statement with the parameters involved is executed then.
static void CreateCommand(OracleConnection myConnection, string mySelectQuery, OracleParameter[] myParamArray)
{
OracleCommand myCommand = new OracleCommand(mySelectQuery, myConnection);
string myMessage = "";
for (int i = 0; i < myParamArray.Length; i++)
{
myCommand.Parameters.Add(myParamArray[i]);
myMessage += myCommand.Parameters[i].ToString() + "\n";
}
Console.Write(myMessage);
try
{
myConnection.Open();
myCommand.ExecuteNonQuery();
}
finally
{
myConnection.Close();
}
}
static void Main(string[] args)
{
OracleParameter[] myParams = new OracleParameter[]
{
new OracleParameter("DeptNo", 10),
new OracleParameter("DName", "COUNTING")
};
OracleConnection myConnection1 = new OracleConnection(
"User Id=Scott;Password=tiger;Data Source=Ora;");
CreateCommand(myConnection1,"UPDATE Test.Dept SET DName = :DName WHERE DeptNo = :DeptNo",myParams);
}
Public Sub CreateCommand(ByVal myConnection As Devart.Data.Oracle.OracleConnection, _
ByVal mySelectQuery As String, ByVal myParamArray() As Devart.Data.Oracle.OracleParameter)
Dim myCommand As New Devart.Data.Oracle.OracleCommand(mySelectQuery, myConnection)
Dim myMessage As String = ""
Dim i As Integer
For i = 0 To (myParamArray.Length - 1)
myCommand.Parameters.Add(myParamArray(i))
myMessage = String.Concat(myMessage, " ", myCommand.Parameters(i).ToString())
Next
Console.WriteLine(myMessage)
Try
myConnection.Open()
myCommand.ExecuteNonQuery()
Finally
myConnection.Close()
End Try
End Sub
Sub Main()
Dim myP1 As New Devart.Data.Oracle.OracleParameter
myP1.ParameterName = "DeptNo"
myP1.Value = 10
Dim myP2 As New Devart.Data.Oracle.OracleParameter
myP2.ParameterName = "DName"
myP2.Value = "ACCOUNTING"
Dim myParams(1) As Devart.Data.Oracle.OracleParameter
myParams(0) = myP1
myParams(1) = myP2
Dim myConnection1 As New Devart.Data.Oracle.OracleConnection( _
"User Id=Scott;Password=tiger;Data Source=Ora;")
CreateCommand(myConnection1, "UPDATE Test.Dept SET DName = :DName WHERE DeptNo = :DeptNo", myParams)
End Sub