Jump to content
Fórum Script Brasil
  • 0

WEB SCRACPING NÃO FUNCIONANDO


Question

Estou utilizando o seguinte código para capturar os elementos da página:

Dim oBrowser As InternetExplorer
    Dim lProcesso    As String

Sub extrair_DIB_DIP()


Dim Clip As String
Dim oHTML_Element As IHTMLElement
Dim sURL As String
 
 On Error GoTo Err_Clear
 
 sURL = "https://wwws.jfce.jus.br/cretace/movimentacao/detalhe/principal.wsp?tmp.processo_judicial.id_processo_judicial=1026901&tmp.processo_judicial.alterar=anexos&tmp.intimado=372301"
 
 
       Set oBrowser = New InternetExplorer
   oBrowser.Silent = True
   oBrowser.timeout = 60
   oBrowser.navigate sURL
      oBrowser.Visible = True
Do
Loop Until oBrowser.readyState = READYSTATE_COMPLETE

Set HTMLDoc = oBrowser.document

'oBrowser.Document.getElementsByClassName("frm").innertext

       newHour = Hour(Now())
newMinute = Minute(Now())
newSecond = Second(Now()) + 3
waitTime = TimeSerial(newHour, newMinute, newSecond)
Application.Wait waitTime
       
 x = oBrowser.document.getElementsByTagName("td")(1).innertext
 
 ' oBroser.Refresh ' Refresh if needed
 
 Sheets("plan1").Range("a1") = x
Err_Clear:
 If Err <> 0 Then
 'Debug.Assert Err=0
 
 Err.Clear
 Resume Next
 
 End If
 oBrowser.Quit
 

End Sub





Conforme a imagem abaixo, estou querendo pegar os dados contidos na partes em azul da página em destaque, só que não consigo pois não carrega os elementos.

Abaixo está o código da página:


<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<LINK REL="StyleSheet" TYPE="text/css" HREF="/cretace/css/aba/v1.css" />
<script src="/cretace/js/modelo.js"></script>
<script src="/cretace/js/page.js"></SCRIPT>
  <SCRIPT TYPE="text/javascript" SRC="/cretace/js/page.js"></SCRIPT>
  <SCRIPT TYPE="text/javascript" SRC="/cretace/js/modelo.js"></SCRIPT>
  <SCRIPT TYPE="text/javascript" SRC="/cretace/js/wievent.js"></SCRIPT>
  <META HTTP-EQUIV="pragma" CONTENT="no-cache" />
  <META HTTP-EQUIV="expires" CONTENT="0" />
  <META HTTP-EQUIV="cache-control" CONTENT="no-cache" />
  <TITLE>Processo 0503728-21.2018.4.05.8104S &lt;&lt;&lt;Leandro Santos Soares&gt;&gt;&gt;</TITLE>
  <script language="javascript">  
  function nextFocus() {}
  
  function atualizarPrincipal() {
    var frm = document.forms[0];
    window.onunload = function () {};
    frm.submit();
  }
  
  function desbloquearProcesso() {
    var evt = new WIEvent();
    //evt.debug = true;
    evt.writeobj('tmp.processo_judicial.id_processo_judicial','995279');
    evt.updatedb('evtDesbloqueioProcesso');
    evt.execute();
  }
  
  function retiraPedidoRedistribuicao() {
    if(confirm("Deseja mesmo retirar a determinação de Redistribuição?")) {
       var frm = document.forms[0];
       frm["tmp.acao"].value="retirar_redistribuicao";
       frm.submit();
    }
  }
  
  function RetiraVisualizacaoInspecao(){
    var frm= document.forms[0];
    frm['tmp.nao_inspecionar'].value='true';
    frm.submit();
  }
    
  function RetiraVisualizacaoCorreicao(){
    var frm= document.forms[0];
    frm['tmp.nao_correcionar'].value='true';
    frm.submit();
  }
  </script>
<SCRIPT TYPE="text/javascript">
function init(){
   
}
</SCRIPT>
<script language="javascript">
<!--
function myFunc(a,b,c) {
   alert("Ocorreu um erro: "+a+" \r\n(Página: "+b+"  -   Linha: "+c+")");
   return true;
}
window.onerror= myFunc;
-->
</script>
</head>
<body bgcolor="#FFFFFF" style="margin:0;" onmousedown="if(navigator.appName=='Netscape'){ if(event.which==3) alert('Infox Tecnologia da Informação Ltda.\nProjeto: Creta Ceará.\nPágina: movimentacao/detalhe/principal.')} else {if(event.button==2) alert('Infox Tecnologia da Informação Ltda.\nProjeto: Creta Ceará.\nPágina: movimentacao/detalhe/principal.')}" onload="init(); nextFocus(0);">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0">
 <tr height="1%" width="100%">
  <th colspan="4"></th>
 </tr>
 <tr height="1%" width="100%">
  <th width="1%"></th>
  <th width="1%" Align="left"><image src="/cretace/images/brasao.jpg"></th>
  <th width="70%" Align="left" style="font-family: Arial, Helvetica, sans-serif; font-weight : bold; font-size: 14px;">PODER JUDICIÁRIO<br>Justiça Federal<br>Juizados Especiais Federais Cíveis do Ceará</th>
  <th width="27%" Align="right" style="font-family: Arial, Helvetica, sans-serif; font-weight : bold; font-size: 12px;"><a href="http://wwws.jfce.gov.br/cretainternetce/consulta/processo/detalhe.wsp?tmp.processo_judicial.id_processo_judicial=995279&tmp.processo_judicial.nr_processo_judicial=0503728-21.2018.4.05.8104" title="Impressão para mostrar às partes" target="_blank">Exibir Processo<br>para Impressão</a></th>
 </tr>
 <tr width="100%" height="100%">
  <td colspan="4" VAlign="top" class="conteudo_body_content">




