Duda con getElementByiD

Iniciado por NsTeam, 7 Septiembre 2017, 05:10 AM

0 Miembros y 1 Visitante están viendo este tema.

Imprimir
Ir Abajo Páginas1
Acciones del Usuario

NsTeam

7 Septiembre 2017, 05:10 AM
Buenas a Todos!, tengo una duda que por favor quisiera que me ayudaran con ello.

Tengo este código HTML

Código [Seleccionar]

<select class="form-control input-sm" name="aff_test_id" id="aff_test_id">
    <option value="1">--</option>
    <option value="2">cuerpo</option><option value="3">brazo</option><option value="1">tronco</option>    </select>


Y quiero insertar o cambiar a la opción a 2 y estoy usando este código
Código [Seleccionar]

WebBrowser1.Document.getElementByiD("aff_test_id").Value = "2"

pero no me funciona.

(Funciona solamente si el campo de name(id) es "select", pero no puedo cambiarlo)

Cómo puedo hacer para que cambie el valor de la página?

Gracias.

Yuki

#1
10 Septiembre 2017, 18:18 PM
Podrías subirnos a pastebin el código fuente de la pagina html? así podría intentar resolver tu situación.

Flamer

#2
11 Septiembre 2017, 02:59 AM
hola intenta con

Código (vb) [Seleccionar]

WebBrowser1.document.getElementById("aff_test_id").options[1].text="Flamer"

saludos Flamer y dime si te sirvio

Eleкtro

#3
12 Septiembre 2017, 17:09 PM Ultima modificación: 12 Septiembre 2017, 17:29 PM por Eleкtro
Hola.

Las preguntas sobre VB.NET van en el subforo de programación .NET Framwork, no en el subforo de VB6.



Te muestro un ejemplo completo:

Código (vbnet) [Seleccionar]
Dim sourceCode As String =
   <html>
       <body>
           <Select Class="form-control input-sm" name="aff_test_id" id="aff_test_id">
               <option value="1"> --</option>
               <option value="2"> cuerpo</option>
           </Select>
       </body>
   </html>.ToString()

' Creo una nueva instancia del tipo WebBrowser para esta demostración,
' lo que nos permitirá utilizar una instancia de la clase HtmlDocument,
' donde cargaremos el código fuente Html declarado en la variable sourceCode.
Using wb As New WebBrowser()

   wb.ScriptErrorsSuppressed = True
   wb.DocumentText = ""
   wb.Document.OpenNew(replaceInHistory:=True)
   wb.Document.Write(sourceCode)

   Dim el As HtmlElement = wb.Document.GetElementsByTagName("option")(1)
   ' O también: wb.Document.GetElementById("aff_test_id").GetElementsByTagName("option")(1)

   ' Para cambiarle el atributo "value":
   ' el.SetAttribute("value", "2")

   ' Para cambiarle el texto:
   el.InnerText = "Hello World"

   Debug.WriteLine(el.OuterHtml)

End Using

Saludos.







Imprimir
Ir Arriba Páginas1
Acciones del Usuario