select textbox.text

[Ruben]

I have this code, I need see in textbox.text all my information, how I do that

Function Consultas(ByVal usuario As String) As System.Data.Dat aSet
Dim connectionStrin g As String = "server='Sistem as'; user id='sa';
password=''; database='Siste mas'"
Dim dbConnection As System.Data.IDb Connection = New
System.Data.Sql Client.SqlConne ction(connectio nString)

Dim queryString As String = "SELECT [ImvenrtarioComp usSQL].* FROM
[ImvenrtarioComp usSQL] WHERE ([ImvenrtarioCo"& _
"mpusSQL].[Usuario] = @Usuario)"
Dim dbCommand As System.Data.IDb Command = New
System.Data.Sql Client.SqlComma nd
dbCommand.Comma ndText = queryString
dbCommand.Conne ction = dbConnection

Dim dbParam_usuario As System.Data.IDa taParameter = New
System.Data.Sql Client.SqlParam eter
dbParam_usuario .ParameterName = "@Usuario"
dbParam_usuario .Value = usuario
dbParam_usuario .DbType = System.Data.DbT ype.String
dbCommand.Param eters.Add(dbPar am_usuario)

Dim dataAdapter As System.Data.IDb DataAdapter = New
System.Data.Sql Client.SqlDataA dapter
dataAdapter.Sel ectCommand = dbCommand
Dim dataSet As System.Data.Dat aSet = New System.Data.Dat aSet
dataAdapter.Fil l(dataSet)
Return dataSet

[Brock Allen]

So access dataSet.Tables[0] and iterate over the Rows property and get the
data you need/want. Once you have that data, you can put it into a TextBox.
I'm not sure exactly what you want, but here's a sample that might help:

foreach (DataRow row in dataSet.Tables[0])
{
string val = (string)row["MyStringColumn "];
MyTextBox.Text += val + Environment.New Line; // append this in my multiline
TextBox
}

-Brock
DevelopMentor
http://staff.develop.com/ballen

I have this code, I need see in textbox.text all my information, how I
do that

Function Consultas(ByVal usuario As String) As System.Data.Dat aSet
Dim connectionStrin g As String = "server='Sistem as'; user
id='sa';
password=''; database='Siste mas'"
Dim dbConnection As System.Data.IDb Connection = New
System.Data.Sql Client.SqlConne ction(connectio nString)
Dim queryString As String = "SELECT [ImvenrtarioComp usSQL].*
FROM
[ImvenrtarioComp usSQL] WHERE ([ImvenrtarioCo"& _
"mpusSQL].[Usuario] = @Usuario)"
Dim dbCommand As System.Data.IDb Command = New
System.Data.Sql Client.SqlComma nd
dbCommand.Comma ndText = queryString
dbCommand.Conne ction = dbConnection
Dim dbParam_usuario As System.Data.IDa taParameter = New
System.Data.Sql Client.SqlParam eter
dbParam_usuario .ParameterName = "@Usuario"
dbParam_usuario .Value = usuario
dbParam_usuario .DbType = System.Data.DbT ype.String
dbCommand.Param eters.Add(dbPar am_usuario)
Dim dataAdapter As System.Data.IDb DataAdapter = New
System.Data.Sql Client.SqlDataA dapter
dataAdapter.Sel ectCommand = dbCommand
Dim dataSet As System.Data.Dat aSet = New System.Data.Dat aSet
dataAdapter.Fil l(dataSet)
Return dataSet

[Ruben]

I nedd to put in textbox1.text=u suario. textbox2.text=i p etc. using the code
below, thank for you answer.

"Brock Allen" wrote:

So access dataSet.Tables[0] and iterate over the Rows property and get the
data you need/want. Once you have that data, you can put it into a TextBox.
I'm not sure exactly what you want, but here's a sample that might help:

foreach (DataRow row in dataSet.Tables[0])
{
string val = (string)row["MyStringColumn "];
MyTextBox.Text += val + Environment.New Line; // append this in my multiline
TextBox
}

-Brock
DevelopMentor
http://staff.develop.com/ballen

I have this code, I need see in textbox.text all my information, how I
do that

Function Consultas(ByVal usuario As String) As System.Data.Dat aSet
Dim connectionStrin g As String = "server='Sistem as'; user
id='sa';
password=''; database='Siste mas'"
Dim dbConnection As System.Data.IDb Connection = New
System.Data.Sql Client.SqlConne ction(connectio nString)
Dim queryString As String = "SELECT [ImvenrtarioComp usSQL].*
FROM
[ImvenrtarioComp usSQL] WHERE ([ImvenrtarioCo"& _
"mpusSQL].[Usuario] = @Usuario)"
Dim dbCommand As System.Data.IDb Command = New
System.Data.Sql Client.SqlComma nd
dbCommand.Comma ndText = queryString
dbCommand.Conne ction = dbConnection
Dim dbParam_usuario As System.Data.IDa taParameter = New
System.Data.Sql Client.SqlParam eter
dbParam_usuario .ParameterName = "@Usuario"
dbParam_usuario .Value = usuario
dbParam_usuario .DbType = System.Data.DbT ype.String
dbCommand.Param eters.Add(dbPar am_usuario)
Dim dataAdapter As System.Data.IDb DataAdapter = New
System.Data.Sql Client.SqlDataA dapter
dataAdapter.Sel ectCommand = dbCommand
Dim dataSet As System.Data.Dat aSet = New System.Data.Dat aSet
dataAdapter.Fil l(dataSet)
Return dataSet

[Ruben]

I ned to put textbox1.text=u suario, textbox2,text=i p, etc. thank for you
answer.

"Brock Allen" wrote:

So access dataSet.Tables[0] and iterate over the Rows property and get the
data you need/want. Once you have that data, you can put it into a TextBox.
I'm not sure exactly what you want, but here's a sample that might help:

foreach (DataRow row in dataSet.Tables[0])
{
string val = (string)row["MyStringColumn "];
MyTextBox.Text += val + Environment.New Line; // append this in my multiline
TextBox
}

-Brock
DevelopMentor
http://staff.develop.com/ballen

I have this code, I need see in textbox.text all my information, how I
do that

Function Consultas(ByVal usuario As String) As System.Data.Dat aSet
Dim connectionStrin g As String = "server='Sistem as'; user
id='sa';
password=''; database='Siste mas'"
Dim dbConnection As System.Data.IDb Connection = New
System.Data.Sql Client.SqlConne ction(connectio nString)
Dim queryString As String = "SELECT [ImvenrtarioComp usSQL].*
FROM
[ImvenrtarioComp usSQL] WHERE ([ImvenrtarioCo"& _
"mpusSQL].[Usuario] = @Usuario)"
Dim dbCommand As System.Data.IDb Command = New
System.Data.Sql Client.SqlComma nd
dbCommand.Comma ndText = queryString
dbCommand.Conne ction = dbConnection
Dim dbParam_usuario As System.Data.IDa taParameter = New
System.Data.Sql Client.SqlParam eter
dbParam_usuario .ParameterName = "@Usuario"
dbParam_usuario .Value = usuario
dbParam_usuario .DbType = System.Data.DbT ype.String
dbCommand.Param eters.Add(dbPar am_usuario)
Dim dataAdapter As System.Data.IDb DataAdapter = New
System.Data.Sql Client.SqlDataA dapter
dataAdapter.Sel ectCommand = dbCommand
Dim dataSet As System.Data.Dat aSet = New System.Data.Dat aSet
dataAdapter.Fil l(dataSet)
Return dataSet