您所在位置：主题：以前做一个垃圾软件.bux站点等自动点击广告
天天学习
[专家分：4570] 发布于 2008-06-08 12:03:00
以前在网上看到点广告都可以赚钱，就一时心血来潮，了解了下，觉得手动点广告麻烦，就想试着做了一个自动点击的工具，做到将要完成时，发现没做的必要，就放在那里没去管了。
此程序相当垃圾，运行起来狂占内存,在任务管理器中看到的内存使用率常常都是100%，内存使用哗啦啦地往上升，但不觉得“卡”，不知道该哪里优化内存使用。（估计是Timer事件多处调用其它耗时的过程，而很多过程都调用了如下的过程：
Public Sub nWait(ByVal nSec As Long)
'Debug.Print "nwait " & nSec
nSec = Timer + nSec
Do Until Timer > nSec Or stopFlag '当客户通过调用TaskStop希望停止任务时，通过stopFlag从延迟退出
DoEvents '防止程序“假死”
Loop
End Sub
）另外，由于可能在同一时间有多个ActiveX EXE 的实例（执行多个任务时）,虽然理论上认为是各自运行在进程外的不同空间，但相互之间是否有影响也不知道。即使只执行一个任务，内存使用并不比执行多个任务时少？！！！[em10]
现在发出来，欢迎大家来批斗。[em10]
此程序相当垃圾，运行起来狂占内存,在任务管理器中看到的内存使用率常常都是100%，内存使用哗啦啦地往上升，但不觉得“卡”，不知道该哪里优化内存使用。（估计是Timer事件多处调用其它耗时的过程，而很多过程都调用了如下的过程：
Public Sub nWait(ByVal nSec As Long)
'Debug.Print "nwait " & nSec
nSec = Timer + nSec
Do Until Timer > nSec Or stopFlag '当客户通过调用TaskStop希望停止任务时，通过stopFlag从延迟退出
DoEvents '防止程序“假死”
Loop
End Sub
）另外，由于可能在同一时间有多个ActiveX EXE 的实例（执行多个任务时）,虽然理论上认为是各自运行在进程外的不同空间，但相互之间是否有影响也不知道。即使只执行一个任务，内存使用并不比执行多个任务时少？！！！[em10]
现在发出来，欢迎大家来批斗。[em10]