<center style="font-family: Arial, Helvetica, sans-serif; font-weight : bold; font-size: 14px;">PROCESSO 0503728-21.2018.4.05.8104S <br/><small>Nr. Antigo: </small></center>
<center>


</center>
<center style="font-family: Arial, Helvetica, sans-serif; font-weight : bold; font-size: 10px;">(MANOEL FRANCISCO DA PONTE<b>>>></b>LUIZ RENE OLIVEIRA MARTINS)<span style="width:15px"></span>x<span style="width:15px"></span>(INSS - Instituto Nacional do Seguro Social (Sobral))</center>






<script>
if (!designMode){
  self.moveTo(0,0);
  self.resizeTo(screen.availWidth,screen.availHeight);
}
</script>

<script>
window.onunload = function () {
  
  if (designMode)    
    return;
   if ("372301"!="372301" || ""!="") {
    return;
   }  
    var frm = document.forms[0];
  frm.action="/cretace/branco.wsp";
  frm.target="fra_topo_sessao";
  desbloquearProcesso();
  //frm.submit();

  //wiOpen('/cretace/movimentacao/detalhe/check_out.wsp?tmp.processo_judicial.id_processo_judicial=995279', 'CheckOut', 'toolbar=no,location=no,directories=no,status=no,menubar=no,scrollbars=no,resizable=no,width=1,height=1');
}
</script>

<script>var objHelp = document.getElementById("id_help"); if (objHelp && "" != "") { objHelp.innerHTML = "<a href='/cretace/help/.htm' target='_blank'>Precisa de Ajuda?</a>"; }</script>
<!-- inicio obj "frm_abas" -->

<table width="99%" Height="90%" cellspacing="0" cellpadding="0" class="" border="0" align="center">
<tr Height="1%"><td VAlign="top">
 <div class="aba">
 <ul>
 <script language="javascript">
  //var UrlDefault = '';
  document.write(builderAba('Identificação,Partes,Movimentações,Movimentações CNJ,Anexos,Conexos,Audiências,Perícias,Intimações,Sessões Recursais,Comprovante,RPV/PRC, Correição,Inspeção,Distribuição,Offline','identificacao.wsp?tmp.processo_judicial.id_processo_judicial=995279&tmp.processo_judicial.alterar=anexos, partes.wsp?tmp.processo_judicial.id_processo_judicial=995279&tmp.processo_judicial.alterar=anexos,  movimentacao.wsp?tmp.processo_judicial.id_processo_judicial=995279, evento.wsp?tmp.processo_judicial.id_processo_judicial=995279, anexos.wsp?tmp.processo_judicial.id_processo_judicial=995279&tmp.processo_judicial.alterar=anexos&tmp.pauta.id_pauta=,  apensados.wsp?tmp.processo_judicial.id_processo_judicial=995279&tmp.processo_judicial.nr_processo_judicial=0503728-21.2018.4.05.8104, audiencias.wsp?tmp.processo_judicial.id_processo_judicial=995279, pericias.wsp?tmp.processo_judicial.id_processo_judicial=995279, intimacoes.wsp?tmp.processo_judicial.id_processo_judicial=995279,  sessoes.wsp?tmp.processo_judicial.id_processo_judicial=995279,  /cretace/peticao/resultado.wsp?tmp.processo_judicial.id_processo_judicial=995279&tmp.executar_dist=false, rpvs.wsp?tmp.processo_judicial.id_processo_judicial=995279, correicao.wsp?tmp.processo_judicial.id_processo_judicial=995279, inspecao.wsp?tmp.processo_judicial.id_processo_judicial=995279, distribuicao.wsp?tmp.processo_judicial.id_processo_judicial=995279 , /cretace/offline/processo_offline.wsp?tmp.processo_judicial.id_processo_judicial=995279','aba_indentificacao,aba_partes,aba_movimentacao,aba_evento,aba_anexos,aba_apensados,aba_audiencias,aba_pericias,aba_intimacoes,aba_sessoes,aba_comprovante,aba_rpvs,aba_correicao,aba_inspecao,aba_distribuicao,aba_segredo_justica'));
  function builderAba(label,url,id) {
    var arrayLabels =  label.split(",");
	var arrayUrls =  url.split(",");
	var arrayIds =  id.split(",");
	var Iddefault = "aba_movimentacao";
	var str = "";
	for (i = 0; i < arrayLabels.length; ++i)
	  if (arrayUrls[i] != "") {
	    strclass=(arrayIds[i]==Iddefault)?' class="abaAtiva"':' class=""';
		ctrlAba=(arrayIds[i]==Iddefault)? 'true': 'false';
		inter = (arrayUrls[i].indexOf("?") >= 0? "&": "?");
        str += '<scr' + 'ipt>var ctrlAba_' + arrayIds[i] + ' = ' + ctrlAba + ';</scr' + 'ipt>';
		str += '<li id="li_'+arrayIds[i]+'" tipoAba="true" '+ strclass;
		str += '><a href="javascript:selectAba(\''+ arrayIds[i] +'\',\''+ arrayUrls[i] + inter + 'tmp.ctrl=ctrlAba_' + arrayIds[i] +'\');" '+ strclass;
		str += ' tipoAba="true" id="'+ arrayIds[i] +'">'+arrayLabels[i] +'</a></li>';
            if (screen.availWidth < 850) {
              quebra = 8;
            } else { 
              quebra = 10; 
            }
            if (i == quebra) { 
              str += '<br>'; 
	  }
	  }
    return str;
  }
