<%
      dim n
      For I=0 To UBound(SQL,2)
        IF instr(KS.C("ModelPower"),sql(5,i) & "0")=0 Then
        Dim MainUrl
        Select Case  SQL(4,I)
         Case 1 :MainUrl="KS.Article.asp"
      Case 2 :MainUrl="KS.Picture.asp"
      Case 3 :MainUrl="KS.Down.asp"
      Case 4 :MainUrl="KS.Flash.asp"
      Case 5 :MainUrl="KS.Shop.asp"
      Case 6 :MainUrl="KS.Music.asp?url=KS.MusicSpecial.asp"
      Case 7 :MainUrl="KS.Movie.asp"
      Case 8 :MainUrl="KS.Supply.asp"
      Case 9 :MainUrl="mnkc/mnkc.asp"
      Case 10:MainUrl="KS.JobCompany.asp"
        End Select
        %>

虽然在这里我知道是各个模块，但在后台官方界面中如果我要更改＂添加文章＂为＂添加新闻＂我都不知道是在哪儿改．