Jump to content

BTK

Members
  • Content count

    15
  • Joined

  • Last visited

Community Reputation

0 Comum

About BTK

  1. BTK

    Como decodificar unicode json

    Boa noite amigo, deu certíssimo aqui, MUITO OBRIGADO!
  2. BTK

    Como decodificar unicode json

    Bom dia, como posso retorna a resposta decodificada no json? Estou recebendo o valor assim: "Raul Andr\u00e9 Barbosa" quero que venha "Raul André Barbosa" $ch = curl_init(); curl_setopt($ch, CURLOPT_URL, "https://www.4devs.com.br/ferramentas_online.php"); curl_setopt($ch, CURLOPT_HEADER, true); curl_setopt($ch, CURLOPT_USERAGENT, "Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/73.0.3683.86 Safari/537.36"); curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0); curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, 1); curl_setopt($ch, CURLOPT_RETURNTRANSFER, 1); curl_setopt($ch, CURLOPT_CONNECTTIMEOUT, 0); curl_setopt($ch, CURLOPT_TIMEOUT, 0); curl_setopt($ch, CURLOPT_COOKIESESSION, true); curl_setopt($ch, CURLOPT_COOKIEJAR, getcwd().'/test.txt'); curl_setopt($ch, CURLOPT_COOKIEFILE, getcwd().'/test.txt'); curl_setopt($ch, CURLOPT_POST, 1); curl_setopt($ch, CURLOPT_POSTFIELDS, 'acao=gerar_pessoa&sexo='.$sexo.'&pontuacao=S&idade='.$idade.'&cep_estado=&cep_cidade='); echo $dados = curl_exec($ch);
  3. BTK

    Criação de cadastro via curl

    Boa noite, estou tentando criar um curl que faz cadastro no site(o proprietário está ciente disso) porem ele está me retornando (HTTP/1.1 100 Continue HTTP/1.1 302 Moved Temporarily) $ch = curl_init(); curl_setopt($ch, CURLOPT_URL, "https://www.cafefacil.com.br/customer/account/create/"); curl_setopt($ch, CURLOPT_HEADER, true); curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/72.0.3626.121 Safari/537.36'); curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0); curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true); curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); curl_setopt($ch, CURLOPT_COOKIESESSION, true); curl_setopt($ch, CURLOPT_COOKIEJAR, getcwd().'/cafefacil.txt'); curl_setopt($ch, CURLOPT_COOKIEFILE, getcwd().'/cafefacil.txt'); $b1 = curl_exec($ch); $form_key = value($b1, 'type="hidden" name="form_key" value="', '"'); curl_setopt($ch, CURLOPT_URL, 'https://www.cafefacil.com.br/customer/account/createpost/'); curl_setopt($ch, CURLOPT_HEADER, true); curl_setopt($ch, CURLOPT_USERAGENT, 'Mozilla/5.0 (Windows NT 6.1) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/72.0.3626.121 Safari/537.36'); curl_setopt($ch, CURLOPT_SSL_VERIFYPEER, 0); curl_setopt($ch, CURLOPT_SSL_VERIFYHOST, 0); curl_setopt($ch, CURLOPT_FOLLOWLOCATION, true); curl_setopt($ch, CURLOPT_RETURNTRANSFER, true); curl_setopt($ch, CURLOPT_COOKIESESSION, true); curl_setopt($ch, CURLOPT_REFERER, 'https://www.cafefacil.com.br/customer/account/create/'); curl_setopt($ch, CURLOPT_COOKIEJAR, getcwd().'/cafefacil.txt'); curl_setopt($ch, CURLOPT_COOKIEFILE, getcwd().'/cafefacil.txt'); curl_setopt($ch, CURLOPT_POST, 1); $boundary = '---------------------------WebKitFormBoundaryRQ3KHJbpfmPf11v6'; $data = '-----------------------------'.$boundary.' Content-Disposition: form-data; name="success_url" -----------------------------'.$boundary.' Content-Disposition: form-data; name="error_url" -----------------------------'.$boundary.' Content-Disposition: form-data; name="form_key" '.$form_key.' -----------------------------'.$boundary.' Content-Disposition: form-data; name="tipopessoa" 15 -----------------------------'.$boundary.' Content-Disposition: form-data; name="firstname" NomeTest SobreNomeTest -----------------------------'.$boundary.' Content-Disposition: form-data; name="nomefantasia" -----------------------------'.$boundary.' Content-Disposition: form-data; name="inscricaoestadual" -----------------------------'.$boundary.' Content-Disposition: form-data; name="email" nometestsobrenometest@gmail.com -----------------------------'.$boundary.' Content-Disposition: form-data; name="day" 01 -----------------------------'.$boundary.' Content-Disposition: form-data; name="month" 01 -----------------------------'.$boundary.' Content-Disposition: form-data; name="year" 1990 -----------------------------'.$boundary.' Content-Disposition: form-data; name="dob" 01/01/1990 -----------------------------'.$boundary.' Content-Disposition: form-data; name="taxvat" 199.758.750-50 -----------------------------'.$boundary.' Content-Disposition: form-data; name="celular" (11)4712-8491 -----------------------------'.$boundary.' Content-Disposition: form-data; name="password" senhatest -----------------------------'.$boundary.' Content-Disposition: form-data; name="confirmation" senhatest -----------------------------'.$boundary.' Content-Disposition: form-data; name="persistent_remember_me" on -----------------------------'.$boundary.'--'; $header[] = "Content-Type: multipart/form-data; boundary=".$boundary; curl_setopt($ch, CURLOPT_HTTPHEADER, $header); curl_setopt($ch, CURLOPT_POSTFIELDS, $data); echo $exec = curl_exec($ch); curl_close($ch);
  4. Boa noite, eu fiz um sistema que o usuário coloca uma lista de proxy (IP e PORTA) ai o sistema vai testando e vê se o proxy está funcionando com as variável $ip $port, porem percebi que muitos estão usando os mesmo valores muitas vezes, exemplo: 62.84.66.39;39938 62.84.66.39;39938 62.84.66.39;39938 62.84.66.39;39938 Eu queria saber como faço pra quando a pessoa fosse testar os mesmo valores pela 3 vez consecutiva, o sistema mandasse uma mensagem de alerta, e na 4 vez o sistema banice o ip da pessoa automaticamente... como posso fazer isso gente? Obrigada desde já!
  5. Boa noite, não estou conseguindo fazer escrever no campo do site pelo Webbrowser automaticamente! estou usando esse script, mas ele não está escrevendo... WebBrowser1.Document.all("txtCreditCardAccountHolderName").SetAttribute("value", "teste teste") Tag do site http://prnt.sc/c2jopl
  6. BTK

    VB.NET Script Click

    No caso eu preciso compilar ou fazer alguma coisa? porquê deu isso aqui no "$", http://prnt.sc/bpa0ie
  7. BTK

    VB.NET Script Click

    Consegui, muito obrigado :lol: Aproveitando o post, eu não estou conseguindo fazer ele escrever no campo do site, e o elemento é assim olha, http://prnt.sc/bop8un pode me dar alguma ajuda?
  8. BTK

    VB.NET Script Click

    Boa noite, estou tentando fazer ele clicar no Button mas o Button é assim http://prnt.sc/boi07q alguma solução? e pra escrever no campo do site também é do mesmo jeito, alguma solução vocês podem me dar? sou iniciante em vb.net! obrigado desde já!
  9. BTK

    Script Vb.net

    Alguém pra me ajudar? ainda não consegui achar esse script de div class :(
  10. BTK

    Script Vb.net

    Galera, acabei de ver que era um div class :( por isso não estava indo, mas acabei percebendo agora, Alguém tem o script pronto pra me ajudar? não to conseguindo achar, apenas pra click! http://imgur.com/JkVr6xr
  11. BTK

    Script Vb.net

    Você diz isso? http://imgur.com/qEAC4Hi
  12. BTK

    Script Vb.net

    Primeiramente Boa Noite a todos! Estou enfrentando um problema que provavelmente seja fácil, ou não :D, é o seguinte: estou tentando fazer que o script digite "1" no campo do site, mas o problema que o ID do site é assim: donatePage:donateForm:firstname Estou usando o tradicional script: WebBrowser1.Document.GetElementById("donatePage:donateForm:firstname").SetAttribute("value", "1") Mas ele não escreve, não da erro, nem nada! Alguma dica?! Obrigado desde já pessoal! :)
  13. BTK

    Script dando erro VB12

    Boa tarde! Otima tarde! rsrs, finalmente com sua ajuda deu certinho aqui... não sei como lhe agradecer, pois estava sofrendo já fazia 2 semanas e graças a você deu certinho aqui! Muito obrigado amigo, melhor detalhadamente assim, impossível! :wub:
  14. BTK

    Script dando erro VB12

    Bom dia, então amigo, eu não sei nada de vb.net, sou iniciante nesse assunto... desculpas :D mas então, eu mudei como você disse e mesmo assim está dando erro olha eu estava usando esse script pra quando os 2 primeiros numero do DataGridView1 for... exemplo: quando a primeira linha do DataGridView1 conter 1 e 5 inicial "15" ele seleciona a primeira opção do site, 29242 "29" selecionar 2 opção do site e assim por diante entendeu? olha o erro https://imgur.com/qaKEJhI
  15. BTK

    Script dando erro VB12

    Boa noite pessoal, estou usando um script, porem está dando erro :mellow: a intenção é fazer ele selecionar a primeira opção quando for "15" na primeira linha do DataGridView1 no select Do site, alguém pode me ajudar?! If Strings.Mid(ToString(DataGridView1.Rows(0).Cells(0).Value), 1, 1) = "15" Then WebBrowser1.Document.GetElementById("Age").Children(1).SetAttribute("Value", "15")
×

Important Information

Ao usar o fórum, você concorda com nossos Terms of Use.