Sub empno() ComboBox2.Items.Clear() sql = "select empno from tbl_empinfo" If rs.State = 1 Then rs.Close() rs.Open(sql, conn) Do While rs.EOF = False ComboBox2.Items.Add(rs(0).Value) rs.MoveNext() Loop End Sub how do i write this for an access connection???
All 2 Replies
Be a part of the DaniWeb community
We're a friendly, industry-focused community of 1.21 million developers, IT pros, digital marketers, and technology enthusiasts learning and sharing knowledge.