ppoindexter
Registered User.
- Local time
- Today, 08:46
- Joined
- Dec 28, 2000
- Messages
- 134
i have the following code for a combo box on a form and i need to have it sort by ascending order....
If IsNull(Me.cmbreflist) = True Then
If IsNull(Me.CmbLevel3) = True Then
CmbWarmup.RowSource = "select fldtplanid,fldmimtplanlabel from tblmimtplan where fldmim_core_id=1 and fldlevel1id=" & Me.cmbNCTM & " and fldlevel2id=" & Me.cmbGrade
Else
CmbWarmup.RowSource = "select fldtplanid,fldmimtplanlabel from tblmimtplan where fldmim_core_id=1 and fldlevel1id=" & Me.cmbNCTM & " and fldlevel2id=" & Me.cmbGrade
End If
Else
CmbWarmup.RowSource = "select fldtplanid,fldmimtplanlabel from tblmimtplan where fldmim_core_id=1 and fldlevel1id=" & Me.cmbNCTM & " and fldlevel2id=" & Me.cmbGrade & " and fldmimid in (select fldmimid from tblmimreference where fldreferencelistid=" & Me.cmbreflist & ")"
End If
Me.tblmimtplan_subform2.LinkMasterFields = "fldmimidWU"
If IsNull(Me.cmbreflist) = True Then
If IsNull(Me.CmbLevel3) = True Then
CmbWarmup.RowSource = "select fldtplanid,fldmimtplanlabel from tblmimtplan where fldmim_core_id=1 and fldlevel1id=" & Me.cmbNCTM & " and fldlevel2id=" & Me.cmbGrade
Else
CmbWarmup.RowSource = "select fldtplanid,fldmimtplanlabel from tblmimtplan where fldmim_core_id=1 and fldlevel1id=" & Me.cmbNCTM & " and fldlevel2id=" & Me.cmbGrade
End If
Else
CmbWarmup.RowSource = "select fldtplanid,fldmimtplanlabel from tblmimtplan where fldmim_core_id=1 and fldlevel1id=" & Me.cmbNCTM & " and fldlevel2id=" & Me.cmbGrade & " and fldmimid in (select fldmimid from tblmimreference where fldreferencelistid=" & Me.cmbreflist & ")"
End If
Me.tblmimtplan_subform2.LinkMasterFields = "fldmimidWU"