sexta-feira, 4 de dezembro de 2009

Agendamento de chamada ASP via VBS

Se você precisa rodar uma chamada agendada a uma página ASP via Tarefa Agendada do Windows, crie um arquivo .vbs com esse código abaixo:


‘Force the script to finish on an error.
On Error Resume Next

'Declare variables
Dim objRequest
Dim URL

Set objRequest = CreateObject("Microsoft.XMLHTTP")

'Put together the URL link appending the Variables.
URL = "http://www.YourDomain.com/track.aspx

'Open the HTTP request and pass the URL to the objRequest object
objRequest.open "POST", URL , false

'Send the HTML Request
objRequest.Send

'Set the object to nothing
Set objRequest = Nothing

Em seguida o salve um local apropriado.

Crie um job no windows seguindo essa sintaxe em sua chamada:

C:\WINDOWS\system32\wscript.exe {caminho completo do arquivo}.vbs

Para testar pode forçar a execução do mesmo.

Abraço a todos.