上页代码：<td align="center" height="20"><a href=vipchange.asp?id=<%=rs("id")%>><%=rs("vip")%></a></td>
显示出来 1
实现功能是点击“１”后，交给Vipchange.asp处理，修改为0
如果是“０”，则点击后修改为"1"
可现在点击“1"或"０”后，出现错误

数据库里的值是文本型，是为1，否为0

<%set rs = server.CreateObject ("adodb.recordset")
sql="select * from company where id="&request("id")
rs.open sql,conn,3,3
if rs("vip")="0" then
vip="1"
else
vip="0"

rs("vip")=vip
rs.update
end if
rs.close
set rs=nothing
%>
错误类型：
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] 语法错误 (操作符丢失) 在查询表达式 'id=295 ' 中。
/tuangou/www/admin/vipchange.asp, 第 17 行
就是这一行 rs.open sql,conn,3,3

到底那错了！气人
还有半个小时就要上交了，谢谢，给个签字吧！

sql="select * from company where id="&request("id")

sql="select * from company where id='"&request("id")&"'"

已经试过了，不行！　ID是自动编号！

修改后出现类型不匹配，我也看不出来是那里的问题！　大家看看给个答案啊！

重新定义rs sql以防前面已定义而未关闭。。。还有数据库字段设计要注意，若是复制的数据库则注意字段的类型，默认值，主键等设置是否正确

这一句是否能得到值？
sql="select * from company where id="&request("id")
rs.open,sql,conn,1,3

[[it] 本帖最后由 dhdhzzw 于 2008-2-22 17:58 编辑 [/it]]

条件语句不对。为了区分2个vip，数据库里的vip字段，我就称rs("vip")。
    你的条件句的实现的是：rs("vip")值为0时,只是修改vip的为1，并没有修改数据库里rs("vip")的值；但为其他值时改变量vip的值，并修改数据库里rs("vip")的值。执行的结果就是，数据库里的rs("vip")总是0。代码应改为：
if rs("vip")="0" then
    vip="1"
else
    vip="0"
end if
rs("vip")=vip
rs.update

[[it] 本帖最后由 lonetve 于 2008-2-22 21:01 编辑 [/it]]

那我这样写了，对吗？　但是还是错误！
Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
[Microsoft][ODBC Microsoft Access Driver] 语法错误 (操作符丢失) 在查询表达式 'id=295　' 中。
/www/admin/vipchange.asp, 第 18 行
还是这一行　rs.open sql,conn,１,3


if rs("vip")="0" then
    vip="1"
elseif rs("vip")="1" then
    vip="0"
end if
rs("vip")=vip
rs.update

谁给个答案啊，急啊，就是弄不好！

操作符丢失应该是SQL语句不正确吧

Response.Write Request("id")
检查值有没有传过来

<%
id=request("id")
set rs = server.CreateObject ("adodb.recordset")
sql="select * from company where id="id
rs.open sql,conn,1,3
if rs("vip")="0" then
vip="1"
else
vip="0"
rs.addnew
rs("vip")=vip
rs.update
end if
rs.close
set rs=nothing
%>