Can someone please give me the correct syntax for retrieving data from a mysql table and putting it into a textbox? I have the connection string and everything else. I just need the command to populate the textbox.
textbox.text= ?

Thanks

dim rs as adodb.recordset
dim cn as adodb.connection

set cn = new adodb.connection
set rs = new ADODB.recordset

cn.connectionstring = "Your Connection String here"
cn.open

rs.activeconnection = cn

rs.open "SELECT Field1,Field2 FROM TABLE"

textbox.text = rs.fields("Field1").value

I got that from someone else, but that could get messy because there are lots of fields in my query. I want to use a datagrid but have no idea about how to do it.
Thanks

The same technique applies to the datagrid. Retreive your connection and recordset as usual but then set the grids datasourse to the recordset

set DataGrid.DataSource = rs

(Remember if you close your recordset the data in the grid will also close)

I got all that and am getting an error. What refrences do I need with the grid?
Thanks

Here is what I have:


Private Sub cmdSelect_Click()

Dim rs As ADODB.Recordset
Dim DB As New ADODB.Connection
Dim sSQL As String
sSQL = "select * from look_up"
DB.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=survey"
DB.Open
rs.Open sSQL, DB
'Set rs = New ADODB.Recordset
Set DataGrid1.DataSource = rs

End Sub

I get an error with this.

I am using the:

Microsoft DataGrid Control 6.0 SP5 (OLEDB)

My only other reference is:

Microsoft ActiveX Data Objects 2.5 Library (ADO)

And the following line works:

Set grdMain.DataSource = rsClients

What is your exact error?

I am getting 'Object variable or With Block variable not set'

Thanks alot.

1) Declare your recordset globally (outside of the Sub) since when the sub finishes the recordset goes out of scope and closes and so does the grid.

2) You must create a new rceordset (you have that line commented out.

Here is what this should look like

Private rs As ADODB.Recordset

Private Sub cmdSelect_Click()

Dim DB As New ADODB.Connection
Dim sSQL As String

sSQL = "select * from look_up"
DB.ConnectionString = "Provider=MSDASQL.1;Persist Security Info=False;Data Source=survey"
DB.Open
Set rs = New ADODB.Recordset
rs.Open sSQL, DB
Set DataGrid1.DataSource = rs

End Sub

I get a 'The rowset is not bookmarkable' error.

Open the recordset in Static mode and also set the CursorLocation to adUseClient.

rs.CursorLocation = adUseClient
rs.Open strSQL, cn, adOpenstatic, adLockreadonly

Finally, verify if the table has a primary key.

I don't have a primary key in my table. Is this the problem?

I set a column with a primary key and I still get the bookmarkable error.

Did you also open the recordset in Static mode and also set the CursorLocation to adUseClient?

rs.CursorLocation = adUseClient
rs.Open strSQL, cn, adOpenstatic, adLockreadonly

Thanks Rami. I found this, rs.CursorLocation = adUseClient in another forum as I was getting desperate and didn't hear from you. I have no idea what adUseClient means, so if you could explain that I would be grateful. My program works fine now. Are you Israeli?
Thanks again.