ok pues continuando con un problema en el cual estabamos tratando en el tema de un usuario compañero.. mejos me dispuse a crear este tema por separado para ver si ay respuesta grasias a jose luis por responder en dicho tema y aqui esperamos su ayuda
ok el detalle esta en que tengo una base de datos en sql server express 2005 y visual estudio 2005. estoy trabajando en un proyecto de un sitio web para una farmacia que tambien vende abarrotes ok. bueno siguiendo con lo del problema a continuacion tratare de explicar mi duda aber si hay alguin que me pueda ayudar
1.- lo primero ya tengo registros o datos en una tabla yamada articulos
2.- nesesito sacar solo un dato de dicha tabla que seria preciocomo lo ago asi:
Dim sSQL1 = "select PRECIO from ARTICULOS where (NOMBRE='" & NOMBRE & "')"
donde '" & NOMBRE & "' recibe parametros de un texbox1. que es el unico texbox que hay en esa pagina y es lo que identifica al producto que se encuentra en la base de datos.
3.- entonses si el producto esta, que me traiga el precio. ok asta ahi todo bien
4.- mi problema esta en que al momento de pasarlo a una tabla para despues mandarlo a un gridview porque en asp.net no hay datagridview o almenos yo no lo ubico me manda el primer dato pero si ago otra consulta me borra el primer dato y en el mismo renglon imprime el segundo dato impidiendo asi la suma de la columna precio ..
nota la tabla asi como el grid tiene 2 columnas la primera es nombre y la segunda es precio
aquí el código
Imports System.Data
Imports System.Data.SqlClient
Partial Class _Default
Inherits System.Web.UI.Page
Dim miDataTable As New DataTable
Dim i As Integer
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim NOMBRE As String 'CONDICIONES
Dim fecha1 As Date = DateTime.Now.ToString()
Dim FECHA As String
'Try
NOMBRE = TextBox1.Text
FECHA = fecha1.ToString("dd/MM/yyyy H:mm:ss")
Dim oConexion As New SqlConnection
oConexion = New SqlConnection
oConexion.ConnectionString = Application("ConnectionString")
Dim oDatasetL As New DataSet
Dim sSQL1 = "select PRECIO from ARTICULOS where (NOMBRE='" & NOMBRE & "')"
'CREAR(ADAPTADOR)
Dim oAdapterL1 = New SqlDataAdapter(sSQL1, oConexion)
Dim OCOMMBUILDER3 As New SqlCommandBuilder(oAdapterL1)
oDatasetL = New DataSet
oConexion.Open()
oAdapterL1.Fill(oDatasetL, "SSWEB001")
Dim dRow As DataRow
For i = 0 To GridView1.Rows.Count - 1
dRow = miDataTable.NewRow()
Dim row As GridViewRow = GridView1.Rows(i)
Dim valor1 As String = row.Cells(0).Text
Dim valor2 As String = row.Cells(1).Text
dRow("NOMBRE") = row.Cells(0).Text
dRow("PRECIO") = row.Cells(1).Text
miDataTable.Rows.Add(dRow)
Next
dRow = miDataTable.NewRow()
dRow("NOMBRE") = TextBox1.Text
dRow("PRECIO") = oDatasetL
miDataTable.Rows.Add(dRow)
'GridView1.DataSource = oDatasetL
' GridView1.DataBind()
'Dim renglon As DataRow
'TextBox1.Text = renglon("Nombre").ToString()
GridView1.DataSource = miDataTable
GridView1.DataBind()
oConexion.Close()
TextBox1.Text = ""
'TextBox2.Text = ""
'TextBox3.Text = ""
End Sub
de antemano muchas gracias y espero su ayuda