how to generate alphanumeric autonumber in Aceess backend with VB6 coding
Jump to Post
Option Explicit Dim cnnADO As ADODB.Connection Dim tbl As ADOX.Table Dim ctg As ADOX.Catalog Private Sub Form_Load() ' Instantiate the ActiveX data objects Set cnnADO = New ADODB.Connection Set ctg = New ADOX.Catalog Set tbl = New ADOX.Table ' Open the database and establish the connection cnnADO.Open …
All 8 Replies
Be a part of the DaniWeb community
We're a friendly, industry-focused community of developers, IT pros, digital marketers, and technology enthusiasts learning and sharing knowledge.