IPV6でのRAWモード

プログラミング

コメントビューアをIPV6環境でも動くようにしたいのですが、単純には行かないようです＞＜
まず、オプションの設定で落ちます・・・
とりあえず、現状ではIPV6の方は、使えません・・・ごめんなさい。

どなたか、IPV6環境下でパケットキャプチャーの仕方おしえてください（泣)

　Dim local As IPEndPoint = New IPEndPoint(IPAddress.Parse(cipaddress), 0)
　'ソケットをRAWモードでオープン
　 Socket = New Socket(local.Address.AddressFamily, SocketType.Raw, ProtocolType.IP)
　 '非同期モード
　 Socket.Blocking = False
　 '取得するＩＰアドレスをバインド
　 Socket.Bind(local)
　 'オプション設定
　 Socket.SetSocketOption(SocketOptionLevel.IP, SocketOptionName.AcceptConnection, True)

　 'プロミスキャスモードに設定
　 Socket.IOControl(IOControlCode.ReceiveAll, New Byte() {1, 0, 0, 0}, New Byte() {0, 0, 0, 0})

　 Dim so As New AsyncStateObject(Socket)

　 '取得開始
　 Socket.BeginReceive(so.ReceiveBuffer, 0, so.ReceiveBuffer.Length, SocketFlags.None, New AsyncCallback(AddressOf ReceptionCallback), so)