首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

2个有关问题

2012-03-14 
求助各位高手2个问题第一个问题:怎样检验文件的md5码并显示出来?第二个问题:怎样给自己的程序添加上代理并

求助各位高手2个问题
第一个问题:
怎样检验文件的md5码   并显示出来?
第二个问题:
怎样给自己的程序添加上代理   并用这个代理访问网络?

[解决办法]
//怎样检验文件的md5码 并显示出来?

//

用这个类:

http://www.m5home.com/bbs/dispbbs.asp?boardid=10&id=1479

很久以前就收集了,一直忘了放上去.

//怎样给自己的程序添加上代理 并用这个代理访问网络?

需要了解使用代理服务器时的具体协议
[解决办法]
设置代理麻.并不难啦,用wininet的API或者注册表,WMI更改都可以.

把WMI设置和查询代理的脚本提供给你..因为API的我写的是结合注册表和WININET写的,比较难看麻!

“win32_Proxy”程序组用于恢复代理服务器所运行环境的当前设置,同时为代理服务器和端口设置新值。如果你要使用WPA的“ActivateOnline”程序,并且需要激活通过防火墙连接到Internet 的机器,就要先设置代理服务器。在设置前,应该先保存代理服务器的现有值,以便完成操作后进行恢复。
恢复代理服务器的当前名和端口设置。

wpa_GetProxy.vbs


for each Obj in GetObject( "winmgmts:{impersonationLevel=impersonate} ").
InstancesOf ( "win32_Proxy ")

WScript.Echo
Obj.ProxyServer,
Obj.ProxyPortNumber
next


“SetProxySetting(设置代理服务器)”程序用于为当前代理服务器和端口所运行的环境设置新值。如何设置代理服务器:

myProxyServer= "myproxy "
myProxyPort=80

for each Obj in GetObject( "winmgmts:{impersonationLevel=impersonate} ").
InstancesOf ( "win32_Proxy ")

result = Obj.SetProxySetting(myProxyServer,myProxyPort)

end if
next

热点排行