you need a lot of changes .. if you want to open a table and then use it you can use (in ADODB connection) -
Dim rec_item As New adodb.Recordset
rec_item.open ("SELECT * FROM item_main "), _
connect, adOpenDynamic, adLockOptimistic
here connect is ADOBB connection.
if you want to update , delete any thing from table you can directly use SQL queries for that ,like
db.Execute "UPDATE item_main SET item_quan = item_quan _
+ " & added_item & " WHERE item_no = " & cur_ino
you can ,however, use -
if you are using recordset ..
(NOTE : _ (underscore) is used to change line in VB