一个问题,急死我了,高手帮帮我啊

[cdonnet]

我在一个页面中有几个CHECKBOX,定义如下:
<input type="checkbox" value="<%= CStr(Recordset1.Fields.Item("zhuanyeid").Value) %>" onclick=unselectall() Name="chkNum">

在另一个页面接受并处理,代码如下:

<%
Sub DelRecord(StudentNum) '删除记录
MM_editQuery = "delete from yuanxi where zhuanyeid='"+StudentNum+"'"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "dsn=xjgl;uid='';pwd=''"
Conn.Execute(MM_editQuery)
End sub
%>


If not isempty(Request("chkNum")) Then
strTemp = Request("chkNum")
if instr(strTemp,",")>0 then
dim ArrStudentNum
ArrStudentNum = split(strTemp,",")
dim id
For i = LBound(ArrStudentNum) To UBound(ArrStudentNum)
id=ArrStudentNum(i)
call DelRecord(id)
next
else
call DelRecord(strTemp)
end if


运行结果,如果我选择一个CHECKBOX一切正常,,如果我选2个以上只删除一条"zhuanyeid"较小的记录
zhuanyeid分别为"001,002,003..........."

还请高手帮忙啊,多少分都给

[lovebeyondforever]

我不是高手

既然能删除 那就肯定不是页面2的错误

把检测checked的代码贴出来看看

[cdonnet]

CHECKBOX肯定是没有错的，因为我把id=ArrStudentNum(i)改成id=Clng(ArrStudentNum(i))而且数据库内容不以０开头，是正确的，所以，我估计应该是ＣＬＮＧ和ＣＳＴＲ之间的问题，还请大吓指点一下

[cdonnet]

还是空格问题,真晕

[leo963258]

<%
zhuanyeid=request("zhuanyeid")
Arr=split(zhuanyeid,",")
for i=1 to ubound(Arr)
sql=sql&" or id="&Arr(i)
next
%>
//局部思路