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
[url removed, login to view] = adUseClient
[url removed, login to view] "PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=" & [url removed, login to view] & "\[url removed, login to view];"
Set adoPrimaryRS = New Recordset
[url removed, login to view] "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 [url removed, login to view]
Set [url removed, login to view] = adoPrimaryRS
mbDataChanged = False
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).
The final product which I am building will be compiled on a Windows ME machine. ie 32 bit windows.