Winsock control

[mohan_balal]

Now, I put two winsock controls in Form. Here is my Form Load code: Dim cnt, cnt1 cnt = 0 For i = 1 To List1.ListCount Load Winsock1(i) Winsock1(i).LocalPort = List1.List(cnt) Winsock1(i).Listen For j = 1 To List1.ListCount cnt1 = cnt + 1 Winsock2(j).LocalPort = List1.List(cnt1) Winsock2(j).Listen Next MsgBox List1.List(cnt) cnt = cnt + 1 Next Error is: Run-time Error "438" Object doesn't support this Property and Method. Mybe Problem is Index Value of Both winsock1 and winsock2 controls. I want to First Port Number Open and Listen by winsock1(i) then second Port Number open and Listen by Winsock2(j). Please send me Reply soon Mohan :confused: Mohan Balal

[Dave Kreskowiak]

You didn't say what line the error occured on. But, I'll take a guess and say that .List() is not a member of List1. You don't say what List1 is so I really can't tell you what to do to correct it. RageInTheMachine9532 "...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome