Microsoft VBScript compilation error '800a0400' 错误

打开网页显示（如下图1）

Microsoft VBScript compilation error '800a0400'

Expected statement

\member\Top.asp, line 26

这行出现错误、请大虾求助下面这段代码我少写了哪处还是多写了

<%
if issession=0 then
username=Replace_Text(request.Cookies("Yxmember"))
gradeid=Replace_Text(request.Cookies("gradeid"))
else
username=session("user")
gradeid=session("gradeid")
end if


//'自动生成用户网站*******20080420********************************（这就是出错的代码第26行）

rolelist="no"
set rsgg=server.CreateObject("adodb.recordset")
sqlgg=" select rolelist from Websen_vipgrade where roleid="&gradeid
rsgg.open sqlgg,conn,1,1
if not rsgg.eof then
rolelist=rsgg("rolelist")
rsgg.close
end if

//****************************************************************


%>

（图1如下）

（源代码图2如下）

还请大虾们帮帮忙了

VBScript的注释是用单引号,不是双斜杠

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息