< OPTION < %If (Not IsNull(selval) Or Trim(selval) < > "") _
And selval = valTemp Then
Response.Write("SELECTED")% > VALUE="< %=valTemp% >" >< %=finalDesc% >
< %
finalDesc = ""
valTemp = ""
rsSelect.MoveNext
Loop
% >
< /OPTION >
< /SELECT >

< %
Set rsSelect = Nothing

End Function
% >

　　 你可以看到，在创建这些多栏列表时包含一些overhead ，无论是在运行的时候还是在最终将它们展示给用户的时候。有时候调试这些创建列表的ASP代码是很头疼的。但是，它们是以有序的方式和正确的位置表现许多信息的很好的方式，是值得花费这些代价的。