Winsock, Packets, and IPs... HElP!

Ok, heres the situation =)

I would like to write a proggie that monitors ports 2600, 6660, 7080, 80, and 21 for incoming connections.
When it recieves one I would like it to get the destination IP from the data packet, and store that in a variable.
I would also like to be able to chage the source IP to 62.30.88.76 (My IP).
Then foward the modified packet to the destination using winsock (I can do this part).

Any ideas people? Or is this too complicated for VB? ;P

Thanks

GD