應該還有壹個是非變量：是否已讀
select * from user_data order by nameid '可以用where選擇妳的群發對象
........略過
do while not rs.eof
select * from primsg
........略過
rsmsg.addnew
i=i+1
rsmsg("primsguser")=rs("name")
rsmsg("shouid")=rs("nameid")
rsmsg("primsgtitle") =短信標題
rsmsg("primsgcontent")=短信內容
rsmsg("primsgtime")=now()
rsmsg.update
response.write i&":發送到"&rs("name")&"成功<br>"
rs.movenext
loop