扫二维码与项目经理沟通
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
这个问题可以用注册表解决。
创新互联建站服务项目包括武汉网站建设、武汉网站制作、武汉网页制作以及武汉网络营销策划等。多年来，我们专注于互联网行业，利用自身积累的技术优势、行业经验、深度合作伙伴关系等，向广大中小型企业、政府机构等提供互联网行业的解决方案，武汉网站推广取得了明显的社会效益与经济效益。目前，我们服务的客户以成都为中心已经辐射到武汉省份的部分城市，未来相信会继续扩大服务区域并继续获得客户的支持与信任！
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分离出来就好了
If System.IO.File.ReadAllBytes(文衫正衫件名或腔1).SequenceEqual(System.IO.File.ReadAllBytes(文件名清粗2)) Then
相等
Else
不相等
End If
合法肆绝性校验有很多方闷雹法，蚂雹帆要视情况而定，比如说可以用正则表达式，如果是数字，除了正则表达式，也可以用诸如TryParse这种方法。
我们在微信上24小时期待你的声音
解答本文疑问/技术咨询/运营咨询/技术建议/互联网交流
微信二维码
移动版官网