乖乖虎有一个小东东让我帮他改一下
是个ASP的程序
根据需求，改了一下代码，主要是增加了一个Sub
还真不会写了，总是在最后一行加上分号，判断语句中加{}........
Sub UserExists(userid,username)
Set objRs = Server.CreateObject("ADODB.Recordset")
Dim sSql
sSql = "select dat,menudes from log where dat=#" & dat & "# and userid="&userid
objRs.open sSql,conn 1,1
If (objRs.Eof And objRs.Bof)
response.write("")
Else
Response.Write("<tr bgcolor=""#ffffff""><td width=""25%"" align=""center"">"&userid&"</td><td width=""25%"" align=""center"">"&username&"</td><td width=""25%"" align=""center"">"&rs("menudes")&"</td><td width=""25%"" align=""center"">"&objRs("dat")&"</td></tr>")
End if
End sub
结果
一直提示"语句未结束"
这行……
实在没看出错在哪....
删除了重新输入,结果还是如此