ASP判斷select默認選中代碼

ASP判斷select默認選中的代碼如下：

dim level
level = rs("a_level")
<select name="level">
<option value="1" <%if level=1 then response.write "checked='checked'"%>>管理員
<option value="2" <%if level=0 then response.write "checked='checked'"%>>普通會員</option>
</select>