Visual Basic

Public Sub New(strHost As String, intPort As Integer, strlogin As String, strPassword As String, authenticationMethod As AuthenticationMethod)

	Me.New(strHost, intPort, strlogin, strPassword, authenticationMethod, False)
End Sub

"SELECT * From DataGrid1 WHERE [First_Name] = " & "'" & First_Name & "'" & ""

DataGrid1.RecordSelectors = "SELECT * From Adodc1 WHERE [First_Name] = '" & txtSearch.Text & "'"

Dim Arg$
Arg$ = txtSearch.Text

Dim Statement$
Statement$ = "SELECT * FROM [tablename] WHERE [First_Name] = '" & Statement$ & "'"

DataGrid1.RecordSelectors = Statement$

I are Troll

offroaderdan wrote:

I ma probably doing something wrong but just want to clarify. Table name is the access file? or is it the table you have but in vb6?

offroaderdan wrote:

And the First_Name is the column you want to search?

Dim con As New ADODB.Connection
Dim cmd As New ADODB.Command
Dim rst As ADODB.Recordset

con.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Northwind.mdb;User Id=admin;Password=;"
con.Open

cmd.CommandText = "SELECT * FROM [Employees]"
cmd.CommandType = adCmdText
cmd.ActiveConnection = con.ConnectionString

Set rst = cmd.Execute
 ' Proces here :)

rst.Close
con.Close

Set rst = Nothing
Set cmd = Nothing
Set con = Nothing

I are Troll