Jobs
Author: zMastaa Date Submitted: 3/15/2006 Category: Database Compatibility: VB 6,VB 5 This code has been accessed 8265 times.
Email Yourself this snippet:
'full code http://vbcode.com/Asp/showsn.asp?theID=12299 'this is the last peice i forot to add '
Code
Private Sub List1_Click() Dim listtext As String Dim Clientname As String Adodc1.CommandType = adCmdText listtext = List1.Text Adodc1.RecordSource = "SELECT * from Clients WHERE [Clientname] = '" & Adodc1.Refresh End Sub
