• Home
 · 
• Databases/Data Access/DAO/ADO
 · 
• Passing a string variable to the SQL WHERE Statement and fills a ListBox with the data retrieved. I

Passing a string variable to the SQL WHERE Statement and fills a ListBox with the data retrieved. I

Passing a string variable to the SQL WHERE Statement and fills a ListBox with the data retrieved. It is a good idea to clear the contents of

Rate Passing a string variable to the SQL WHERE Statement and fills a ListBox with the data retrieved. I

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

' through an ODBC driver.
nameRS.Open _
("SELECT CUST_ORDER_NO, DELIVERY_DATE FROM CUST_ORD_HDR WHERE            CUST_NO='" & tempCUSTnumber & "' ORDER BY DELIVERY_DATE")
' I don't know if anyone else has had trouble figuring out the
' SQL syntax in VB6.                
Screen.MousePointer = vbHourglass
' Build the array for the listbox.
 ReDim arrayActualOrder(0)
   Do Until nameRS.EOF
     Screen.MousePointer = vbHourglass
     arrayActualOrder(i) = nameRS!CUST_ORDER_NO 
     ' myODBCList2 is a ListBox on the Main Form
     myODBCList2.AddItem arrayActualOrder(i)
     ReDim Preserve arrayActualOrder(UBound(arrayActualOrder) + 1)
     nameRS.MoveNext
     i = i + 1
   Loop
Screen.MousePointer = vbDefault
    End If