把一条信息同时发给两个不同用户的代码，如下代码哪里出了问题？
Zt_zsdw2=request.Form("Zt_zsdw2")Zt_zsdw=request.Form("Zt_zsdw")
if Zt_zsdw2<>"" and Zt_zsdw<>"" then
Zt_zsdw2=split(Zt_zsdw2," ")
Zt_zsdw=split(Zt_zsdw," ")
for strfid=0 to ubound(Zt_zsdw)
if Zt_zsdw(strfid)<>"" then
sql="Zt_jjcd,str,无,Zt_gwmd,str,无,Zt_title,str,无,Zt_ztc,str,无,Zt_zy,str,无,Zt_ffbm,str,无,Zt_zsdw,str,"&getuser("zt_user",userid,"zt_username","未知")&",Zt_csdw,str,0,Zt_qfr,str,"&Zt_zsdw(strfid)&",Zt_fwsm,str,无,Zt_ngr,str,无,Zt_ngrq,str,无,Zt_ngbm,str,无,Mytxt,str,无,Userid,int,"&userid&""
call updates("Zt_gwlc",sql,"insert",0)
sql="Zt_jjcd,str,无,Zt_gwmd,str,无,Zt_title,str,无,Zt_ztc,str,无,Zt_zy,str,无,Zt_ffbm,str,无,Zt_zsdw,str,"&getuser("zt_user",Zt_zsdw(strfid),"zt_username","未知")&",Zt_csdw,str,0,Zt_qfr,str,"&getuser("zt_user",userid,"zt_username","未知")&",Zt_fwsm,str,无,Zt_ngr,str,无,Zt_ngrq,str,无,Zt_ngbm,str,无,Mytxt,str,无,Userid,int,"&getuser("zt_user",userid,"zt_username","未知")&""
call updates("Zt_gwlc",sql,"insert",0)
end if
next
end if
