Ok, so i've tried to search the forum for this issue, becuase i
know leading zeros cause problems, but i hadn't found any answers that
work for my situation.
I have code that is updating a table with
ID numbers. I tried using an auto field but the update sql wouldn't
work correctly, so this is where i'm at.
Dim db As
Dim Prospect As DAO.Recordset
Dim sql As
Dim q As QueryDef
Dim r As DAO.Recordset
Dim adjID As String
Format(Nz(DMax("[ID]", "tbl"), 0),
"0000") + 1
sql = "SELECT [ID] FROM [tbl] ORDER BY