visual 2008 pasar datos a una base de datos

[jordift]

HOla, gracias a todo aquel que intente ayudarme.

En visual studio 2008

Un form con:
- textbox1 para NOMBRE
- textbox2 para APELLIDO
-dos ChekBox A,B,C

Y la base de datos ( en ACCESS) contiene los campos

-ID (autonumerico)
-NOMBRE (Texto)
-APELLIDO (Texto)
- A (si/no)
- B (si/no)
- C (si/no)

Quisiera que una vez rellenado todos los datos se habilite el boton GUARDAR y pase los datos a la base de datos.
Seria necesario hacerlo de una manera que cuando empaquete el programa, no haya que hacer nada, solo instalarlo y que funcione en cualquier maquina.



Espero que alguien pueda ayudarme. Gracias.

[jordift]

************

[Peterpay]

Que lenguaje c# o vb.net ?

[jordift]

Iniciado por Peterpay

Que lenguaje c# o vb.net ?

vb.net

Gracias.

[jordift]

porfavor ayudenme que o hago esto o me despiden!! :(

[Malenko]

Mirate información de ADO.NET.

[jordift]

Iniciado por Malenko

Mirate información de ADO.NET.

He mirado montones de tutoriales, y manuales, pero no me aclaro, sobretodo porque no hay nada en visual 2008 y es diferente, o eso me parece a mi ..

[jcalcalde]

jordift,

tu ejemplo es muy generico, hay muchas formas de hacerlo, te tiro una idea como para que sepas por donde empezar, espero no haberme olvidado de nada

Código:

Dim cnn_gestion As New OleDbConnection(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=M:\xxxxx\base.mdb)

If cnn_gestion.State = ConnectionState.Closed Then
      cnn_gestion.Open()
End If

dim strsql as string

strsql = "insert into nombretabla (nombre,apellido,a,b,c,) "
strsql = strsql & "values ('"textbox1.text & "', "
strsql = strsql & "'"textbox2.text & "', "
strsql = strsql & "'"valorcheqboxa & "', "
strsql = strsql & "'"valorcheqboxb & "', "
strsql = strsql & "'"valorcheqboxc & "',) "

Dim com_numero As New OleDbCommand(strsql, cnn_gestion)
Dim rst_numero As OleDbDataReader

Try
   com_numero.CommandText = strsql
   msg = com_numero.ExecuteNonQuery()
Catch ex As Exception

   MsgBox(ex.Message & " " & ex.Source, MsgBoxStyle.Critical)

End Try

Saludos

[jordift]

Gracias, pero no es lo que estaba buscando, se agradece la intecion, mil gracias.

[Malenko]

Iniciado por jordift

He mirado montones de tutoriales, y manuales, pero no me aclaro, sobretodo porque no hay nada en visual 2008 y es diferente, o eso me parece a mi ..

Te lo parece, no es diferente. Esos métodos son idénticos desde la versión 1.0 del Framework. Te has mirado por casualidad la ayuda de VS2008 junto con documentación de ADO.NET?

jcalcalde te lo ha dado ya casi todo hecho. Que más quieres? O mejor dicho, que necesitas exactamente que no sepas hacer?

[jordift]

Iniciado por Malenko

Te lo parece, no es diferente. Esos métodos son idénticos desde la versión 1.0 del Framework. Te has mirado por casualidad la ayuda de VS2008 junto con documentación de ADO.NET?

jcalcalde te lo ha dado ya casi todo hecho. Que más quieres? O mejor dicho, que necesitas exactamente que no sepas hacer?

Pues necestito que una vez rellenado los campos de textbox, apretar un boton "guardar" y que lo guarde en la base de datos.

Y si he mirado la ayuda de visual y de medio google, pero soy muy malo, no soy programador, pero me a tocado hacer esto e intento buscarme la vida com puedo...

Gracias.

[jordift]

Iniciado por jcalcalde

jordift,

tu ejemplo es muy generico, hay muchas formas de hacerlo, te tiro una idea como para que sepas por donde empezar, espero no haberme olvidado de nada

Código:

Dim cnn_gestion As New OleDbConnection(Provider=Microsoft.Jet.OLEDB.4.0;Data Source=M:\xxxxx\base.mdb)

If cnn_gestion.State = ConnectionState.Closed Then
      cnn_gestion.Open()
End If

dim strsql as string

strsql = "insert into nombretabla (nombre,apellido,a,b,c,) "
strsql = strsql & "values ('"textbox1.text & "', "
strsql = strsql & "'"textbox2.text & "', "
strsql = strsql & "'"valorcheqboxa & "', "
strsql = strsql & "'"valorcheqboxb & "', "
strsql = strsql & "'"valorcheqboxc & "',) "

Dim com_numero As New OleDbCommand(strsql, cnn_gestion)
Dim rst_numero As OleDbDataReader

Try
   com_numero.CommandText = strsql
   msg = com_numero.ExecuteNonQuery()
Catch ex As Exception

   MsgBox(ex.Message & " " & ex.Source, MsgBoxStyle.Critical)

End Try

Saludos

Lo he probado varias veces, pero no logro que funcione...

[jordift]

si alguien puede enviarme un ejemplo, que me envie un privado para enviarlo mi mail. :(

[Malenko]

Y porque no logras que funcione? Que mensaje de error te sale?