请问如何用时间数组控件在winsock数组控件下向不同的IP连续发多个命令?而且每个命令之间要有270ms左右的时间间隔,时间数组控件能否实现这样的循环??

解决方案 »

  1.   

    就是比如我提前存好几组数据,数据是由多个IP和多个命令组成..也就是说要向多个IP地址里发送命令,而每一个IP下指定好几组命令.当发送数据时,可以按照IP的顺序把命令一个个的发送到它所指定的IP中去.其中每个命令之间有270ms的时间间隔
      

  2.   

    再开个winsock数组分别连接会好些,定时器可以设置270ms
      

  3.   

    再多开一个?我现在已经开有一个winsock数组了.然后在Timer控件里加了下面的for循环语句!但是这样子发送数据的话每个IP同时只能接收到一个命令,并不是我要求的按照IP顺序使命令一个个的发送!
     For i = 0 To rs.RecordCount - 1
     Set ds = New ADODB.Recordset
      S.Open "select * from ModeSetup where InterIP='" & Winsock1(i).RemoteHost & "'and WlanName='" & Label1.Caption & "' and SetName='" & a(i) & "' order by InterIP ", cnn, 1, 3
    If Winsock1(i).State = 7 Then
                   DSSendDataType = ds.Fields!OpenCode
                 Dim byteArray() As Byte    strSend = Split(Trim(DSSendDataType))
        intCount = UBound(strSend) - LBound(strSend) + 1
        ReDim byteArray(0 To intCount - 1)
       For j = 0 To intCount - 1
       byteArray(j) = CByte(Val("&H" + strSend(j))) And &HFF
        Next j
        byteSend = byteArray
        Winsock1(i).SendData byteSend
        End If
        If i = rs.RecordCount - 1 Then
          Timer3.Enabled = False
          End If
          Next i