Access desde Vidual Basic 6
Soy nuevo programando en Visual Basic 6 y tengo dificultades en editar los contenidos de los campos de una base de datos en Access.
¿Alguien puede ayudarme?
Gracias por anticipado,
Carlos
¿Alguien puede ayudarme?
Gracias por anticipado,
Carlos
Pero con que trabajas Data,Adodc1 Dao ADO.
Si fuera DAO seria algo asi
Dim MiBD as Database
Dim MiRecordset as Recordset
'Luego abrir la bd
SET MiBD=WORKSPACES(0).OPENDATABASE(SLASH(APP.PATH) & "TuBD.MDB")
SET MiRecordset=MiBD.OPENRECORDSET("CLIENTES",DBOPENDYNASET)
'ahora a buscar el dato a editar
MiRecordset.findfirst="NombreCampo=' " & text1 & " ' "
if MiRecordset.NoMatch = false then
MiRecordset.Edit
MiRecordset.fields(0)=Txtnombre
MiRecordset.Upate
else
msgbox "registro no Encontrado"
end if
Bueno por ahora lo dejamos hasta aca ya que mi jefe quiere que trabaje....
Cualquier duda me envias un email y si puedo ayudarte lo hare.
bueno nos vemos Suerte
Saludos desde Chile
Si fuera DAO seria algo asi
Dim MiBD as Database
Dim MiRecordset as Recordset
'Luego abrir la bd
SET MiBD=WORKSPACES(0).OPENDATABASE(SLASH(APP.PATH) & "TuBD.MDB")
SET MiRecordset=MiBD.OPENRECORDSET("CLIENTES",DBOPENDYNASET)
'ahora a buscar el dato a editar
MiRecordset.findfirst="NombreCampo=' " & text1 & " ' "
if MiRecordset.NoMatch = false then
MiRecordset.Edit
MiRecordset.fields(0)=Txtnombre
MiRecordset.Upate
else
msgbox "registro no Encontrado"
end if
Bueno por ahora lo dejamos hasta aca ya que mi jefe quiere que trabaje....
Cualquier duda me envias un email y si puedo ayudarte lo hare.
bueno nos vemos Suerte
Saludos desde Chile
