Ver Mensaje Individual
  #10 (permalink)  
Antiguo 01/06/2011, 08:06
cRz87
Invitado
 
Mensajes: n/a
Puntos:
Respuesta: ¿como agregar datos a un datagridview?

Si quisiera agregar varios textbox a una tabla, como lo podría hacer?

Yo lo tengo así, lógicamente está mal:

Dim tabla As New DataTable
Dim cmd As New OleDb.OleDbCommand("INSERT INTO peticio VALUES('" & CInt(Lnum.Text) & "','" & txtcodi1.Text & "','" & Cbproveidor.Text & " ','" & Ldata.Text & "','" & Tbq1.Text & " ','" & txt1.Text & "','" & Tbunitat1.Text & "','" & Tbpreu1.Text & "','" & Tbtotal.Text & "','Enviat')", conex)
conex.Open()
cmd.ExecuteNonQuery()
tabla.Columns.Add("quantitat")
tabla.Columns.Add("codi_menjar")
tabla.Columns.Add("descripcio")
tabla.Columns.Add("preu_producte")

tabla.Rows.Add(Tbq1.Text, txtcodi1.Text, txt1.Text, Tbunitat1.Text)
tabla.Rows.Add(Tbq2.Text, Txtcodi2.Text, txt2.Text, Tbunitat2.Text)
tabla.Rows.Add(Tbq3.Text, Txtcodi3.Text, txt3.Text, Tbunitat3.Text)
tabla.Rows.Add(Tbq4.Text, Txtcodi4.Text, txt4.Text, Tbunitat4.Text)
tabla.Rows.Add(Tbq5.Text, Txtcodi5.Text, txt5.Text, Tbunitat5.Text)
tabla.Rows.Add(Tbq6.Text, Txtcodi6.Text, txt6.Text, Tbunitat6.Text)
tabla.Rows.Add(Tbq7.Text, Txtcodi7.Text, txt7.Text, Tbunitat7.Text)
tabla.Rows.Add(Tbq8.Text, Txtcodi8.Text, txt8.Text, Tbunitat8.Text)
conex.Close()

MsgBox("Petició d'stock registrat a la Base de Dades")

Solo se me inserta la consulta INSERT lo demas no hace nada...