as you se in the picture the ( red ) arrows are the first 4 to be processed then the next 4 (green ) then on and on how do i do this with winsock please help.
Code:
Text1.Text = ""
ws.Close
ws.Connect "www.xxx", 80Code:
dim login2 as string
login2 = "referer=http%3A%2F%2Fwww.xxx.com%2Fprofiles%2Fextramiri69&login=luaran%40xxx.com&password=luaran12&log=Login+to+your+account"
packet = "POST /account HTTP/1.1" & vbCrLf
packet = packet & "Host: xxx.xxx.com" & vbCrLf
packet = packet & "User-Agent: Mozilla/5.0 (Windows NT 5.1; rv:27.0) Gecko/20100101 Firefox/27.0" & vbCrLf
packet = packet & "Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8" & vbCrLf
packet = packet & "Accept-Language: en-US,en;q=0.5" & vbCrLf
packet = packet & "Accept -Encoding: gzip , deflate" & vbCrLf
packet = packet & "Referer: http://xxx.xxx.com/account" & vbCrLf
packet = packet & "Cookie: SEARCHPREF=relevance%7Call%7Callduration; __utma=263005381.540867190.1393361445.1394778404.1395034650.4; __utmz=263005381.1393361445.1.1.utmcsr=(direct)|utmccn=(direct)|utmcmd=(none); __utmb=263005381.1.10.1395034650; __utmc=263005381; DISPLAY_PREF=body_unit%3DEU" & vbCrLf
packet = packet & "Connection: keep -alive" & vbCrLf
packet = packet & "Content-Type: application/x-www-form-urlencoded" & vbCrLf
packet = packet & "Content-Length: " & Len(login2) & vbCrLf & vbCrLf & login2
ws.SendData packetas you se the red highlighted text this is the username so , how do i use from list1 4 items at a time loading 4 sockets.