Site Online Ou Offline
Started By Patrique, 22/03/2007, 00:14
10 replies to this topic
#1
Posted 22/03/2007, 00:14
Fala ae galera, blz?
Bom a tempos atras eu vi um site que mostrava se i site estava online ou offline, gostaria de saber como se faz isso pois não tenho nem idéia de onde começar.
agradeço desde já,
[]'s
Patrique
Bom a tempos atras eu vi um site que mostrava se i site estava online ou offline, gostaria de saber como se faz isso pois não tenho nem idéia de onde começar.
agradeço desde já,
[]'s
Patrique
#2
Posted 22/03/2007, 03:55
não entendi muito bem sua pergunta..
ele ve se outros sites estão online ou off line ?
passa o site para entender melhor.
Valeu
ele ve se outros sites estão online ou off line ?
passa o site para entender melhor.
Valeu
Não me adicione no MSN pq eu não vo te ajuda... se insistir eu vo ser grosso!!!
Ta com dúvida pergunta aqui no fórum...
Grato
Ta com dúvida pergunta aqui no fórum...
Grato
#3
Posted 22/03/2007, 04:37
tpw, é só vc escrever "online" ou "offline", não acho que tenha código pra isso não ._.
devia ser só truque
devia ser só truque
#4
Posted 22/03/2007, 10:50
Acho que ele quer fazer algomo aqui no fórum, quando os Administradores deixam o fórum "offline", aparece uma mensagem do porquê está offline.
[]'s
[]'s
#5
Posted 22/03/2007, 11:38
não não galera era um site que quando eu colocava por exemplo wmonline.com.br ele mostrava que o site estava online dai se eu colocasse um site que não existe por exemlpo hwwhhwuhaoihso.com.br ele reconhecia que o site não existia e colocava offline sacaram? infelismente eu não sei mais qual é o endereço do site.
[]'s
Patrique
[]'s
Patrique
Edição feita por: Patrique, 22/03/2007, 11:39.
#7
Posted 22/03/2007, 19:39
Siola é quase isso cara, show de bola cara, mais quando eu tento colcar somente o "forum.wmonline.com.br" não ta dando certo aparece "não existe" to tentando assim
<% Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP") objXMLHTTP.Open "GET","http://forum.wmonline.com.br", false objXMLHTTP.Send If InStr(objXMLHTTP.Responsetext, "404") = 0 Then Response.write "existe" else response.write "não existe" end if Set objXMLHTTP = Nothing %>
no caso eu so quero saber se o site realmente esta online e esse script pega se no servidor existe tal arquivo, tem alguma idéia ae?
desde já agradeço,
Patrique
#8
Posted 23/03/2007, 18:41
há o um componente no ASP chamado PINGASP ou algo assim que pode ser usado.
no www.superasp.com.br tem mais informações lembro que vi lá isso.
Até Mais
no www.superasp.com.br tem mais informações lembro que vi lá isso.
Até Mais
#9
Posted 24/03/2007, 02:26
Valeu Worn vou dar uma verificada cara!
[]'s
Patrique
[]'s
Patrique
#10
Posted 24/03/2007, 16:35
Procure sobre o componente Microsoft Winsock Control, algo como mswinsock ou winsck.
Ele ativa diretamente a verificação de portas e ip enviando um connect pro ip especificado..
Eu tinha exemplos desse, tanto em VB quando em Asp diretamente, mas perdi os de Asp.. vou continuar dando uma olhada pora aqui, se achar posto para vocês.
[]'s
Ele ativa diretamente a verificação de portas e ip enviando um connect pro ip especificado..
Eu tinha exemplos desse, tanto em VB quando em Asp diretamente, mas perdi os de Asp.. vou continuar dando uma olhada pora aqui, se achar posto para vocês.
[]'s
#11
Posted 24/03/2007, 22:48
Valeu cara se encontrar manda mesmo hein!
eu estava procurando mais coisas na net e encontrei esse script
Mais não esta funcionando alguém saberia me informar porque?
desde já agradeço,
[]'s
Patrique
eu estava procurando mais coisas na net e encontrei esse script
<% Function URLStatus(strURL) Dim objXMLHTTP, strReturnStatus Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP") objXMLHTTP.Open "GET", "http://www.google.com.br/", False objXMLHTTP.Send strReturnStatus = objXMLHTTP.Status Set objXMLHTTP = Nothing URLStatus = strReturnStatus End Function Dim strfrmURL strfrmURL = CStr(Request.Form("frmURL")) If strfrmURL <> "" Then If URLStatus(strfrmURL) = "200" Then Response.Write "Online." Else Response.Write "Offline: " & URLStatus(strfrmURL) End If End If %>
Mais não esta funcionando alguém saberia me informar porque?
desde já agradeço,
[]'s
Patrique
0 user(s) are reading this topic
0 membro(s), 0 visitante(s) e 0 membros anônimo(s)