那位仁兄帮我看看啊！这里老是问题，可能是脚本语言的错误，可我不知道怎么改啊！！
帮帮吧！

<%@LANGUAGE="VBSCRIPT"%>

<%
set rs = Server.CreateObject("ADODB.Recordset")
rs.ActiveConnection = MM_connweb_STRING
rs.Source = "SELECT * FROM diaocha"
rs.CursorType = 0
rs.CursorLocation = 2
rs.LockType = 3
rs.Open()
rs_numRows = 0
%>
<%
dim vote
vote=request.form("vote")
if (vote=="link")
rs.fields.item("link").value++;
else if (vote=="search")
rs.fields.item("search").value++;
else if (vote=="friend")
rs.fields.item("friend").value++;
else if (vote=="other")
rs.fields.item("other").value++;
rs.update();
%>
<% response.redirect("voteresult.asp") %>
提示错误：
Microsoft VBScript 编译器错误 错误 '800a03ea'

语法错误

/shopping/TMP4wcnz5syrf.asp，行16

if (vote=="link")
---------^