The Alternative to CurrentDB 1

[NiceArms]

The following code does work for updating the current table, however I want to update another table.

I have tried changing "CurrentDB" to the Alternative table name but with no joy!

simply put, i want: "currentDB" to point an another table in the same access project.

'Updating a record in a table
Dim DB As Object
Dim Column As Object

Set DB = CurrentDb 'name of database
Set Column = DB.OpenRecordset("User") 'select column from the above database

Column.AddNew 'add a new item to database
Column("User").Value = User1
Column.Update 'Update the table!

Thank you

/Nice

 

[PWise]

where are you trying to change to anothe table

try
Set Column = DB.OpenRecordset("Someothertable")

 

[NiceArms]

Ah, thank you!

I was looking at the wrong bloody bit of code!

again, thank you.

/Nice

 

[HarleyQuinn]

A good way to thanks pwise would be to click the

Thank pwise
for this valuable post!

link under his post

HarleyQuinn
---------------------------------
Carter, hand me my thinking grenades!

You can hang outside in the sun all day tossing a ball around, or you can sit at your computer and do something that matters. - Eric Cartman

Get the most out of Tek-Tips, read FAQ222-2244: How to get the best answers before posting.

http://lessthandot.com