(In the General Declaration Area)
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
(in Form's Activate Event)
cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=EMP.mdb;Persist Security Info=False"
rs.Open "select Eid,Ename,ppfSub,Basic From EmpData Order By Eid", cn, adOpenStatic, adLockPessimistic
Please post the code you have written in an effort to resolve the problem, and our Gextom team members would be happy to provide some guidance. More info Visit at : http://gexton.com/website-designing/