请求把if else 改为case 的，因为我要多加几个模板，初学者请帮忙。

<%
sqlInfo = "Select * From Moban Where State=0 ID="&cid
crs.Open sqlInfo,Conn,1,1
if not crs.eof then
mb=crs("mb")
if mb="2" then
Response.Redirect "company2.asp?cid="&cid&""
else if mb="3" then
Response.Redirect "style03/company1.asp?cid="&cid&""
else
Response.Redirect "company1.asp?cid="&cid&""
end if
end if
else
response.write"<SCRIPT language=JavaScript>alert('不存在的单位！');"
response.write"javascript:history.go(-1) ;</SCRIPT>"
end if
crs.close
set crs=nothing
conn.close
set conn=nothing
%>

<%
sqlInfo = "Select * From Moban Where State=0 ID="&cid
crs.Open sqlInfo,Conn,1,1
if not crs.eof then
mb=crs("mb")
Select Case mb
Case "2"
Response.Redirect "company2.asp?cid="&cid&""
Case "3"
Response.Redirect "style03/company1.asp?cid="&cid&""
Case Else
Response.Redirect "company1.asp?cid="&cid&""
End Select
Else
response.write"<SCRIPT language=JavaScript>alert('不存在的单位！');"
response.write"javascript:history.go(-1) ;</SCRIPT>"
End if
crs.close
set crs=nothing
conn.close
set conn=nothing
%>