我的电脑一开就会弹出pinyinup.exe-应用程序错误

<% set rs=server.createobject("adodb.recordset")
page=clng(request("page"))
sql="select*from book"
rs.open sql,conn,1,1
'以下是分页
rs.pagesize=4
if page<1 then page=1
if page>rs.pagecount then page = rs.pagecount
if rs.pagecount >0 then rs.absolutepage=page
myself=request.ServerVariables("PATH_INFO")%>
这里写显示数据库的数据代码

<%if rs.pagecount > 1 then%>
<a href="<%=myself%>?page=<%=(page-1)%>">上一页</a>

<% for i=1 to rs.pagecount
if i=page then
color="red"
response.Write"<font color="+color+">"+cstr(i)+"</font> "
else
color="black"
response.Write"<a href="+ myself + "?page="+cstr(i)+"><font color="+color+">"+cstr(i)+"</font></a> " <