Baixar resultados da loteria Dia de Sorte

[Guest Zangado]

@Rany 

som é diferente de html 

 mas no caso eu estou montando , não vou usar o phase do json 

estava tudo indo bem  até perceber que não tem uma estrutura consolidada , tanto que tem um monte de sinalizadores para informar situação 

bem, vou manter a estrutura que já montei e adicionar uma função de varredura pelo nome , nesse caso vai mudar pouca coisa 

 

sabe me dizer qual o nome desse padrão de Data que tem no arquivo ?

o numerico

1542074400000

acho que é data e hora mas não defino o padrão 

 

[Rany]

@Zangado 

 

Com a função abaixo consigo retornar o valor pretendido

 

function UnixToDateTime(USec: Longint): TDateTime;
begin
  Result := (Usec / 86400) + 25569.0;  // 25569.0 = 01/01/1970
end;

 

Showmessage (DateTimeToStr(UnixToDateTime(1540519200))); } //"dt_apuracao":

 

Observação: Talvez seja necessário remover os 4 ultimos zeros para a função funcionar corretamente, mas nos testes vc perceberá se será necessário.

[Guest Zangado]

@Rany 

não creio ter essa opção no vba do excel, mas vou usar a data em strig mesmo

154207,44   no excel é 15/3/2322 10:33 

se mudar para 15420,744  fica 20/03/1942  17:51:22

 

kkk agora que reparei o calculo no meio 

valeu

 

sem os 4 zeros do final dá

1542074400
13/11/2018 2:00

[Rany]

@Zangado 

 

Não sei se vc já conseguiu, mas numa rápida pesquisa encontrei várias funções em vba para converter.

 

Tbm usaria apenas a data em string, já tá pronta, hehehehhe.

 

Até.

 

[Marcelofarias]

todos resultado dia da sorte 

 

Concurso: 1 - 19/05/2018 (Sábado)
03 09 05 30 08 19 21 

Concurso: 2 - 22/05/2018 (Terça)
12 28 21 08 11 14 20 

Concurso: 3 - 24/05/2018 (Quinta)
11 25 28 12 21 29 24 

Concurso: 4 - 26/05/2018 (Sábado)
15 19 07 13 29 06 18 

Concurso: 5 - 29/05/2018 (Terça)
02 08 09 17 24 19 28 
Junho/2018

Concurso: 6 - 02/06/2018 (Sábado)
19 18 11 01 26 31 30 

Concurso: 7 - 05/06/2018 (Terça)
25 06 02 05 24 14 20 

Concurso: 8 - 07/06/2018 (Quinta)
24 01 21 27 04 22 13 

Concurso: 9 - 09/06/2018 (Sábado)
18 24 23 03 10 19 13 

Concurso: 10 - 12/06/2018 (Terça)
18 30 19 06 20 13 10 

Concurso: 11 - 14/06/2018 (Quinta)
07 13 27 19 31 16 20 

Concurso: 12 - 16/06/2018 (Sábado)
22 07 12 03 02 21 17 

Concurso: 13 - 19/06/2018 (Terça)
20 21 09 26 01 07 04 

Concurso: 14 - 21/06/2018 (Quinta)
16 26 31 01 08 20 21 

Concurso: 15 - 23/06/2018 (Sábado)
26 13 16 08 11 29 28 

Concurso: 16 - 26/06/2018 (Terça)
16 07 01 12 02 20 25 

Concurso: 17 - 28/06/2018 (Quinta)
09 20 19 14 11 22 13 

Concurso: 18 - 30/06/2018 (Sábado)
21 07 08 27 14 04 31 
Julho/2018

Concurso: 19 - 03/07/2018 (Terça)
29 28 12 14 03 04 09 

Concurso: 20 - 05/07/2018 (Quinta)
17 31 12 21 06 26 29 

Concurso: 21 - 07/07/2018 (Sábado)
18 31 08 11 10 12 02 

Concurso: 22 - 10/07/2018 (Terça)
04 12 05 02 27 22 18 

Concurso: 23 - 12/07/2018 (Quinta)
19 27 09 17 10 25 28 

Concurso: 24 - 14/07/2018 (Sábado)
07 16 30 18 08 12 15 

Concurso: 25 - 17/07/2018 (Terça)
29 13 17 25 10 21 01 

Concurso: 26 - 19/07/2018 (Quinta)
28 02 11 20 08 10 16 

Concurso: 27 - 21/07/2018 (Sábado)
23 20 28 12 15 17 06 

Concurso: 28 - 24/07/2018 (Terça)
20 24 18 09 15 02 12 

Concurso: 29 - 26/07/2018 (Quinta)
21 03 22 27 05 13 24 

Concurso: 30 - 28/07/2018 (Sábado)
08 04 09 30 27 20 17 

Concurso: 31 - 31/07/2018 (Terça)
06 07 28 04 11 09 24 
Agosto/2018

Concurso: 32 - 02/08/2018 (Quinta)
18 03 20 07 16 04 27 

Concurso: 33 - 04/08/2018 (Sábado)
13 28 31 12 10 23 03 

Concurso: 34 - 07/08/2018 (Terça)
15 18 29 27 23 06 12 

