Visual Basic 6 - Web Browser DOCUMENT

Forum - Visual Basic 6 - Web Browser DOCUMENT

davifumi89 (Normal User)
Rookie

Messaggi: 49
Iscritto: 09/03/2010

Postato alle 10:39
Mercoledì, 05/05/2010

ragazzi su google trovo ben poco e quel poco molto confuso ma vorrei avere se possibile una bella infarinatura sulla proprietà dell'oggetto webbrowser.document (in VB6)

In pratica vorrei imparare a scrivere su una text, leggerne il contenuto, schiacciare un pulsante, selezionare una radiobutton o una checkbox ecc in un form html.

Vorrei ad esempio schiacciare una radiobutton per selezionare la lingua inglese in una pagina html e poi cliccare il tasto applica:

Codice sorgente - presumibilmente Visual Basic 6

<div style="padding:10px;"><form id="frmDeviceInfo"   method="post" action="this.LCDispatcher?nav=hp.Language">
<table class="hpTable"   >
<tr >
<td  style="white-space:nowrap;"   >
<input name="RadioButton"  type="radio"  onclick="enableDisableSelect()"   value="0"  />
<span  id="Text1"  class="hpPageText" >View Pages in Browser Language</span></td>
</tr>
<tr >
<td  style="white-space:nowrap;"   >
<input name="RadioButton"  type="radio"  onclick="enableDisableSelect()"   value="1"  />
<span  id="Text2"  class="hpPageText" >View Pages in Printer Language</span></td>
</tr>
<tr >
<td  style="white-space:nowrap;"   >
[b]<input name="RadioButton"  type="radio"  onclick="enableDisableSelect()"  id="RadioButtonID"   value="2"  checked="checked"  />[/b]
<span  id="Text3"  class="hpPageText" >Select A Language </span><select name="drpLanguage"  id="select"  class="hpPageCombo"   size="1" >
<option  selected="selected" value="1">ENGLISH</option>
<option  value="2">FRANCAIS</option>
<option  value="3">DEUTSCH</option>
<option  value="5">ITALIANO</option>
<option  value="4">ESPAÑOL</option>
<option  value="6">SVENSKA</option>
<option  value="7">DANSK</option>
<option  value="8">NORSK</option>
<option  value="9">NEDERLANDS</option>
<option  value="10">SUOMI</option>
<option  value="12">PORTUGUÊS</option>
<option  value="27">CATALÀ</option>
</select>
</td>
</tr>
</table>
<div class="hpFormBottom"><hr class="hpButtonSeparator" />
<table style="float: right;"><tr>
<td><input class="buttonStyled" type="submit" name="btnApply" value="      Apply      " /></td>
<td><input class="buttonStyled" type="reset" name="btnCancel" value="      Cancel      " /></td>
</tr></table>

e ho provato così:

WebBrowser1.Document.getElementById("RadioButton").Click (ma nn va)

così

WebBrowser1.Document.getElementById("RadioButton").value=2 / ="2"

e non va

ecc

Aiuti e suggerimenti?

GrG (Member)
Guru^2

Messaggi: 3430
Iscritto: 21/08/2007

Postato alle 19:59
Mercoledì, 05/05/2010

Studiati l'oggetto document => Document Object Model (DOM)

guarda qui, ci sono varie proprietà:
http://www.w3schools.com/jsref/default.asp

davifumi89 (Normal User)
Rookie

Messaggi: 49
Iscritto: 09/03/2010

Postato alle 8:38
Giovedì, 06/05/2010

Grazie tante. Ho notato che mi mancano i linguaggi di script...pensavo che il codice in vb6 fosse strettamente legato all'oggetto web browser invece mi conviene studiare il JS e il VBS! Sempre molto gentile grazie GrG,

Soluzione:

Poichè ci sono "n" oggetti con lo stesso nome, si possono identificare esclusivamente con la proprietà VALUE:

For w = 0 To oggettowb.Document.Forms(0).Length - 1
If oggettowb.Document.Forms(0)(w).Value = "2" Then
oggettowb.Document.Forms(0)(w).Checked = True
oggettowb.Document.Forms(0)(w).Click
End If
Next w