GRAVAR HTML PELA PORTA 80
Como eu faco isso com o VB????? Preciso gravar uma mensagem no html remoto toda vez que 1 condicao de erro acontecer. Como poderia fazer isso???
seja mais detalhado por favor.
Pois bem, toda vez q acontecer uma erro no sistema ele envie uma frase default, que poderia ser mandada por email mas quero q mande por http pela porta 80 para gravar num html http://meusserver.com/meuserros.html.
eu jah tenho a rotina de erro pronta funcional, soh quero mesmo uma forma de enviar isso para gravar em http como um POST ou GET.
Espero ter sido mais claro.
Obrigado.......
eu jah tenho a rotina de erro pronta funcional, soh quero mesmo uma forma de enviar isso para gravar em http como um POST ou GET.
Espero ter sido mais claro.
Obrigado.......
Tente usar o INET, acho que vai resovler seu probelma.
cara, manjo quase nada de web, acho que quem escuta na porta 0 é o webserver (apache, IIS...). acho que pra vc fazer isso que vc quer, vc vai ter que executar um script asp, php no servidor por exemplo. Nunca usei o INET mas creio que ele resolva isso com essas opções.
ainda sim nda de util, O ideal eh trabalhar isso com winsocks mas nao achei exemplos . Alguem se habiita??? 
mais ninguem????
Eu gostaria de alguma dica pelo menos
e tao dificil assim ???????
O que vc está querendo fazer se chama package inject attack, e é uma forma de hackear. O que vc poderia fazer para gravar um erro remoto, seria executar um script asp passando a msg de erro como parâmetro
Nao nao eh isso nao KERPLUNK.... TOTALMENTE FORA DO CONTEXTO Q EH BEM MAIS SIMPLES SOH NAO POSSO USAR A PORTA21 FTP, TEM Q SER A 80 HTTP. VOU SER MAIS CLARO...
O erro ocorre na linha do SendData. Pretendo enviar uma linha de texto para ser gravada num txt ou html no servidor pela porta 80.
Private Sub Form_Load()
Dim dados As String
Winsock1.RemoteHost = [Ô]site.com.br/[Ô]
Winsock1.RemotePort = 80
Winsock1.Connect
dados = [Ô]dados1 ...[Ô]
Winsock1.SendData [Ô]http://site.com.br/enviar.php?[Ô] & dados & [Ô]=erros[Ô]
End Sub
PS:. O codigo do enviar. php abaixo:
<?php
$dados=$_GET[dados];
$asd = fopen([Ô]Erros.txt[Ô], [Ô]a+[Ô]);
fwrite($asd, $dados);
fclose($asd);
echo [Ô]Erros gravados com sucesso!(WTF?)[Ô];
echo $dados
?>
.
O erro ocorre na linha do SendData. Pretendo enviar uma linha de texto para ser gravada num txt ou html no servidor pela porta 80.
Private Sub Form_Load()
Dim dados As String
Winsock1.RemoteHost = [Ô]site.com.br/[Ô]
Winsock1.RemotePort = 80
Winsock1.Connect
dados = [Ô]dados1 ...[Ô]
Winsock1.SendData [Ô]http://site.com.br/enviar.php?[Ô] & dados & [Ô]=erros[Ô]
End Sub
PS:. O codigo do enviar. php abaixo:
<?php
$dados=$_GET[dados];
$asd = fopen([Ô]Erros.txt[Ô], [Ô]a+[Ô]);
fwrite($asd, $dados);
fclose($asd);
echo [Ô]Erros gravados com sucesso!(WTF?)[Ô];
echo $dados
?>
.
Tópico encerrado , respostas não são mais permitidas