Desde VB, guardar datos en B.D. Access

hola!!!! si trabajas con visual studio 6.0 te mando este codigo para que guardes en acces(que debe de estar guardado como .mdb)
Private Sub Button2_Click()
tabpremio2a.index = "IndxClaveID_EMPLEA" '**//GUARDA LA INFORMACION con el nombre de la tabla a trabajar //**
tabpremio2a.seek("=", TextBox3)

If tabpremio2a.NoMantch Then
tabpremio2a.AddNew()

tabpremio2a.fields("CONPU") = TextBox10
tabpremio2a.fields("CRITERIO") = TextBox11
tabpremio2a.fields("CALTRAB") = TextBox12
tabpremio2a.fields("TECORGTAB") = TextBox13
tabpremio2a.fields("NECSUPER") = TextBox14
tabpremio2a.fields("CAPRECIB") = TextBox15
tabpremio2a.fields("INICIATIVA") = TextBox16
tabpremio2a.fields("COLABYDISC") = TextBox17
tabpremio2a.fields("RESPYDISCI") = TextBox18
tabpremio2a.fields("TRABEQUP") = TextBox19
tabpremio2a.fields("RELINTERPRE") = TextBox20
tabpremio2a.fields("PUNTYASIST") = TextBox21
tabpremio2a.fields("TOTAL") = TextBox22

End If
End Sub

****este codigo es la direccion que debes de tener para poder abrir tu bd en acces; y listo lo corres y ya!!!!!
Private Sub form_activate()
set dbbase = ("g:\PRD80110.mdb") '**//abre la direccion donde se encuentra la bd//**
set tabPRD80110 = dbbase.OpenRecordset("PRD80110")
End Sub

DEBES DE USAR UN DATAGRID Y UN ADOCC Y ENLAZAR LAS CAJAS DE TEXTO CON EL ADDOC Y LISTO

Hola

aca te mando una pagina, espero que te sirva

http://www.lawebdelprogramador.com/codigo/codigo.php?idp=369&id=71&texto=PHP

No hay un único código para hacer eso. Mejor lee un manual de programación de vb con base de datos por medio de ADO, para ir teniendo una idea general de como funciona todo y ya luego no tendrás problemas para programar tus formularios ABM.

En el boton de comando "Guardar" o como le quieras llamar pon el codigo siguiente:
Private Sub Agregarcmd_Click()
On Error GoTo err_Agregarcmd_Click
Dim db As DAO.Database
Dim rst As DAO.Recordset

Set db = CurrentDb()

Set rst = db.OpenRecordset("tbl_requisicion")

If MsgBox("¿Están correctos los datos a guardar?", vbQuestion + vbYesNo, "mensaje") = vbYes Then

CANCEL = True


' add a new record
rst.AddNew
rst("fecha_captura") = Me!fecha_captura
rst("code_vendor") = Me!code_vendor
rst("code_item") = Me!code_item
rst("code_itemalt") = Me!code_itemalt
rst("description_item") = Me!description_item
rst("um") = Me!um
rst("familia") = Me!familia
'rst("Precio") = Me!Precio
rst("Factura") = Me!factura
rst("cantidad") = Me!Cantidad
rst("precio_fabrica") = Me!precio_fabrica
rst("descuento_tienda") = Me!descuento_tienda
rst("costo_compra_tienda") = Me!costo_compra_tienda
rst("margen_ganancia") = Me!margen_ganancia
rst("precio_regular") = Me!precio_regular
rst("iva") = Me!IVA
rst("precio_contado") = Me!precio_contado
rst("precio_separado") = Me!precio_separado
rst("utilidad_pza_ctdo") = Me!utilidad_pza_ctdo
rst("marca") = Me!marca
rst("color") = Me!color
rst("clase") = Me!clase
rst.update

requisicionlst.Requery

MsgBox "Nuevo registro: " & Me!code_item & " se agregó correctamente.", vbExclamation, "mensaje"

' borra los datos escritos en el formulario
me!factura=null
Me!code_vendor = Null
Me!code_item = Null
Me!code_itemalt = Null
Me!description_item = Null
Me!um = Null
Me!familia = Null
'Me!factura = Null
Me!Cantidad = Null
Me!precio_fabrica = Null
Me!descuento_tienda = Null
Me!costo_compra_tienda = Null
Me!margen_ganancia = Null
Me!precio_regular = Null
Me!IVA = Null
Me!precio_contado = Null
Me!precio_separado = Null
Me!utilidad_pza_ctdo = Null
'Me!fecha_captura = Null
Me!marca = Null
Me!color = Null
Me!clase = Null
Me!precio_base = Null

[factura].SetFocus
End If

exit_Agregarcmd_Click:
Exit Sub

err_Agregarcmd_Click:
MsgBox "Ocurrió un error al agregar el registro, por favor intente de nuevo", vbCritical, "mensaje" '.Description
Resume exit_Agregarcmd_Click

Que tal, mira la verdad yo tengo el mismo detalle, por favor cuando descubras como hacerlo por favor oriéntame de cómo le hiciste... de igual forma si yo encuentro como resolverlo te avisaré... Gracias...

yo se como hacer eso
ke en desde un texbox te lo guarde en una base de datos en acces


eso estoi haciendo eso en un proyecto de la escuela

contactame para decirte como

fredy.sepa@gmail.com

te mando este codigo espero te sirva

este codigo lo pones en un boton y te sale

rs.AddNew 'esto crea un nuevo registro
rs!id = t1 'manda lo ke tenes en el campo 1 a la campo de base de datos llamado id
rs!nombre = t2
rs!edad = t3
rs.Update 'esto es para ke no se kede en memoria y lo guarde en base datos
MsgBox ("Su registro ha sido guardado con exito")
t1 = "" ' aki vuelvo y pongo en blaco por si keres otro registro
t2 = ""
t3 = ""

lo mismo deseo hacer, si averiguas como hacerlo te agradecere mucho si compartes lo aprendido.

cual es la solucion final??

utiliza ado, puedes mirar estos ejemplos

espero que te ayuden

http://www.recursosvisualbasic.com.ar/htm/tutoriales/ado.htm