代码部分<%
                          dim b,i
  '置顶道具设置每个需要的点数
                          b = Int(F_Count / 5)
  %>
                   <%if b>0 then%>
                   <select name="b">
                   <option value="0">不使用</option>
  <%for i=1 to b
  If i >7 Then Exit for
  %>
<option value="<%=i%>"><%=i%></option>
  <%next%>
  </select>个
                          <%else%> <font color="#999999">余额不足</font>
                          <%end if%>
                          </font></td>
                          <td width="22%" height="25" align="center">
                          <font face="宋体">
                          <%if F_Count>=2 then%>
                          <select name="c">
                          <option selected value="0">不使用</option>
                          <option value="1">使用</option>
                          </select>
                          <%else%><font color="#999999">余额不足</font>
                          <%end if%>
                          </font></td>
                          <td width="18%" height="25" align="center">
                          <font face="宋体">
                          <%if F_Count>=10 then%>
                          <select name="d">
                          <option selected value="0">不使用</option>
                          <option value="1">使用</option>
                          </select>
                          <%else%><font color="#999999">余额不足</font>
                          <%end if%>