Concurso: 35 - 09/08/2018 (Quinta)
17 23 03 07 11 22 12 

Concurso: 36 - 11/08/2018 (Sábado)
11 12 07 16 13 02 27 

Concurso: 37 - 14/08/2018 (Terça)
18 16 02 23 22 12 07 

Concurso: 38 - 16/08/2018 (Quinta)
08 17 29 26 30 18 15 

Concurso: 39 - 18/08/2018 (Sábado)
04 05 06 09 13 25 30 

Concurso: 40 - 21/08/2018 (Terça)
02 10 12 14 19 21 27 

Concurso: 41 - 23/08/2018 (Quinta)
23 07 25 31 12 27 30 

Concurso: 42 - 25/08/2018 (Sábado)
14 31 17 11 29 16 06 

Concurso: 43 - 28/08/2018 (Terça)
27 28 04 31 18 17 07 

Concurso: 44 - 30/08/2018 (Quinta)
31 26 23 09 30 07 15 
Setembro/2018

Concurso: 45 - 01/09/2018 (Sábado)
29 02 12 15 30 05 07 

Concurso: 46 - 04/09/2018 (Terça)
05 08 01 16 04 30 10 

Concurso: 47 - 06/09/2018 (Quinta)
07 16 13 20 15 22 05 

Concurso: 48 - 08/09/2018 (Sábado)
10 29 06 31 17 23 08 

Concurso: 49 - 11/09/2018 (Terça)
11 04 20 16 17 23 31 

Concurso: 50 - 13/09/2018 (Quinta)
23 16 31 14 22 17 18 

Concurso: 51 - 15/09/2018 (Sábado)
02 16 10 28 14 24 08 

Concurso: 52 - 18/09/2018 (Terça)
26 20 14 22 24 07 12 

Concurso: 53 - 20/09/2018 (Quinta)
25 16 03 19 07 18 30 

Concurso: 54 - 22/09/2018 (Sábado)
18 25 11 21 27 04 24 

Concurso: 55 - 25/09/2018 (Terça)
18 28 01 22 25 16 08 

Concurso: 56 - 27/09/2018 (Quinta)
15 09 31 17 10 23 16 

Concurso: 57 - 29/09/2018 (Sábado)
12 28 03 05 26 10 18 
Outubro/2018

Concurso: 58 - 02/10/2018 (Terça)
30 11 25 24 29 13 12 

Concurso: 59 - 04/10/2018 (Quinta)
24 08 10 04 25 05 03 

Concurso: 60 - 06/10/2018 (Sábado)
08 01 07 17 06 18 22 

Concurso: 61 - 09/10/2018 (Terça)
05 08 13 28 25 19 10 

Concurso: 62 - 11/10/2018 (Quinta)
18 07 11 23 13 30 28 

Concurso: 63 - 13/10/2018 (Sábado)
28 02 09 06 03 27 29 

Concurso: 64 - 16/10/2018 (Terça)
20 05 18 17 27 08 06 

Concurso: 65 - 18/10/2018 (Quinta)
31 28 20 27 30 07 21 

Concurso: 66 - 20/10/2018 (Sábado)
17 11 24 04 10 12 06 

Concurso: 67 - 23/10/2018 (Terça)
19 22 01 04 26 14 08 

Concurso: 68 - 25/10/2018 (Quinta)
04 06 01 20 21 14 27 

Concurso: 69 - 27/10/2018 (Sábado)
01 26 08 05 29 06 03 

Concurso: 70 - 30/10/2018 (Terça)
09 29 11 05 04 28 02 
Novembro/2018

Concurso: 71 - 01/11/2018 (Quinta)
27 31 08 07 04 24 06 

Concurso: 72 - 03/11/2018 (Sábado)
18 01 09 02 06 08 21 

Concurso: 73 - 06/11/2018 (Terça)
09 14 08 23 18 11 10 

Concurso: 74 - 08/11/2018 (Quinta)
15 23 12 17 06 29 20 

Concurso: 75 - 10/11/2018 (Sábado)
06 02 30 03 14 28 31

 

[Guest Zangado]

@Rany 

 sim já tinha conseguido

sem esse calculo fica data errada como mostrei

já tinha visto a respeito  mas nem lembrava  e quando vi não tinha esse monte de zero kkk por isso fiquei curioso

 

@Marcelofarias 

no caso é para se pegar da caixa mesmo, tipo atualizar de maneira automática nosso arquivo 

 

[Guest Zangado]

@Rany 

a parte chata desses trecos são os tratamentos de erro 

aí temos que testar varias vezes em varias situações diferentes

por exemplo a mega ao que parece não tem o conc n1 no JSON  só do 2 em diante

tbm tenho que tratar os null de alguns campos dos primeiros sorteios  quando não se registrava esses dados 

só não sei oq vou colocar no lugar do null talvez 0 

[Rany]

@Zangado 

 

Se você verificar diretamente na página da megasena o erro persiste, ou seja, quando eles se derem conta do problema e consertarem, o retorno do concurso número 1 voltará a funcionar.

Por enquanto deixaria o concurso 1 já predefinido no código e começava buscando a partir do 2.

