我只说我知道 的，不用采纳 ，免得别人以为我干嘛，只是大家都是从不知道到知道 。
成都创新互联专注于新晃网站建设服务及定制，我们拥有丰富的企业做网站经验。 热诚为您提供新晃营销型网站建设，新晃网站制作、新晃网页设计、新晃网站官网定制、微信小程序定制开发服务，打造新晃网络公司原创品牌,更为您提供新晃网站排名全网营销落地服务。
I.客户端：
II.java是后缀为jar;
II.vb和c#是.exe，下一个notepad++，右键用notepad打开他们，是有区别的！
I.服务端：
II.http协议的（web网站）：
III.没有源码：
IIII.java一般路径是do或者action,
IIII.C#一般是ashx,或者没有后缀，vb服务端太少了，越少，学的人越 少m招工就越难，所以一般公司不会用vb做服务端,delphi都少见了。
III.有源码：自己搞定- -！(比如服务器类型，工程目录结构)
II.TCP/UDP协议
III.没有源码：
IIII.我不会。。
III.有源码：
IIII.找几个单词放百度里，就有结果了
这个恐怕有点难度，比如用户输入text.txt，你可能认为text.txt不允许输，但是说不定用户有文件名字命名为text.txt.exe的可执行文件存在，所以要过滤扩展名靠判断.号意义不大
这个问题可以用注册表解决。
Function getOpenCommand(fileExt As String) as String
Dim fileType as String, openCommand as String
fileExt = "." + fileExt
'取得文件扩展名在注册表里的文件类型名称
'比如.zip的类型名称一般是zipfile
fileType = 读取注册表的classes_root下的子键(fileExt)的默认键值
'取得打开这种文件的程序
openCommand = 读取注册表的classes_root下的子键(fileType + "\shell\open\command")的默认键值
Return getOpenCommand
End Function
读取注册表的HKEY_CLASSES_ROOT下的子键的默认键值的方法可以在网上搜索到。
这样getOpenCommand("doc")就可以得到一个字符串(包括引号)：
"C:\Program Files\Word\word.exe" "%1"
这里只需要用Spilt函数把C:\Program Files\Word\word.exe分离出来就好了
