Drew Wutka
DWUTKA at marlow.com
Wed May 7 09:20:08 CDT 2003
You are right. DAO is different. How odd. Easy to fix though....just move
the check to before the update:
Dim rs As Recordset
Set rs = CurrentDb.OpenRecordset("tblTest", dbOpenTable)
rs.AddNew
rs.Fields(1).Value = "Testing"
MsgBox rs.Fields(0).Value
rs.Update
rs.Close
That shows the Autonumber.
Drew
-----Original Message-----
From: Andy Lacey [mailto:andy at minstersystems.co.uk]
Sent: Wednesday, May 07, 2003 1:16 AM
To: accessd at databaseadvisors.com
Subject: RE: [AccessD] New ID/Autonumber value
Just tried it Drew. I ran your code to add a third record to an existing
table and the msgbox reported the contents of the first record not the
new one. Do you get something different? This is A97.
Andy Lacey
http://www.minstersystems.co.uk
> -----Original Message-----
> From: accessd-bounces at databaseadvisors.com
> [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Drew Wutka
> Sent: 06 May 2003 22:44
> To: 'accessd at databaseadvisors.com'
> Subject: RE: [AccessD] New ID/Autonumber value
>
>
> Um nope....at least not in ADO, and I am 99.99999% sure it's
> the same in DAO. If you think about it, when you update a
> record (single update), you are already on that record, no
> need to move or find it, it's there.
>
> Drew
>
> -----Original Message-----
> From: Andy Lacey [mailto:andy at minstersystems.co.uk]
> Sent: Tuesday, May 06, 2003 2:37 PM
> To: accessd at databaseadvisors.com
> Subject: RE: [AccessD] New ID/Autonumber value
>
>
> Sorry to disagree Drew but I think it's
>
> rs.AddNew
> rs!Myfield="Test"
> etc
> etc
> rs.Update
> rs.bookmark=rs.lastmodified
> msgbox rs!MyAutoNumber
> rs.close
>
> I think you have to do the .bookmark line. Without that
> you're not on the right record
>
>
> Andy Lacey
> http://www.minstersystems.co.uk
>
>
>
>
>
> > -----Original Message-----
> > From: accessd-bounces at databaseadvisors.com
> > [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Drew Wutka
> > Sent: 06 May 2003 17:05
> > To: 'accessd at databaseadvisors.com'
> > Subject: RE: [AccessD] New ID/Autonumber value
> >
> >
> > dim rs as recordset
> > rs.AddNew
> > rs.Field(1).value="Test"
> > rs.Update
> > msgbox rs.Field(0).value
> > rs.close
> >
> >
> > As soon as you update the new record, the Autonumber field is
> > populated. (in my sample code above, the ID/AN is field 0).
> >
> > Drew
> >
> > -----Original Message-----
> > From: Stephen Bond [mailto:stephen at bondsoftware.co.nz]
> > Sent: Monday, May 05, 2003 9:53 PM
> > To: accessd at databaseadvisors.com
> > Subject: [AccessD] New ID/Autonumber value
> >
> >
> > In this thread a couple of months ago there was a solution
> > offered to the problem of determining the value of an ID
> > Autonumber of a record just added.
> >
> >
> > It was stunning in its simplicity, so of course I didn't
> > write it down ;-(
> >
> > Can anyone help?
> >
> > TIA
> >
> > Stephen Bond
> > Otatara, New Zealand
> > ( tel 03 213 1256 fax 03 213 0123
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/a> ccessd
> > Website:
> > http://www.databaseadvisors.com
> > _______________________________________________
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/a> ccessd
> > Website:
> > http://www.databaseadvisors.com
> >
> >
>
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/a> ccessd
> Website:
> http://www.databaseadvisors.com
> _______________________________________________
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/a> ccessd
> Website:
> http://www.databaseadvisors.com
>
_______________________________________________
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com