1,000 eCPM can earn you only $0.01
Just a script that does nothing but loads a page repeatedly...
Hmmm... might be useful or not useful...
Can It be used to accumulate eCPM?
Totally up to you...
psURL = "Your desired url..."
psURL2 = "Second desired url..."
Dim x
Dim IE
x=0
Set IE = CreateObject("InternetExplorer.Application")
With IE
.menubar=0
.toolbar=0
.statusBar=0
.navigate psURL
.visible=0
.resizable=1
Do while .busy
Loop
Do While x < "desired amout of page loads"
WScript.Echo Now & " - Count Load: " & x
.navigate2 psURL
WScript.Echo Now & " - Loaded: " & psURL
Do while .busy
Loop
x =x + 1
WScript.Echo Now & " - 15sec sleep..."
WScript.Sleep(15000)
.navigate2 psURL2
WScript.Echo Now & " - Loaded: " & psURL2
Loop
End With
No comments:
Post a Comment