query to add to a listbox

[Mike D]

I am trying to add results of a query to a listbox. I have it working when
the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)

[Chris Mayers]

You need to use a DataReader which works a little like a recordset.

This is C#, but hopefully you should get the gist...

OleDbDataReader dr = OracleCommand1.ExecuteReader();
while (dr.Read());
{
me.cmbBox.Items.Add(dr[0].ToString());
}
dr.Close();

Cheers,

Chris.

"Mike D" <Mi***@discussions.microsoft.com> wrote in message
news:0C**********************************@microsof t.com...

I am trying to add results of a query to a listbox. I have it working when the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)

[Chris Mayers]

You need to use a DataReader which works a little like a recordset.

This is C#, but hopefully you should get the gist...

OleDbDataReader dr = OracleCommand1.ExecuteReader();
while (dr.Read());
{
me.cmbBox.Items.Add(dr[0].ToString());
}
dr.Close();

Cheers,

Chris.

"Mike D" <Mi***@discussions.microsoft.com> wrote in message
news:0C**********************************@microsof t.com...

I am trying to add results of a query to a listbox. I have it working when the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)

[Mike D]

Thanks for the reply. I get the gist just not the syntax.

If I add

Dim myReader As OracleDataReader = OracleCommand1.ExecuteReader()

I get a:
Type 'OracleDataReader' is not defined error??

Mike

"Chris Mayers" wrote:

You need to use a DataReader which works a little like a recordset.

This is C#, but hopefully you should get the gist...

OleDbDataReader dr = OracleCommand1.ExecuteReader();
while (dr.Read());
{
me.cmbBox.Items.Add(dr[0].ToString());
}
dr.Close();

Cheers,

Chris.

"Mike D" <Mi***@discussions.microsoft.com> wrote in message
news:0C**********************************@microsof t.com...

I am trying to add results of a query to a listbox. I have it working

when

the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)

[Mike D]

Thanks for the reply. I get the gist just not the syntax.

If I add

Dim myReader As OracleDataReader = OracleCommand1.ExecuteReader()

I get a:
Type 'OracleDataReader' is not defined error??

Mike

"Chris Mayers" wrote:

You need to use a DataReader which works a little like a recordset.

This is C#, but hopefully you should get the gist...

OleDbDataReader dr = OracleCommand1.ExecuteReader();
while (dr.Read());
{
me.cmbBox.Items.Add(dr[0].ToString());
}
dr.Close();

Cheers,

Chris.

"Mike D" <Mi***@discussions.microsoft.com> wrote in message
news:0C**********************************@microsof t.com...

I am trying to add results of a query to a listbox. I have it working

when

the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)

[Mike D]

Got it.

Thanks for the help
Mike

"Chris Mayers" wrote:

You need to use a DataReader which works a little like a recordset.

This is C#, but hopefully you should get the gist...

OleDbDataReader dr = OracleCommand1.ExecuteReader();
while (dr.Read());
{
me.cmbBox.Items.Add(dr[0].ToString());
}
dr.Close();

Cheers,

Chris.

"Mike D" <Mi***@discussions.microsoft.com> wrote in message
news:0C**********************************@microsof t.com...

I am trying to add results of a query to a listbox. I have it working

when

the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)

[Mike D]

Got it.

Thanks for the help
Mike

"Chris Mayers" wrote:

You need to use a DataReader which works a little like a recordset.

This is C#, but hopefully you should get the gist...

OleDbDataReader dr = OracleCommand1.ExecuteReader();
while (dr.Read());
{
me.cmbBox.Items.Add(dr[0].ToString());
}
dr.Close();

Cheers,

Chris.

"Mike D" <Mi***@discussions.microsoft.com> wrote in message
news:0C**********************************@microsof t.com...

I am trying to add results of a query to a listbox. I have it working

when

the query returns one record but I need more. I am used to working with
recordsets but I'm lost here in .net.

This is what I have but the query will return 2 SerialNumbers

Dim str As String

Me.OracleCommand1.CommandText = "SELECT SerialNumber FROM TAB_TEST
WHERE (ACTIVE = 'Y')"

Dim RS As Data.DataColumnCollection
str = OracleCommand1.ExecuteScalar
Me.cmbBox.Items.Add(str)