By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
424,486 Members | 2,169 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 424,486 IT Pros & Developers. It's quick & easy.

HOW I CAN USE RECORDSET AND SEEK IN ACCESS

P: n/a
I DON'T KNOW USE RECORDSET, MATCH, FIND AND SEEK IN ACCESS ONLY IN EXCEL

Jul 28 '06 #1
Share this Question
Share on Google+
5 Replies


P: n/a

Jonnh wrote:
I DON'T KNOW USE RECORDSET, MATCH, FIND AND SEEK IN ACCESS ONLY IN EXCEL
So? Read the help file. Do you have a specific example of code that
is not working the way you expect it to? Did you look through the NG
posts to find a problem similar to yours? What version of Access are
you using?

Jul 28 '06 #2

P: n/a

I HAVE:
1- TABLE: NESTLE
2- FIELD: idcodigo / nombreprod
3- TEXTBOX: txtSumando_1 / txtSumando_2

Dim dbdatabase As Database
Dim rstPrecioempaque As DAO.Recordset

Set dbdatabase = CurrentDb
Set rstPrecioempaque = dbdatabase.OpenRecordset("NESTLE")

With rstPrecioempaque
.FindFirst txtSumando_1.Value 'ERR NUMBER 3251 I
UNDERSTAND!!!!
End With

If Not rstPrecioempaque.NoMatch Then
rstPrecioempaque.Edit
rstPrecioempaque("nombreprod") = txtSumando_2.Value
rstPrecioempaque.Update
End If
HELP PLEASE

Jul 28 '06 #3

P: n/a
On 28 Jul 2006 15:48:19 -0700, "Jonnh" <js*********@gmail.comwrote:

When calling FindFirst, you have to specify in which field the value
should be found:
.FindFirst "idcodigo=" & txtSumando_1.Value

-Tom.

>
I HAVE:
1- TABLE: NESTLE
2- FIELD: idcodigo / nombreprod
3- TEXTBOX: txtSumando_1 / txtSumando_2

Dim dbdatabase As Database
Dim rstPrecioempaque As DAO.Recordset

Set dbdatabase = CurrentDb
Set rstPrecioempaque = dbdatabase.OpenRecordset("NESTLE")

With rstPrecioempaque
.FindFirst txtSumando_1.Value 'ERR NUMBER 3251 I
UNDERSTAND!!!!
End With

If Not rstPrecioempaque.NoMatch Then
rstPrecioempaque.Edit
rstPrecioempaque("nombreprod") = txtSumando_2.Value
rstPrecioempaque.Update
End If
HELP PLEASE
Jul 29 '06 #4

P: n/a
"Jonnh" <js*********@gmail.comwrote in
news:11**********************@s13g2000cwa.googlegr oups.com:
I HAVE:
1- TABLE: NESTLE
2- FIELD: idcodigo / nombreprod
3- TEXTBOX: txtSumando_1 / txtSumando_2

Dim dbdatabase As Database
Dim rstPrecioempaque As DAO.Recordset

Set dbdatabase = CurrentDb
Set rstPrecioempaque = dbdatabase.OpenRecordset("NESTLE")

With rstPrecioempaque
.FindFirst txtSumando_1.Value 'ERR NUMBER 3251 I
UNDERSTAND!!!!
End With

If Not rstPrecioempaque.NoMatch Then
rstPrecioempaque.Edit
rstPrecioempaque("nombreprod") = txtSumando_2.Value
rstPrecioempaque.Update
End If
HELP PLEASE
Why not use a WHERE clause instead, to limit the recoordset to the
row or rows that match the requested value?

--
David W. Fenton http://www.dfenton.com/
usenet at dfenton dot com http://www.dfenton.com/DFA/
Jul 29 '06 #5

P: n/a

Tom van Stiphout ha escrito:
On 28 Jul 2006 15:48:19 -0700, "Jonnh" <js*********@gmail.comwrote:

When calling FindFirst, you have to specify in which field the value
should be found:
.FindFirst "idcodigo=" & txtSumando_1.Value

-Tom.


I HAVE:
1- TABLE: NESTLE
2- FIELD: idcodigo / nombreprod
3- TEXTBOX: txtSumando_1 / txtSumando_2

Dim dbdatabase As Database
Dim rstPrecioempaque As DAO.Recordset

Set dbdatabase = CurrentDb
Set rstPrecioempaque = dbdatabase.OpenRecordset("NESTLE")

With rstPrecioempaque
.FindFirst txtSumando_1.Value 'ERR NUMBER 3251 I
UNDERSTAND!!!!
End With

If Not rstPrecioempaque.NoMatch Then
rstPrecioempaque.Edit
rstPrecioempaque("nombreprod") = txtSumando_2.Value
rstPrecioempaque.Update
End If
HELP PLEASE

Thanks you!!!!

Aug 3 '06 #6

This discussion thread is closed

Replies have been disabled for this discussion.