如图，红框内！

Kesion.StaticCls.asp要如何修改啊？？？？

  Sub GetNoLoginInfo(ByRef content)

       GCls.ComeUrl=GCls.GetUrl()

   Content="<div style='text-align:center'>999对不起，你还没有登录，本文至少要求本站的注册会员才可查看!</div><div style='text-align:center'>如果你还没有注册，请<a href=""../user/reg/""><span style='color:red'>点此注册</span></a>吧!</div><div style='text-align:center'>如果您已是本站注册会员，赶紧<a href=""javascript:ShowLogin();""><span style='color:red'>点此登录</span></a>吧！</div>"

   End Sub

   Sub GetContent()

     Select Case KS.ChkClng((KS.C_S(Channelid,6)))

  Case 1 Content="True"

  Case 2 Content=KSR.Node.SelectSingleNode("@picurls").text

  Case 4 Content="True"

End Select

UrlsTF=true

   End Sub
End Class
%>