蓝雨 发表于 2008-3-25 19:33:16

会员等级、图片分性别显示

一、修改login.asp文件
找到UserClass=rsUser(0),大概是734行,将UserClass=rsUser(0)修改为:
Dim SexUserClass
SexUserClass=Split(rsUser(0),\"|\")
If Not IsArray(SexUserClass) or Ubound(SexUserClass)<>1 Then
UserClass=rsUser(0)
Else
UserClass=SexUserClass(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@user***\").text)
End If
二、修改reg.asp文件
找到UserClass=rs(0),大概是422行,将UserClass=rs(0)修改为:
Dim SexUserClass
SexUserClass=Split(rs(0),\"|\")
If Not IsArray(SexUserClass) or Ubound(SexUserClass)<>1 Then
UserClass=rs(0)
Else
UserClass=SexUserClass(Sex)
End If
三、修改savepost.asp文件

**** Hidden Message *****

skybluejun 发表于 2009-7-8 17:12:54

yuqi686 发表于 2012-1-12 06:29:06

页: [1]
查看完整版本: 会员等级、图片分性别显示