
09-28-2003, 05:03 AM
|
|
Regular
|
|
Join Date: Jun 2003
Location: NZ
Posts: 50
|
|
|
OK,
So i've added the below code, but still nothing. I dont know muh anout sql querying, but is there anything obvious i'm leaving out here?
Dim sql As String
Dim Cl_Name As String
CloseRs
sql = "SELECT * FROM cl_master Where cl_name"
Set rs = cn.Execute(sql)
With rs
Combo1.Clear
Do While Not .EOF
Combo1.AddItem .Fields(Cl_Name).Value
.MoveNext
Loop
End With
CheckError
|
|