论坛无法登陆?????????

别人帮我做的SQL的论坛无法登陆，填完资料点“登陆”时会出现如下： 
update dv_setup set Forum_Cookiespath='/BBS/' 
Select UserID,UserName,UserPassword,UserEmail,UserPost,UserTopic,UserSex,UserFace,UserWidth,UserHeight,JoinDate,LastLogin,UserLogins,Lockuser,Userclass,UserGroupID,UserGroup,userWealth,userEP,userCP,UserPower,UserBirthday,UserLastIP,UserDel,UserIsBest,UserHidden,UserMsg,IsChallenge,UserMobile,TitlePic,UserTitle,TruePassWord,UserToday,UserMoney,UserTicket,FollowMsgID,Vip_StarTime,Vip_EndTime From [Dv_User] Where UserName='NIRxxi' 
Select Uc_Setting From Dv_UserAccess Where Uc_Boardid=0 And uc_UserID=0 
Select MinArticle,IsSetting,ParentGID,UserTitle,GroupPic From Dv_UserGroups Where UserGroupID=9 
Select Top 1 usertitle,GroupPic,UserGroupID From Dv_UserGroups Where ParentGID=3 And Minarticle<=0 Order By MinArticle Desc,UserGroupID 
update [Dv_User] set userWealth=userWealth+8,userEP=userEP+6,userCP=userCP+3,LastLogin=GetDate(),UserLogins=UserLogins+1,UserLastIP=' ',userclass='新手上路',titlepic=' f',UserGroupID=9,TruePassWord='3L15GsRfey2C3g79' where userid= 

Microsoft OLE DB Provider for SQL Server 错误 '80040e14' 

第 1 行: '=' 附近有语法错误。 

/BBS/inc/Dv_ p，行 1066 

因为做的人也是买的模版所以她也不知道怎么改 昨天她把她机子上的原始程序替换掉网上的还是一样 不知怎么回事 那个程序在她机子上运行就没问题 
请问各位编程大侠怎么改啊 麻烦说详细点 谢谢 




以下是Dv_ p 1049-1070行的代码： 

Public Function Execute(Command) 
If Not IsObject(Conn) Then ConnectionDatabase 
If IsDeBug = 0 Then 
On Error Resume Next 
Set Execute = Conn.Execute(Command) 
If Err Then 
err.Clear 
Set Conn = Nothing 
If savelog=1 Then 
Response.Write SaveSQLLOG(Command,"查询数据的时候发现错误，请检查您的查询代码是否正确。<br>基于安全的理由，只显示本信息，要查看详细的错误信息，请修改您的程序文件 p。把""Const IsDeBug = 0""改为：""Const IsDeBug = 1""") 
Else 
Response.Write "查询数据的时候发现错误，请检查您的查询代码是否正确。" 
End If 
Response.End 
End If 
Else 
Response.Write command & "<br>" 
Set Execute = Conn.Execute(Command) 
End If 
SqlQueryNum = SqlQueryNum+1 
End Function 
'----------------------------------------------------------------------------------------------------- 
代码不够我再贴
问题补充：1071-1098： 
'独立道具查询 
Public Function Plus_Execute(Command) 
If Cint(Forum_Setting(92))=1 Then 
If Not IsObject(Plus_Conn) Then Plus_ConnectionDatabase 
Else 
If Not IsObject(Conn) Then ConnectionDatabase 
End IF 
'检查权限,防止注入攻击。 
If InStr(LCase(Command),"dv_admin")>0 And Left(ScriptName,6)<> "admin_" Then 
If savelog=1 Then 
Response.Write SaveSQLLOG(Command,"") 
End If 
Command=Replace(LCase(Command),"dv_admin","dv<i>"&Chr(95)&"</i>admin") 
End If 
If IsDeBug = 0 Then 
On Error Resume Next 
If Cint(Forum_Setting(92))=1 Then 
Set Plus_Execute = Plus_Conn.Execute(Command) 
Else 
Set Plus_Execute = Conn.Execute(Command) 
End If

全部

n***

回答