语法错误 (操作符丢失) 在查询表达式 'id=' 中

<%
dim var_id
var_id=request.QueryString("id")      '获得要修改的记录的网站编号
session("id")=var_id
dim conn
set conn=server.CreateObject("ADODB.Connection")      '建立connection对象的实例
conn.open "web"       ' 利用数据源连接数据库

'以下打开记录集
dim strsql,rs
strsql="select * from web where id=" & var_id
set rs=conn.execute(strsql)
%>
<center>
<table width=100% border=1>
<form name="form1" method="post" action="update_form.asp">
<tr><td>网站名称</td><td><input type="text" name="name" size=20 value="<%=rs("name")%>" ></td>
</tr>
<tr><td>网站网址</td><td><input type="text" name="url" size=40 value="<%=rs("url")%>"  ></td></tr>
<tr><td>网站说明</td><td><input name="text" type="text" value="<%=rs("text")%>" size=40  ></td></tr>
<tr><td></td><td><input type="submit" value="确定"  ></td></tr>
</form></table>

[ 本帖最后由 qq757500610 于 2010-6-2 18:00 编辑 ]