Batch-Satti
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.
Batch-Satti

Você não está conectado. Conecte-se ou registre-se

Batch que busca endereço por CEP

4 participantes

Ir para baixo  Mensagem [Página 1 de 1]

1Batch que busca endereço por CEP Empty Batch que busca endereço por CEP Sex Out 07, 2011 12:10 pm

NeoqJav

NeoqJav

Batch que busca endereço por CEP:
[Tens de ter uma conta e sessão iniciada para poderes visualizar este link]
Código:

@echo off
SETLOCAL ENABLEDELAYEDEXPANSION
SET /P CEP=Digite o cep:
call :HTML http://www.consultarcep.com.br/busca/!CEP!
cls
for /f "tokens=* delims=" %%a in ('TYPE CEP.WIL ^| FIND /V " CEP"') do (
set palavra=%%a
if /i "!palavra!" neq "" ( echo.!palavra!)
)
echo. http://www.consultarcep.com.br/busca/[CEP]

pause
goto :eof
:HTML
echo. Loading...
(
echo.Dim objADODB, objIE
echo.Dim strText
echo.Set objIE = CreateObject^( "InternetExplorer.Application" ^)
echo.With objIE
echo. .Navigate "%*"
echo. .Visible = False
echo. Do While .Busy
echo. WScript.Sleep 25
echo. Loop
echo. strText = .Document.Body.InnerText
echo. Do While .Busy
echo. WScript.Sleep 25
echo. Loop
echo. .Quit
echo.End With
echo.Set objADODB = CreateObject^( "ADODB.Stream" ^)
echo.With objADODB
echo. .Open
echo. .Type = 2
echo. .CharSet = "us-ascii"
echo. .WriteText strText
echo. .SaveToFile "cep.wil", 2
echo. .Close
echo.End With
)>!TEMP!\wget.vbs
cscript //nologo !TEMP!\wget.vbs
exit/b




Última edição por NeoqJav em Seg Out 10, 2011 1:09 pm, editado 2 vez(es) (Motivo da edição : inserir pause no final do batch)

http://neoqjav.dihitt.com.br

2Batch que busca endereço por CEP Empty Re: Batch que busca endereço por CEP Sex Out 07, 2011 2:38 pm

OLDFOX

OLDFOX

No meupc parou na tela loading, criou um arquivo aonde eu o executei com o nome "cep.wil", fechou o cmd e mostrou uma tela de erro do ie.
O que serás??

3Batch que busca endereço por CEP Empty Re: Batch que busca endereço por CEP Sex Out 07, 2011 2:40 pm

OLDFOX

OLDFOX

OLDFOX escreveu:No meupc parou na tela loading, criou um arquivo aonde eu o executei com o nome "cep.wil", fechou o cmd e mostrou uma tela de erro do ie.
O que serás??

hahahaha. Abri o arquivo cep.wil com o notepad e ele mostrou todos os dados do meu endereço!! Funciona...

Muito bom Neoqjav.
bounce

4Batch que busca endereço por CEP Empty Re: Batch que busca endereço por CEP Sex Out 07, 2011 6:37 pm

NeoqJav

NeoqJav

Geralmente executo os batchs direto pelo prompt de comando, por isso me esqueço de colocar um pause no final do batch... já editei o post e corrigi...

Existe a pasta %temp% na sua máquina??? veja o wget.vbs que o batch criou...

http://neoqjav.dihitt.com.br

5Batch que busca endereço por CEP Empty Re: Batch que busca endereço por CEP Sex Out 07, 2011 8:59 pm

Boss-Head

Boss-Head

Posta no pastebin tbm....

6Batch que busca endereço por CEP Empty Re: Batch que busca endereço por CEP Seg Out 10, 2011 1:10 pm

NeoqJav

NeoqJav

postado...

http://neoqjav.dihitt.com.br

7Batch que busca endereço por CEP Empty Re: Batch que busca endereço por CEP Qua Out 12, 2011 5:25 pm

LokiTheGodOfChaos

LokiTheGodOfChaos

tem como fazer por ip, tipo automatico, pra um virus fake q eu to fazendo aki

(pra aterrorizar os noobs la da escola tipo "eu sei onde vc mora hahahah....")



se tiver como postem por favor



vlw

Conteúdo patrocinado



Ir para o topo  Mensagem [Página 1 de 1]

Permissões neste sub-fórum
Não podes responder a tópicos