| Line 179... |
Line 179... |
| 179 |
If IsNull(aList) OR (NOT IsNull(msDisabled)) Then
|
179 |
If IsNull(aList) OR (NOT IsNull(msDisabled)) Then
|
| 180 |
compSTR = compSTR & LIMG_FORM_COMPONENT_DROP_DOWN_OFF
|
180 |
compSTR = compSTR & LIMG_FORM_COMPONENT_DROP_DOWN_OFF
|
| 181 |
Advanced_Combo = compSTR
|
181 |
Advanced_Combo = compSTR
|
| 182 |
Exit Function
|
182 |
Exit Function
|
| 183 |
End If
|
183 |
End If
|
| 184 |
compSTR = compSTR &"<a href='javascript:;' onClick=""ToggleDisplay('divDropDown"& sName &"');"">"& LIMG_FORM_COMPONENT_DROP_DOWN &"</a>"
|
184 |
compSTR = compSTR &"<span class=pointer onClick=""ToggleDisplay('divDropDown"& sName &"');"">"& LIMG_FORM_COMPONENT_DROP_DOWN &"</span>"
|
| 185 |
|
185 |
|
| 186 |
|
186 |
|
| 187 |
'-- Default dispaly value
|
187 |
'-- Default dispaly value
|
| 188 |
Display = "none"
|
188 |
Display = "none"
|
| 189 |
If bForceDropdown Then
|
189 |
If bForceDropdown Then
|
| Line 198... |
Line 198... |
| 198 |
compSTR = compSTR &" <td background='controls/ERGFormComponent/images/bg_table_border.gif'><table width='100%' border='0' cellspacing='0' cellpadding='2'>"
|
198 |
compSTR = compSTR &" <td background='controls/ERGFormComponent/images/bg_table_border.gif'><table width='100%' border='0' cellspacing='0' cellpadding='2'>"
|
| 199 |
|
199 |
|
| 200 |
numOfRows = UBound( aList, 2 )
|
200 |
numOfRows = UBound( aList, 2 )
|
| 201 |
For rowNum = 0 To numOfRows
|
201 |
For rowNum = 0 To numOfRows
|
| 202 |
compSTR = compSTR &" <tr>"
|
202 |
compSTR = compSTR &" <tr>"
|
| 203 |
compSTR = compSTR &" <td nowrap bgcolor='#FFFFFF'><a href='javascript:;' class='menu_link' onClick="""& mFormName &"."& sName &".value = '"& aList(1, rowNum) &"';ToggleDisplay('divDropDown"& sName &"');"">"& aList(1, rowNum) &"</a></td>"
|
203 |
compSTR = compSTR &" <td nowrap bgcolor='#FFFFFF'><span class='menu_link pointer' onClick="""& mFormName &"."& sName &".value = '"& aList(1, rowNum) &"';ToggleDisplay('divDropDown"& sName &"');"">"& aList(1, rowNum) &"</span></td>"
|
| 204 |
compSTR = compSTR &" </tr>"
|
204 |
compSTR = compSTR &" </tr>"
|
| 205 |
Next
|
205 |
Next
|
| 206 |
|
206 |
|
| 207 |
'-- Display More.. link if required
|
207 |
'-- Display More.. link if required
|
| 208 |
If NOT IsNull(sMore) Then
|
208 |
If NOT IsNull(sMore) Then
|