实在解决不了了，大家帮帮忙！

[abcd6108dcba]

<%
Dim gools
if Request("B12")=" 发 送 " then
gools=split(request("gool"),",")
for i=0 to ubound(gools)-1
set rs1=server.createobject("adodb.recordset")
Dim mm
set mm= gools(i) －－－－－－报错（15行）
sql="update auc.customer_info set depart_a='d' where move_phone='mm' "
rs1.open sql,conn,1,1
next
end if
%>

运行是总是报错，Microsoft VBScript 运行时错误 (0x800A01A8)
缺少对象: '[string: "asdasd"]'
/asp/查询.asp, 第 15 行，注：asdasd 是gools的第一个元素

[abcd6108dcba]

自己顶一下

[Lutx]

sql="update auc.customer_info set depart_a='d' where move_phone='mm' "
=>
sql="update auc.customer_info set depart_a='d' where move_phone='"+mm+"' "

[阿泰]

这点语句,多处错误

set mm= gools(i)

这样的mm是个object
而gools(i)是个字符串
这样就可以了
mm= gools(i)
后面的如楼上所说

[hackate]

把
sql="update auc.customer_info set depart_a='d' where move_phone='mm' "
改成下面

sql="update auc.customer_info set depart_a='d' where move_phone='"&mm&"'"