tengo un problema con mi datagridview

[rikimm]

porque no me agarra este codigo

Código Vb2008:

Dim x As String
        x = TextBox1.Text
        Dim cnn As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\riki\Documents\Visual Studio 2008\Projects\SistemaDP\SistemaDP\bin\Debug\doggyp.mdb")
        Dim da As New OleDbDataAdapter("SELECT * FROM Entradas WHERE Direccion=" + x + "", cnn)
        Dim ds As New DataSet
 
       
        da.Fill(ds)
        DataGridView1.DataSource = ds.Tables(0)
 

me manda este error "No se han especificado valores para algunos de los parámetros requeridos."

[Darkavender]

LaConexion

Declaraciones

Código vb:

Dim Adp As SqlDataAdapter
Dim CDataset As DataSet
 

El DataAdapter

Código vb:

Adp = New SqlDataAdapter("SELECT * FROM TABLA", CNN)
 

El Dataset

Código vb:

CDataset = New DataSet()
 

Vaciando DataAdapter en Dataset

Código vb:

CNN.Open()
Adp.Fill(CDataset, "DATASET")
CNN.Close()
 

Adicionando Dataset a DataGridView

Código vb:

Me.DataGridView.DataSource = CDataset
Me.DataGridView.DataMember = "DATASET"
 

Saludos!!!

[rikimm]

El codigo me funciona bien y to cuando en el selec solo porngo los datos asi general me refiero sin ocupar la variable x. Pero cuando pongo la variable x para poner ahi los datos que voy a buscar (o datos especificos)y lo muestre en el datagridvioew ahi me manda el error

[Ka0stj]

Hola rikimm

Lo que pasa es que la concatenación se hace de la siguiente manera:

Código vb:

Dim da As New OleDbDataAdapter("SELECT * FROM Entradas WHERE Direccion= " & x , cnn)
 

Pruebalo y cuentas. Saludos!

[rikimm]

me sigue mandando el mismo error o ustedes como haria algo parecido a lo mio que agarro datos de la base de datos y mostrarlo en datagridview porque quiero hacer dos uno que cuando se carge la form luego luego manda los registro de un dia despues de la fecha actual y otro donde pueda consultar ecriviendo por medio de una bd todo esto con access como bd

[TheAlkaline]

tu variable x es cadena?, entonces al hacer consulta en SQL debe ir entre ' '

Dim da As New OleDbDataAdapter("SELECT * FROM Entradas WHERE Direccion='" & x & "'" , cnn)

[Ka0stj]

Cierto me falto diferenciarte si es entero o cadena:

Para entero:

Código vb:

Dim da As New OleDbDataAdapter("SELECT * FROM Entradas WHERE Direccion= " & x , cnn)
 

Para Cadena:

Código vb:

Dim da As New OleDbDataAdapter("SELECT * FROM Entradas WHERE Direccion= '" & x  & "'", cnn)
 

También te pongo la método Sub que utilizo yo:

Código vb:

Public Sub Cargar_DatagridView(ByVal Instruccion_Sql As String, ByVal dgv As DataGridView)
 
        objConn = New SqlConnection(miconexion.StrConexion)
 
        Dim MiDataReader As System.Data.SqlClient.SqlDataReader
 
        Dim MiDataTable As New DataTable
 
        Try
            'Abro la Conexión
            objConn.Open()
 
            Dim sql As System.Data.SqlClient.SqlCommand = New SqlCommand(Instruccion_Sql, objConn)
 
            MiDataReader = sql.ExecuteReader
 
            MiDataTable.Load(MiDataReader)
 
            dgv.DataSource = MiDataTable
 
            'Cierro la Conexión
            objConn.Close()
 
        Catch ex As Exception
            MsgBox(ex.Message, MsgBoxStyle.Critical, "Error")
            objConn.Close()
        End Try
 
    End Sub
 

Saludos!

[rikimm]

de lujo compañeros ahora si me agarro ahora aver si me aclaran esto el simbolo: & se usa para vb me imagino verdad y en c# seria con el sigo de de +

[Ka0stj]

En efecto, para Visual Basic es & y para C# igual que Java +.