主题：[求助]如何修改群发短信代码

如果这样，你能一个人发，其他人将要发送的信息写入一个表中，另外一个人定期调用这个表的数据发送。
当然还得有个标记列，表明这行数据是否发送完毕。

定时器的代码：
 
Dim dt As DataTable
Dim cmd As New SQLCommand
cmd.CommandText = "Select  Top 10 From {数据表} where 已发送 = False Or 已发送 Is Null " '注意要包括主键列
dt = cmd.ExecuteReader(True) '注意可选参数设置为True
For Each dr As DataRow In dt.DataRows

    ’发送信息
    dr("已发送") = True
Next
dt.Save()