(asp) ricezione di dati usando select case

[shambler1]

<%
      Select Case (campo)
      Case :'trim(rs('campo'))='restauro'
        <input type='radio' name='campo' value='restauro' checked>
        Break
      Case :Case :'trim(rs('campo'))='edile'
<input type='radio' name='campo' value='edile' checked>
      Break
      Case Else
      <input type='radio' name='campo' value='altro' checked>
    End Select  <%

E' giusta questa sintassi?

[shambler1]

Non lo è ...quale sarebbe la sintassi giusta?
Ho provato

  <%
      Select Case (numero)
      Case trim(rs("campo"))="restauro"
        esponse.Write "<td width='30'>restauro</td><td width='30'  ><input type='radio' name='campo' value='restauro' checked></td></tr><tr>"
        Break
      Case 1 'trim(rs("campo"))="edile"
<input Response.Write "<td  width='30'>edile</td><td width='30'  ><input type='radio' name='campo' value='edile' checked></td></tr><tr>"
      Case Else
      Response.Write "<td width='30'>altro</td><td width='30'  ><input type='radio' name='campo' value='altro' checked></td></tr><tr>"
    End Select  %>

ma niente
siccome devo fare un campo con 10 opzioni, devo capire come usare select case o mi toccherà scrivere 100 mila righe di codice usando if then else

[shambler1]

<% 
  Dim var
   var=Trim(rs("campo"))



select case var
Case "restauro"
 <input type='radio' name='campo' value='restauro' checked>
 Case "edile"
<input type='radio' name='campo' value='edile' checked>
Case Else
<input type='radio' name='campo' value='altro' checked>
End Select  %>

Manco cosi...

[© Rocky]

@ shambler1

Hai provato anche così ?

<% 
  Dim var
   var=Trim(rs("campo"))

Select Case var
Case 1 "restauro"
 <input type='radio' name='campo' value='restauro' checked>
 Case 2 "edile"
<input type='radio' name='campo' value='edile' checked>
Case Else
<input type='radio' name='campo' value='altro' checked>
End Select  %>