admin_config_ranks.asp

一个不错的ASP论坛源码

    <img src="<%=strImageURL %>icon_smile_question.gif" border="0" alt="（文章数少於等级二会员）">
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align=right><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">星号选择：</font></td>
    <td bgColor="<% =strPopUpTableColor %>">
    <input type=radio name=strRankColor1 value=gold<% if strRankColor1 = "gold" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_gold.gif border=0>
    <input type=radio name=strRankColor1 value=silver<% if strRankColor1 = "silver" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_silver.gif border=0>
    <input type=radio name=strRankColor1 value=bronze<% if strRankColor1 = "bronze" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_bronze.gif border=0>
    <input type=radio name=strRankColor1 value=orange<% if strRankColor1 = "orange" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_orange.gif border=0>
    <input type=radio name=strRankColor1 value=red<% if strRankColor1 = "red" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_red.gif border=0>
    <input type=radio name=strRankColor1 value=purple<% if strRankColor1 = "purple" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_purple.gif border=0>
    <input type=radio name=strRankColor1 value=blue<% if strRankColor1 = "blue" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_blue.gif border=0>
    <input type=radio name=strRankColor1 value=cyan<% if strRankColor1 = "cyan" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_cyan.gif border=0>
    <input type=radio name=strRankColor1 value=green<% if strRankColor1 = "green" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_green.gif border=0>
    <a href="JavaScript:openWindow3('pop_config_help.asp#RankColor')"><img src="<%=strImageURL %>icon_smile_question.gif" border="0"></a>
   </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align="right"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">等级二会员名称：</font></td>
    <td bgColor="<% =strPopUpTableColor %>"><input type="text" name="strRankLevel2" size="30" value="<% if strRankLevel2 <> " " then Response.Write(strRankLevel2) end if %>">
    <font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>文章数：</b></font><input type="text" name="intRankLevel2" size="5" value="<% =intRankLevel2 %>">
    <img src="<%=strImageURL %>icon_smile_question.gif" border="0" alt="（文章数少於等级三会员）">
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align=right><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">星号选择：</font></td>
    <td bgColor="<% =strPopUpTableColor %>">
    <input type=radio name=strRankColor2 value=gold<% if strRankColor2 = "gold" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_gold.gif border=0>
    <input type=radio name=strRankColor2 value=silver<% if strRankColor2 = "silver" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_silver.gif border=0>
    <input type=radio name=strRankColor2 value=bronze<% if strRankColor2 = "bronze" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_bronze.gif border=0>
    <input type=radio name=strRankColor2 value=orange<% if strRankColor2 = "orange" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_orange.gif border=0>
    <input type=radio name=strRankColor2 value=red<% if strRankColor2 = "red" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_red.gif border=0>
    <input type=radio name=strRankColor2 value=purple<% if strRankColor2 = "purple" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_purple.gif border=0>
    <input type=radio name=strRankColor2 value=blue<% if strRankColor2 = "blue" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_blue.gif border=0>
    <input type=radio name=strRankColor2 value=cyan<% if strRankColor2 = "cyan" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_cyan.gif border=0>
    <input type=radio name=strRankColor2 value=green<% if strRankColor2 = "green" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_green.gif border=0>
    <a href="JavaScript:openWindow3('pop_config_help.asp#RankColor')"><img src="<%=strImageURL %>icon_smile_question.gif" border="0"></a>
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align="right"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">等级三会员名称：</font></td>
    <td bgColor="<% =strPopUpTableColor %>"><input type="text" name="strRankLevel3" size="30" value="<% if strRankLevel3 <> " " then Response.Write(strRankLevel3) end if %>">
    <font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>文章数：</b></font><input type="text" name="intRankLevel3" size="5" value="<% =intRankLevel3 %>">
    <img src="<%=strImageURL %>icon_smile_question.gif" border="0" alt="（文章数少於等级四会员）">
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align=right><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">星号选择：</font></td>
    <td bgColor="<% =strPopUpTableColor %>">
    <input type=radio name=strRankColor3 value=gold<% if strRankColor3 = "gold" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_gold.gif border=0>
    <input type=radio name=strRankColor3 value=silver<% if strRankColor3 = "silver" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_silver.gif border=0>
    <input type=radio name=strRankColor3 value=bronze<% if strRankColor3 = "bronze" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_bronze.gif border=0>
    <input type=radio name=strRankColor3 value=orange<% if strRankColor3 = "orange" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_orange.gif border=0>
    <input type=radio name=strRankColor3 value=red<% if strRankColor3 = "red" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_red.gif border=0>
    <input type=radio name=strRankColor3 value=purple<% if strRankColor3 = "purple" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_purple.gif border=0>
    <input type=radio name=strRankColor3 value=blue<% if strRankColor3 = "blue" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_blue.gif border=0>
    <input type=radio name=strRankColor3 value=cyan<% if strRankColor3 = "cyan" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_cyan.gif border=0>
    <input type=radio name=strRankColor3 value=green<% if strRankColor3 = "green" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_green.gif border=0>
    <a href="JavaScript:openWindow3('pop_config_help.asp#RankColor')"><img src="<%=strImageURL %>icon_smile_question.gif" border="0"></a>
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align="right"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">等级四会员名称：</font></td>
    <td bgColor="<% =strPopUpTableColor %>"><input type="text" name="strRankLevel4" size="30" value="<% if strRankLevel4 <> " " then Response.Write(strRankLevel4) end if %>">
    <font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>文章数：</b></font><input type="text" name="intRankLevel4" size="5" value="<% =intRankLevel4 %>">
    <img src="<%=strImageURL %>icon_smile_question.gif" border="0" alt="（文章数少於等级五会员）">
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align=right><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">星号选择：</font></td>
    <td bgColor="<% =strPopUpTableColor %>">
    <input type=radio name=strRankColor4 value=gold<% if strRankColor4 = "gold" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_gold.gif border=0>
    <input type=radio name=strRankColor4 value=silver<% if strRankColor4 = "silver" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_silver.gif border=0>
    <input type=radio name=strRankColor4 value=bronze<% if strRankColor4 = "bronze" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_bronze.gif border=0>
    <input type=radio name=strRankColor4 value=orange<% if strRankColor4 = "orange" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_orange.gif border=0>
    <input type=radio name=strRankColor4 value=red<% if strRankColor4 = "red" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_red.gif border=0>
    <input type=radio name=strRankColor4 value=purple<% if strRankColor4 = "purple" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_purple.gif border=0>
    <input type=radio name=strRankColor4 value=blue<% if strRankColor4 = "blue" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_blue.gif border=0>
    <input type=radio name=strRankColor4 value=cyan<% if strRankColor4 = "cyan" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_cyan.gif border=0>
    <input type=radio name=strRankColor4 value=green<% if strRankColor4 = "green" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_green.gif border=0>
    <a href="JavaScript:openWindow3('pop_config_help.asp#RankColor')"><img src="<%=strImageURL %>icon_smile_question.gif" border="0"></a>
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align="right"><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">等级五会员名称：</font></td>
    <td bgColor="<% =strPopUpTableColor %>"><input type="text" name="strRankLevel5" size="30" value="<% if strRankLevel5 <> " " then Response.Write(strRankLevel5) end if %>">
    <font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>"><b>文章数：</b></font><input type="text" name="intRankLevel5" size="5" value="<% =intRankLevel5 %>">
    <img src="<%=strImageURL %>icon_smile_question.gif" border="0" alt="（文章数已经多到爆了）">
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" align=right><font face="<% =strDefaultFontFace %>" size="<% =strDefaultFontSize %>">星号选择：</font></td>
    <td bgColor="<% =strPopUpTableColor %>">
    <input type=radio name=strRankColor5 value=gold<% if strRankColor5 = "gold" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_gold.gif border=0>
    <input type=radio name=strRankColor5 value=silver<% if strRankColor5 = "silver" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_silver.gif border=0>
    <input type=radio name=strRankColor5 value=bronze<% if strRankColor5 = "bronze" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_bronze.gif border=0>
    <input type=radio name=strRankColor5 value=orange<% if strRankColor5 = "orange" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_orange.gif border=0>
    <input type=radio name=strRankColor5 value=red<% if strRankColor5 = "red" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_red.gif border=0>
    <input type=radio name=strRankColor5 value=purple<% if strRankColor5 = "purple" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_purple.gif border=0>
    <input type=radio name=strRankColor5 value=blue<% if strRankColor5 = "blue" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_blue.gif border=0>
    <input type=radio name=strRankColor5 value=cyan<% if strRankColor5 = "cyan" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_cyan.gif border=0>
    <input type=radio name=strRankColor5 value=green<% if strRankColor5 = "green" then Response.Write(" checked") %>><img src=<%=strImageURL %>icon_star_green.gif border=0>
    <a href="JavaScript:openWindow3('pop_config_help.asp#RankColor')"><img src="<%=strImageURL %>icon_smile_question.gif" border="0"></a>
    </td>
  </tr>
  <tr valign="top">
    <td bgColor="<% =strPopUpTableColor %>" colspan="2" align="center"><input type="submit" value="提交设置" id="submit1" name="submit1"> <input type="reset" value="重新设置" id="reset1" name="reset1">
    </td>
  </tr>
</table></form>
</font>
<%	end if %>
<!--#INCLUDE file="inc_footer.asp" -->
<% Else %>
<% Response.Redirect "admin_login.asp" %>
<% End IF %>