</script>
</ul></div>
</td></tr>
<tr width="100%" Height="100%">
  <td width="100%" Height="100%" VAlign="top"><iframe src="movimentacao.wsp?tmp.processo_judicial.id_processo_judicial=995279" name="frame_conteudo995279" width="100%" height="100%" Valign="top" hspace="0" vspace="0" frameborder="0" marginheight="0" marginwidth="0" scrolling="auto"></iframe></td></tr>
</table>
<SCRIPT LANGUAGE="JavaScript">
function selectAba(id,url){
  disabledAbas(id);
  document.getElementById(id).className='abaAtiva';
  document.getElementById("li_"+id).className='abaAtiva';
  var ctrlAtual = false;
  eval("ctrlAtual = ctrlAba_" + id + ";");
  if (ctrlAtual) {
    alert("Em processamento. Por favor, aguarde.");
  } else {
	eval("ctrlAba_" + id + " = true;");
	frames['frame_conteudo995279'].location.href=url;
  }
}
function disabledAbas(id) {
  with (document.getElementsByTagName("li")){
    for (var i=0; i<length; i++) {
	  if (item(i).getAttribute("tipoAba")=="true") {
	    item(i).className='';
	}
  }
  }
  with (document.getElementsByTagName("A")){
    for (var i=0; i<length; i++) {
	  if (item(i).getAttribute("tipoAba")=="true") {
	    item(i).className='';
		if (id != item(i).getAttribute("id")) {
		  eval("ctrlAba_" + item(i).getAttribute("id") + " = false;");
		}
	  }
	}
  }
}
</script>

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<!-- inicio obj "frm_abas" -->

<!-- end obj "frm_abas" -->
<script>
window.onload = function () {
  init(); 
  nextFocus(0); 
  
  ; 
  
  if('' != '' && !designMode) 
    alert(''); 
  ; 
}
</script><FORM NAME="formulario" ACTION="/cretace/movimentacao/detalhe/principal.wsp" METHOD="post" CLASS="frm" ><INPUT NAME="wi.page.prev" ID="wi.page.prev" VALUE="movimentacao/detalhe/principal" TYPE="hidden" /><INPUT NAME="wi.token" ID="wi.token" VALUE="LMBNJD1UBCDGRSFSNNIQ" TYPE="hidden" />
<input type="hidden" NAME="tmp.processo_judicial.id_processo_judicial" value="995279">
<input type="hidden" NAME="tmp.processo_judicial.nr_processo_judicial" value="0503728-21.2018.4.05.8104">
<input type="hidden" NAME="tmp.acao" value="">
<input type="hidden" NAME="tmp.processo_judicial.alterar" value="anexos">
<input type="hidden" NAME="tmp.processo_judicial.in_apensados" value="">
<input type="hidden" NAME="tmp.gravar" value="">
<input type="hidden" NAME="tmp.pauta.id_pauta" value="">
<input type="hidden" NAME="tmp.obs" value="">
<center></center>

<input type="hidden" NAME="tmp.nao_inspecionar" value="">
<input type="hidden" NAME="tmp.nao_correcionar" value="">
<input type="hidden" NAME="tmp.aba.url_default" value="">
</FORM></td>
 </tr>
</table>
</body>
</html>

 

Sem título.png

Link to post
Share on other sites

0 answers to this question

Recommended Posts

There have been no answers to this question yet

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Cloud Computing


  • Forum Statistics

    • Total Topics
      148680
    • Total Posts
      644502
×
×
  • Create New...