Microsoft VBScript 编译器错误 (0x800A03F6)

错误类型：
Microsoft VBScript 编译器错误 (0x800A03F6)
缺少 'End'
/cj1/querrycj.asp, 第 52 行

下面的是代码:

<%
xh=replace(request("xh"),"'","")
kc=replace(request("kc"),"'","")
%>
<!-- #include file="inc/conn.asp"-->
<%sql="select * from cj where 1=1 "
if request("kind")="9" then
if xh="" then
sql=sql&"and xh='"&xh&"' "
End If
if kc<>"" then
response.write "<script language=JavaScript>" & chr(13) &

"alert('请您输入课程名');" & "history.back()" & "</script>"
Response.End
end if
If kc <> "不清楚" Then
sql=sql&"and kc='"&kc&"'"
End If

set rs1=conn.execute(sql)

%>
&l

microsoft Microsoft MICROSOFT Microsoft是什么意思 Microsoft代理 microsoft update Microsoft Office Microsoft FrontPage microsoft安装 microsoft office