Dim src As String

src = "SELECT Cal FROM Study503.jj where Name = ___________________________ rstFirstRecordset.Open Source:=src, ActiveConnection:=cntMyConnection

Worksheets("DatabaseConnection").Activate

With ActiveSheet

_______________________________________________________________________

End With

Set rstFirstRecordset = Nothing

cntMyConnection.Close

Set cntMyConnection = Nothing

purpose of the above two lines of code is to____________________________.

Last questions? If I didnt know the product name and decide to list ALL the products whose names contain what was inputed into the textbox What would I change in the above code?

UserForml Jimm John's ...Name .Calories kCa Enter TextBox Cal TextBox TextBox Name TextBox Alphabetic Categorized Name) TextBox Name False False TextBox Cal False False True ab toTab &180000005& 1fmBackStyleOpaque &H80000005& tyle ext ext True False terkeyBehavior False ODBC Data Source Administrator User DSN System DSN Fle DSN Drivers T User Data Sources: Driver dBASE Fles MS Access Database Mcros TenMySQL Microsoft dBase Driverdof) Access Diver(mdbb) MySQL ODBC 5.3 ANSI Diver Visio Database Samples Microsft Access Driver mdb "b) An ODEC User data source stores infomation about how to connect to he indicated data provider, A User data source is only visble to you, and can only be used on the curert machine. OK