Sistema Web

[daianyyy 0]

Oi pessoal ..preciso que você me ajudem ...tenho um sistema Web e esse sistema Web se comunica com um webservice ....preciso que o sistema teste a todo segundo sem parar se o webservice tem alguma informação ....tem como eu fazer isso ....qual a melhor maneira ???

[xanburzum 169]

Funcao para Invocar o WebService  

Public Function Invoke()

Dim xmlhttp

Set xmlhttp = Server.CreateObject("MSXML2.XMLHTTP")

xmlhttp.open "POST", Url & "/" & Method, false

xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

xmlhttp.Send Parameters.toString

response = xmlhttp.responseText

set xmlhttp = nothing

End Function

[daianyyy 0]

Olá xanburzum... obrigada pela resposta mas será que tem como me passar esse codigo em C# e me explicar o que ele está fazendo pra eu entender !!!!

[xanburzum 169]

em C#, você apenas irá ler o XMLHTTP, deve ser a mesma coisa, mas caso tenha duvida sobre C#, poste no forum de .NET

[daianyyy 0]

Certo ...mas será que pode me explicar melhor o que esse código está fazendo ????

[xanburzum 169]

você estará lendo uma url

Set xmlhttp = Server.CreateObject("MSXML2.XMLHTTP")

'Substituir localhost com o servidor que você gostaria de escrever

 

xmlhttp.open "POST", Url & "/" & Method, false

'cabeçalho definido para dizer que recebe os dados do formulário que está postando

xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"

xmlhttp.Send Parameters.toString

'enviar dados na forma de uma seqüência de consulta

response = xmlhttp.responseText

set xmlhttp = nothing

 

mais detalhes

[daianyyy 0]

Agora sim deu pra entender melhor xanburzum....valeu ....

Só mais uma dúvida em qual parte do meu código eu posso chamar esse método ...já que naum vai ter nenhum evento pra chama-lo ele vai ter que fikar execuntando direto sem parar ...como eu o chamo ???

[xanburzum 169]

execute-o quando for necessario ter um "feedback" do server

[daianyyy 0]

O negocio é que naum tem como eu saber quando ele vai precisar desse feedback ele terá que fikar a todo momento asguardando dados do webservice ...será que é o caso de usar um processo daemon????

[xanburzum 169]

você executa o code

[daianyyy 0]

você executa o code

 

Desculpa minha ignorancia ....mas tem como me explicar como faço isso melhor ????

[xanburzum 169]

antes do momento de receber/enviar dados do webservice ..

 

Funcao para Invocar o WebService  
Public Function Invoke()  
  Dim xmlhttp   
 Set xmlhttp = Server.CreateObject("MSXML2.XMLHTTP") 
   xmlhttp.open "POST", Url & "/" & Method, false 
   xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded" 
   xmlhttp.Send Parameters.toString   
 response = xmlhttp.responseText 
   set xmlhttp = nothing  
End Function