|
发表于 2014-4-23 09:15:48
|
显示全部楼层
四川省成都市
[e]
.版本 2
.子程序 删除cookies目录
.局部变量 ICEI, INTERNET_CACHE_ENTRY_INFO
.局部变量 ret
.局部变量 hEntry
.局部变量 Msg
.局部变量 MemBlock, MemoryBlock
.局部变量 局_返回文本, 文本型
寻找第一个Url缓存入口_ (字符 (0), 0, ret)
.如果真 (ret > 0)
MemBlock.Allocate (ret)
hEntry = 寻找第一个Url缓存入口_ (字符 (0), m_VirtualMem, ret)
MemBlock.ReadFrom (ICEI, Len_ICEI (ICEI))
.如果真 (ICEI.lpszSourceUrlName ≠ 0)
删除Url缓存入口_ (MemBlock.ExtractString (ICEI.lpszSourceUrlName, ret))
.如果真结束
.判断循环首 (hEntry ≠ 0)
ret = 0
寻找下一个Url缓存入口_ (hEntry, 0, ret)
.如果 (ret > 0)
MemBlock.Allocate (ret)
寻找下一个Url缓存入口_ (hEntry, MemBlock.Handle (), ret)
MemBlock.ReadFrom (ICEI, Len_ICEI (ICEI))
.如果真 (ICEI.lpszSourceUrlName ≠ 0)
删除Url缓存入口_ (MemBlock.ExtractString (ICEI.lpszSourceUrlName, ret))
.如果真结束
.否则
跳出循环 ()
.如果结束
.判断循环尾 ()
.如果真结束
关闭寻找缓存_ (hEntry)
[/e] |
|