关于金币赠送的修改

蓝雨

plus_tools_pay.asp
If Int(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text) Or Int(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@userticket").text) Then Dv_Tools.ShowErr(7):Exit Sub
改为：
If CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text) Or CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@userticket").text) Then Dv_Tools.ShowErr(7):Exit Sub

JoinVipGroup.asp
If Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text or vipmoney改为：
If CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text) < vipmoney Or vipmoney < MustNum Then

BuyPost.asp
If GetMoney>Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text Then
改为：
If GetMoney>CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text) Then

Plus_Tools_Postings.asp
If Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text<0 Then Dv_Tools.ShowErr(17) : Exit Sub
改为：
If CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text)<0 Then Dv_Tools.ShowErr(17) : Exit Sub

Savepost.asp(两处)

If ToMoney = 0 or ToMoney > Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text Or ToMoney < 0 Then Response.redirect \"showerr.asp?ErrCodes=

您设置的金币值为空或者多于您拥有的金币数量。&action=OtherErr\"
改为：
If ToMoney = 0 or ToMoney > CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text) Or ToMoney < 0 Then Response.redirect \"showerr.asp?ErrCodes=

您设置的金币值为空或者多于您拥有的金币数量。&action=OtherErr\"

If ToMoney = 0 or ToMoney > Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text Or ToMoney < 0 Then Response.redirect \"showerr.asp?ErrCodes=

您设置的金币值为空或者多于您拥有的金币数量。&action=OtherErr\"
改为：
If ToMoney = 0 or ToMoney > CCur(Dvbbs.UserSession.documentElement.selectSingleNode(\"userinfo/@usermoney").text) Or ToMoney < 0 Then Response.redirect \"showerr.asp?ErrCodes=

您设置的金币值为空或者多于您拥有的金币数量。&action=OtherErr\"