Sockets.TcpClient プログラミング

初めて質問するので、作法等に誤りがあるかもしれませんがどうぞよろしくお願いします。

【環境等】
OS：Windows2007
64bit
言語：Visual Stadio 2008 (Framework2.0用で開発)のVB.net

【やりたいこと】
Sockets.TcpClientを使用して自PC上で自PC宛てに通信を行いたい

【解決したい内容】
実行時にファイアウォールのブロック警告をでないようにしたい。
・初回実行でアクセス許可を行ったあと、アプリを別フォルダに移して実行すると再度警告がでる
・下記自作PGの抜粋

Dim objSck As Sockets.TcpClient
Dim objStm As Sockets.NetworkStream

Dim myTcpClient As Sockets.TcpClient = myListener.AcceptTcpClient()
objSck = myTcpClient
objStm = myTcpClient.GetStream()

以上
解決方法をご存じの方はご教示いただければ幸いです。
よろしくお願い致します。

No.2 ベストアンサー 回答者： Yune-Kichi 回答日時： 2013/02/22 12:27

えーっと，Windows 2007? Windows 7でしょうか。

ファイアーウォールへの追加は，COMなので面倒ですが……。
基本的に，一意なパスで特定されるファイルに対しての許可なので，移動させたりファイル名を変更すると再度追加が必要になります。

APIベースでは，
Windows XPならINetFwAuthorizedApplications.Add
ref) http://msdn.microsoft.com/en-us/library/aa365260 …
Vista以降ならINetFwRules.Add
ref) http://msdn.microsoft.com/en-us/library/aa365346 …
でしょうか。

前者については
http://msdn.microsoft.com/en-us/library/aa366421 …
後者については
http://msdn.microsoft.com/en-us/library/aa364695 …
あたりが入口になるかと。
# どちらにしても，Administrators権限が要りそうな気がしますが……。

この回答へのお礼

Windows7でしたね。すみません。
また、早速の対応ありがとうございます。
ご教授頂いたものを参考に、コマンドプロンプトを実行する方向で実現できました。

お礼日時：2013/02/23 06:07

No.1 回答者： noname#174784 回答日時： 2013/02/22 11:40

文字コードをcuntにしてください。

この回答へのお礼

すみません「文字コードをcunt」のやりかたがわかりません。
設定があるんですかね？

お礼日時：2013/02/23 06:11