G
Guest
Hi all
I am using sql server as backend and I am creating a form in Access. This form contains several text boxes which needs to be populated with data. this data is coming from table pass
Following code does not give any error but it does not display the data either. when i go in debug mode the rst get populated with the right value. any help would be appreacited. thanks a lo
Private Sub Form_Load(
Dim strSql As Strin
Dim conString As Strin
Dim con As ADODB.Connectio
Dim rst As ADODB.Recordse
strSql = "SELECT Degree FROM pass where User_Name='mgarg'
Set con = New ADODB.Connectio
conString = "Driver={SQL Server};Server=;DataBase=;Uid=;Pwd=;
con.Properties("Prompt") = adPromptAlway
con.ConnectionString = conStrin
con.Ope
Set rst = New ADODB.Recordse
rst.Open strSql, con, adOpenForwardOnly, adLockReadOnl
Do While Not rst.EO
Degree.ControlSource = rst.Fields("Degree"
rst.MoveNex
Loo
rst.Clos
con.Clos
End Su
I am using sql server as backend and I am creating a form in Access. This form contains several text boxes which needs to be populated with data. this data is coming from table pass
Following code does not give any error but it does not display the data either. when i go in debug mode the rst get populated with the right value. any help would be appreacited. thanks a lo
Private Sub Form_Load(
Dim strSql As Strin
Dim conString As Strin
Dim con As ADODB.Connectio
Dim rst As ADODB.Recordse
strSql = "SELECT Degree FROM pass where User_Name='mgarg'
Set con = New ADODB.Connectio
conString = "Driver={SQL Server};Server=;DataBase=;Uid=;Pwd=;
con.Properties("Prompt") = adPromptAlway
con.ConnectionString = conStrin
con.Ope
Set rst = New ADODB.Recordse
rst.Open strSql, con, adOpenForwardOnly, adLockReadOnl
Do While Not rst.EO
Degree.ControlSource = rst.Fields("Degree"
rst.MoveNex
Loo
rst.Clos
con.Clos
End Su