Ver Mensaje Individual
  #1 (permalink)  
Antiguo 10/03/2005, 08:47
davidtorrejon
 
Fecha de Ingreso: marzo-2005
Mensajes: 94
Antigüedad: 19 años, 3 meses
Puntos: 0
insertar fila en el origen de datos

Hola, estoy haciendo un proyecto el el cual los usuarios deben introducir unos datos para registrarse. Esos datos quiero que se graben en la base de datos que uso ( Access ).
He puesto este codigo pero me da error:
Dim conn As New OleDbConnection
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=c:\usuarios.mdb"
Dim da As New OleDbDataAdapter
da.SelectCommand = New OleDbCommand("select * from clientes", conn)
Dim builder As New OleDbCommandBuilder(da)
Dim ds As New DataSet("clientes")
Dim tabla1 As DataTable
Dim fila As DataRow
conn.Open()

da.Fill(ds, "clientes")
tabla1 = ds.Tables("clientes")
fila = tabla1.NewRow()
fila("id") = id + 1
fila("nombre") = Me.nombre.Text
fila("papellido") = Me.papellido.Text
fila("sapellido") = Me.sapellido.Text
fila("email") = Me.email.Text
fila("clave") = Me.clave.Text
fila("direccion") = Me.direccion.Text
fila("telefono") = Me.telefono.Text
fila("edad") = CType(Me.edad.Text, Integer)
fila("dni") = Me.dni.Text
tabla1.Rows.Add(fila)

da.Update(ds, "clientes")
conn.Close()
¿es posible que haya que poner una sentencia sql insert into.... en lugar de la select?¿Como seria esa sentencia?
muchas gracias por vuestra ayuda