HTML publicidad no se muestra

Pregunta Sin Miedo no te cortes cualquier cosa para empezar - Autoit se comienza facilmente.Para Ordenes o Comandos sueltos. Ver nota como preguntar.
Responder
Avatar de Usuario
yasmany
Hacker del Foro
Mensajes: 249
Registrado: 06 Sep 2011, 21:30

HTML publicidad no se muestra

Mensaje por yasmany »

Buen día, la cuestión está que debería salir publicidad en el siguiente codigo.
Demora un poco hasta que cargue bien, para apenas mostrar un cuadro azul, pero si ubicamos el mouse en la parte superior en blanco muestra como si requiere que hagan clic, y al dar clic se carga el link que contiene la publicidad generada, cabe mencionar que la publicidad no se muestra.r

Espero lo puedan chekar, y puedan ayudar para que se muestre la publicidad.

Código: Seleccionar todo

#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <WinAPIDiag.au3>
#include <WinAPISys.au3>
#include <IE.au3>
#include <WinAPIDlg.au3>
#include <StaticConstants.au3>
#include <Misc.au3>

Opt("GUIOnEventMode", 1)
Opt("GUICloseOnESC", 0)

Global $Form1 = GUICreate("Gui_HTML_Publicidad_yva", 436, 410, -1, -1, $WS_POPUPWINDOW)
Global $lblCerrar = GUICtrlCreateLabel('X', 310, 3, 20, 25, $SS_CENTER + $SS_CENTERIMAGE)
GUICtrlSetOnEvent(-1, 'cerrar')

Global Const $sHtml = '<div style="float:none;margin:10px 0 10px 0;text-align:center;">' & @CR & _
		'<table>' & @CR & _
		'<tr>' & @CR & _
		'<td>' & @CR & _
		'<script async src="http://pagead2.googlesyndication.com/pagead/js/adsbygoogle.js"></script>' & @CR & _
		'<!-- avy -->' & @CR & _
		'<ins class="adsbygoogle"' & @CR & _
		'style="display:inline-block;width:336px;height:280px"' & @CR & _
		'data-ad-client="ca-pub-9425996110625918"' & @CR & _
		'data-ad-slot="2467722580"></ins>' & @CR & _
		'<script>' & @CR & _
		'(adsbygoogle = window.adsbygoogle || []).push({});' & @CR & _
		'</script></td>' & @CR & _
		'</tr>' & @CR & _
		'</table>' & @CR & _
		'</div>'
Local Const $sPath = @ScriptDir & "/pagina.html"
FileWrite($sPath, $sHtml)
If _WinAPI_GetVersion() >= '6.0' And _WinAPI_IsInternetConnected() Or _WinAPI_GetVersion() < '6.0' And (_WinAPI_IsNetworkAlive() <> 0) Then ; si existe internet
	Local $oIE = _IECreateEmbedded()
	GUICtrlCreateObj($oIE, 0, 30, 436, 480)
	_IENavigate($oIE, $sPath, 0)

	GUISetState(@SW_SHOW)
;~ 	WinSetOnTop('Gui_HTML_Publicidad_yva', 'X', 1)
;~ 	AdlibRegister("cerrar", 10000)
Else
	Exit
EndIf

While 1
	Sleep(10)
WEnd

Func cerrar()
	Exit
EndFunc   ;==>cerrar
Este es el codigo HTML

Código: Seleccionar todo

<script async src="//pagead2.googlesyndication.com/pagead/js/adsbygoogle.js"></script>
<!-- avy -->
<ins class="adsbygoogle"
     style="display:inline-block;width:336px;height:280px"
     data-ad-client="ca-pub-9425996110625918"
     data-ad-slot="2467722580"></ins>
<script>
(adsbygoogle = window.adsbygoogle || []).push({});
</script>
gracias de antemano :smt024
Obra de modo que merezcas a tu propio juicio y a juicio de los demás la eternidad, que te hagas insustituible que no merezcas morir.
https://www.facebook.com/yasmanycurimilma
Avatar de Usuario
Chefito
Profesional del Autoit
Mensajes: 2035
Registrado: 21 Feb 2008, 18:42
Ubicación: Albacete/Cuenca (España)

Re: HTML publicidad no se muestra

Mensaje por Chefito »

El principal problema está en el código html que no muestra nada. Haz una página web local que muestre el anuncio, y si tienes algún problema en insertarla en autoit, ponnos el código html que funcione y te ayudaremos.

Saludos.
Cita vista en algún lugar de la red: En este mundo hay 10 tipos de personas, los que saben binario y los que no ;).
Responder