First question...
******************


how do I change the flag settings in an ICMP-packet.

Private Type ICMP_OPTIONS
Ttl As Byte
Tos As Byte
Flags As Byte <----
OptionsSize As Byte
OptionsData As Long
End Type

Call IcmpSendEcho(hPort, dwAddress, sDataToSend, _
Len (sDataToSend), 0, ECHO, Len(ECHO), PING_TIMEOUT)


Second question...
******************

is it possible to create TCP/IP packets with VB?