Em relação ao null também colocava zero.

 

[Guest Zangado]

@Rany isso mesmo que fiz,

tbm tem resultado sem a ordem de sorteio então tive que adicionar para se não existir uma delas tentar a outra 

isso fora campos vazios, provavelmente eu tenha que mudar a minha função, mas por enquanto coloquei apenas um verificador 

para mim essa é a parte mais chata de se montar um codigo, tem que testar todas as possibilidade e mesmo assim somos pegos por algo que não apareceu naquele momento

 

[Rany]

@Zangado Concordo com tudo o que foi relatado.

 

Se eu fosse fazer um sistema desse, baixava o D_megase.zip-->D_MEGA.HTM e importava todos os dados a partir do arquivo htm e depois utilizaria o JSON para verificar o ultimo concurso e adicionava caso fosse necessário.

 

Da forma que relatei só seria realizada 2 solicitações a pagina da caixa e não 2096 se utilizar apenas JSON.

 

Mas é apenas minha opinião, o bom é que existe várias formas de fazer a mesma coisa.

 

Até.

[Guest Zangado]

@Rany 

por isso mesmo "atualizar o arquivo" "que já existe", no caso sem ter que esperar o zip ser atualizado, 

mesmo a partir do zip eu só pego oq fala, não troco todo o resultado do zip não

 

a conexão do JSON está bem rapida 

e se já está olhando para um resultado oficial não tem o pq deixar de atualizar o arquivo 

tbm tem que ver pequenas oq tem nos 2, tipo no zip não tem o local do sorteio

[Rany]

@Zangado Tudo bem, sua linha de raciocínio tem muita lógica.

 

Sucesso no seu projeto, se por ventura tiver alguma dúvida, podemos tentar encontrar a solução, dois ou mais cabeças pensam melhor que uma.

 

Até.

[Guest Zangado]

@Rany no geram minha dificuldade é somente no designe visual das coisas que monto

claro que tenho que melhorar as estruturas de meus códigos para ficar mais facil reaproveitar , mas fora isso normalmente eu consigo montar oq vem na ideia

mas valeu

[Guest Zangado]

@Rany 

coloquei aqui para pegar todos os resultados pelo JSON 

olha se considerar é mais rápido do que manipular o ie para pegar qualquer coisa

[Rany]

@Zangado Também achei rápido, se em todo site esse retorno estivesse disponível seria muito bom, kkkkkkkkkkkkkkkkkkkkk.

[Guest Zangado]

@Rany 

qual seria os dados mais pertinentes a se pegar?

[Rany]

@Zangado No que fiz da lotofácil, pego apenas concurso, data e o sorteio, sendo que o sorteio divido os 15 números e armazeno no BD.

[Guest Zangado]

@Rany 

eu gosto de mexer com analise de dados , então quanto mais informações melhor

tipo de pergunta que já se fez aqui no forum mesmo ,é sobre os sorteios  feitos no caminhão  e no auditório 

[Guest Zangado]

@Rany 

uma questão tbm seria o rateio

o pessoal gosta muito de esquemas, 

então para testar se ao longo do tempo um esquema daria lucro ou prejuízo o valor das premiações  é algo interessante 

claro que se poderia testar em cima de um valor medio  

[Rany]

@Zangado 

Como a diferença de tempo é quase nada, armazena tudo que vc acha que vai precisar a curto ou longo prazo.

[Guest Zangado]

@Rany 

conseguiu terminar a automação daquela pagina

está em Delphi  mesmo?

ao meu ver é melhor  um exe passando direto para um txt , assim evita problemas de incompatibilidades e se pode importar para outros aplicação 

[Rany]

@Zangado Gerar um txt sempre é bom, heheheheheh.

[Guest Zangado]

@Rany 

uma coisa chata é a falta de padrão desses arquivos da caixa

parece que os dados são digitados na mão e não se cria uma tabela de substituição 

olha essa lista

pelo visto teve sorteio até em um CAINHÃO DA SORTE

 

ISSO ACONTECE ATÉ NOS TIMES DA TIME MANIA

bem ou ve se uso apenas a primeira letra 

 

[Rany]

@Zangado kkkkkkkkkkkkkkkkkkkkk

Bastante desorganizado, parece que depende do bom humor que quem vai lançar essas informações.

[Guest Zangado]

@Rany 

cara eu estava vendo os json das loteiras

e cara, tudo feito pelo governo parece feito apenas para roubar

esses trecos não foram planejados por gente competente 

não tem padrão algum

nem posição, nem nome de campo

nem tipo de dado

eles devem criar uma empresa contratar  uns que estão aprendendo e abrir licitação para fazer o sistema

como pode ser algo tão amador e sem padrão algum?

eu estou tentando montar um padrão que atenda a todas e tenha os dados que eu quero , mas creio que vou ter que adicionar um campo reservado para dados como o mes da sorte da dds e o time do coraçao da time mania

assim eu posso usar a mesma macro para todas com indice numerico onde oq esticaria seria apenas as faixas de premiação 

tenheo que ver tbm os campos como mensagem que deve ser para quando o sorteio foi adiado