Ver Mensaje Individual
  #1 (permalink)  
Antiguo 08/06/2016, 11:01
Avatar de jandrogdz
jandrogdz
 
Fecha de Ingreso: julio-2012
Ubicación: public $Guadalajara
Mensajes: 397
Antigüedad: 12 años, 7 meses
Puntos: 12
select dinamico web browser vb

Buenas Foro.

Alguien me podria ayudar a obtener el valor de un select dinamico en un web browser.


Código HTML:
Ver original
  1. <select name="ctl00$MainContent$wucConfigDeclaracion$wucDdlPeriodicidad$ddlCatalogo" onchange="javascript:setTimeout('__doPostBack(\'ctl00$MainContent$wucConfigDeclaracion$wucDdlPeriodicidad$ddlCatalogo\',\'\')', 0)" id="MainContent_wucConfigDeclaracion_wucDdlPeriodicidad_ddlCatalogo" class="PSDROPDOWNLIST">
  2.             <option selected="selected" value=""></option>
  3.             <option value="M">1-Mensual</option>
  4.             <option value="T">3-Trimestral</option>
  5.             <option value="Q">4-Cuatrimestral</option>
  6.             <option value="S">5-Semestral (A)</option>
  7.             <option value="L">6-Semestral (B) Liquidación</option>
  8.             <option value="J">7-Ajuste</option>
  9.             <option value="Y">8-Del Ejercicio</option>
  10.             <option value="N">9-Sin Periodo</option>
  11.  
  12.         </select>

Código vb:
Ver original
  1. Dim periodicidad As HtmlElement = wb1.Document.GetElementById("MainContent_wucConfigDeclaracion_wucDdlPeriodicidad_ddlCatalogo")
  2.         periodicidad.Document.Window.DomWindow.execscript("setTimeout('__doPostBack(\'ctl00$MainContent$wucConfigDeclaracion$wucDdlPeriodicidad$ddlCatalogo\',\'\')', 0)", "JavaScript")
  3.         periodicidad.SetAttribute("value", "M")
  4.  
  5.         'wb1.Document.GetElementById("MainContent_wucConfigDeclaracion_wucDdlPeriodicidad_ddlCatalogo").InvokeMember("onchange")
  6.        'wb1.Document.Window.DomWindow.execscript("setTimeout('__doPostBack(\'ctl00$MainContent$wucConfigDeclaracion$wucDdlPeriodicidad$ddlCatalogo\',\'\')', 0)", "JavaScript")
  7.        'wb1.Document.InvokeScript("setTimeout('__doPostBack(\'ctl00$MainContent$wucConfigDeclaracion$wucDdlPeriodicidad$ddlCatalogo\',\'\')', 0)")
  8.  
  9.         wb1.Document.GetElementById("MainContent_wucConfigDeclaracion_wucDdlTipoDeclaracion_ddlCatalogo").SetAttribute("value", "001")
  10.  
  11.         Dim periodo As HtmlElement = wb1.Document.GetElementById("MainContent_wucConfigDeclaracion_wucDdlPeriodoFiscal_ddlCatalogo")
  12.         periodo.SetAttribute("value", "005")
  13.  
  14.  
  15.  
  16.         wb1.Document.GetElementById("MainContent_btnSiguiente").InvokeMember("click")

Selecciono una opcion en este select y si carga los datos en el siguiente pero no selecciona la opcion pero no obtiene el valor que le mando espero puedan ayudarme.

De antemano muchas gracias
__________________
Lo imposible solo cuesta un poco mas