Conectar con Base de Datos de ORACLE.

03/04/2006 - 17:24 por Angel | Informe spam
Hola ...

Quiero conectar con una base de datos de Oracle.
Establezco la conexión :
' cadena de Conexion
Dim consql As New OracleConnection

consql.ConnectionString = "Data Source=SERVIDOR_TCP;Persist Security
Info=True;User ID=pepe;Password=pepe"

' Establecemos la conexion

consql.Open()

If consql.State = ConnectionState.Open Then

MessageBox.Show("Conexión Abierta ")

End If

Ahora lo que quiero es traer los datos de una tabla y nostrarlos en textbox.
Como se hace esto ?

Muchas gracias.
 

Leer las respuestas

#1 Harold
05/04/2006 - 22:23 | Informe spam
Espero que te sirva
string connString = "User id=User;Password=pass;Data Source=instancia";
string sql = "";

sql = "Select * ";
sql = sql + " from user ";
sql = sql + " where user_id = :pUser_Id ";
sql = sql + " and status = :pstatus ";

OracleConnection conn = new OracleConnection(connString);

OracleDataAdapter da = new OracleDataAdapter(sql,conn );

OracleParameter par = new OracleParameter();

par.OracleType = OracleType.VarChar;
par.ParameterName = "pUser_Id";
par.Value = "XX";

da.SelectCommand.CommandText = sql;
da.SelectCommand.Connection = conn;
da.SelectCommand.CommandType = CommandType.Text;
da.SelectCommand.Parameters.Add(par);

OracleParameter par1 = new OracleParameter();
par1.OracleType = OracleType.VarChar;
par1.ParameterName = "pstatus";
par1.Value = "A";

da.SelectCommand.Parameters.Add(par1);

DataSet ds = new DataSet();

da.Fill(ds,"Query");


foreach (DataRow row in ds.Tables["Query"].Rows)
{
this.textBox1.Text =
row[ds.Tables["Query"].Columns["User_id"]].ToString() ;
this.textBox1.Text = this.textBox1.Text +
row[ds.Tables["Query"].Columns["User_name1"]].ToString();
}


conn.Close();

"Angel" wrote:

Hola ...

Quiero conectar con una base de datos de Oracle.
Establezco la conexión :
' cadena de Conexion
Dim consql As New OracleConnection

consql.ConnectionString = "Data Source=SERVIDOR_TCP;Persist Security
Info=True;User ID=pepe;Password=pepe"

' Establecemos la conexion

consql.Open()

If consql.State = ConnectionState.Open Then

MessageBox.Show("Conexión Abierta ")

End If

Ahora lo que quiero es traer los datos de una tabla y nostrarlos en textbox.
Como se hace esto ?

Muchas gracias.



Preguntas similares