Devart Forums

Code: Select all

Dim oc As New OracleCommand("STA_INSERT", OracleConnection1)

        oc.CommandType = System.Data.CommandType.StoredProcedure
        Dim op As New OracleParameter("retval", OracleDbType.Integer)
        op.Direction = ParameterDirection.ReturnValue
        oc.Parameters.Add(op)
        oc.Parameters.Add(New OracleParameter("in_pidstate", 1))
        oc.Parameters.Add(New OracleParameter("in_pidtyp", 1))
        oc.Parameters.Add(New OracleParameter("in_logstate", 1))
        oc.Parameters.Add(New OracleParameter("eqid", 1))
        OracleConnection1.Open()
        Dim ret As Integer
        Try
            oc.ExecuteNonQuery()
            ret = oc.Parameters(0).Value

        Catch ex As Exception
        Finally
            OracleConnection1.Close()
        End Try

Code: Select all

Pooling=true;Max Pool Size=3;

Code: Select all

Pooling=false;Max Pool Size=3;

Code: Select all