I have made a database in vb6 using adodc code. The database must be able to search the ID field for a 5 number ID, must be able to search the last name field "LastName" for the last name, must be able to search the address "DeliveryAdd", city "City", state "State" fields to find a record by the address. The address, city, state search must include only one field, two of these fields or all three. The database is an access database.
Here is the form_load code
Private Sub Form_Load()
Dim db As Connection
Set db = New Connection
[login to view URL] = adUseClient
[login to view URL] "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & [login to view URL] & "\[login to view URL];"
Set adoPrimaryRS = New Recordset
[login to view URL] "select AllTimeAmt,AmtThisYear,Barcode,City,DateEntered,DateGiven,DeliveryAdd,DonationAmt,FirstName,FullName,HomePhone,ID,LastName,Note,SecondAdd,State,ThirdAdd,WPhone,Zip from Donor Order by LastName", db, adOpenStatic, adLockOptimistic
Dim oText As TextBox
'Bind the text boxes to the data provider
For Each oText In [login to view URL]
Set [login to view URL] = adoPrimaryRS
Next
mbDataChanged = False
End Sub
## Deliverables
1) Complete and fully-functional working search program in vb6 code form.
2) Exclusive and complete copyrights to all work purchased. (No GPL, 3rd party components, etc. unless all copyright ramifications are explained AND AGREED TO by the buyer on the site).
## Platform
The final product which I am building will be compiled on a Windows ME machine. ie 32 bit windows.