发表于 2015-9-26 01:48:04
|
显示全部楼层
浙江省杭州市
变量名 类 型 静态 数组 备 注 FSO 对象 文件名 文本型
InternetSetOption ( 0,
#INTERNET_OPTION_END_BROWSER_SESSION, 0, 0
) 文件名 =
寻找文件 ( 取文本注册项 ( #现行用户, “Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Cookies” ,
) +
“\*.txt” ,
) 如果真 ( FSO.
创建 ( “scripting.FileSystemObject” ,
) )
如果 ( 被清除文件 =
“” ) FSO.
方法 ( “DeleteFile” ,
取文本注册项 ( #现行用户, “Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Cookies” ,
) +
“\*.txt” , 1
) 文件名 =
寻找文件 ( “C:\Documents and Settings\IBM\Cookies\*.txt” ,
) 判断循环首 ( 文件名 ≠
“” ) 如果 ( 寻找文本 ( 文件名, 被清除文件, ,
假 ) > 0
) FSO.
方法 ( “DeleteFile” ,
取文本注册项 ( #现行用户, “Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders\Cookies” ,
) +
“\” + 文件名, 1
) 文件名 = 寻找文件 ( , ) 处理事件 ( ) 判断循环尾 ( )
.版本 2
.DLL命令 InternetSetOption, 整数型, "wininet.dll", "InternetSetOptionA"
.参数 hInternet, 整数型
.参数 dwOption, 整数型
.参数 lpBuffer, 整数型, , Any型,根据需要可以设置成不同的类型
.参数 dwBufferLength, 整数型