PDA

View Full Version : Run Java code for web page via VBA



Gb.pandey
04-07-2015, 11:59 PM
Hi Guys

Need your expert solution for my query.

I am in process of developing a macro to fill online application form from data provided on MS Excel.

So far I am able to

1. Login to web site
2. Open application form
3. Fill data (stuck with some issue)
4. Submit form

On step 3 while filling the data there is a condition on web page that if two text box (Longitude and Lattitude) having value, only then a button (Get Airport) is activated for further action. Code is given below:

<td class=caption_display width = "4%"></td>
<td class=caption_Mandatory1 width = "30%" >&nbsp;(b) &nbsp;Lattitude </td>
<td class=caption_data colspan=3><input style="width=120;" type=textbox name=txtLatitude maxlength=7 onfocus="return countdatavalue(ofrm.txtLatitude.value);" onBlur="validation_lat();return countervalues(ofrm.txtLatitude.value);" value=>XXDYYZZ (D=N(North) X=Degree,Y=Min,Z=Sec)</td>

</TR>
<tr>
<td class=caption_display width = "4%"></td>
<td class=caption_Mandatory1 width = "30%" >&nbsp;(c) &nbsp;Longitude </td>
<td class=caption_data colspan=3><input style="width=120;" type=textbox name=txtLongitude maxlength=8 onfocus="return countdatavalue(ofrm.txtLongitude.value);" onBlur="validation_long();return countervalues(ofrm.txtLongitude.value);" value=>XXXDYYZZ (D=E(East) X=Degree,Y=Min,Z=Sec)</td>


</TR>
<tr>
<td class=caption_Mandatory1 width = "4%"><center>8.</center></td>
<td class=caption_Mandatory1 width = "40%" >&nbsp;(a) &nbsp;Name of Nearest Airport</td>
<td class=caption_data colspan=3>
<input type=button name="GetAirport" value="GetAirport" disabled onclick="return NewPage();">
<input style="width=250;" type=textbox name=txtNearest_Airport maxlength=50 readonly=true value=></td>
</TR>
<tr>
<td class=caption_display width = "4%"></td>
<td class=caption_Mandatory1 width = "30%" >&nbsp;(b) &nbsp;Distance</td>
<td class=caption_data colspan=3><input style="TEXT-ALIGN: right; width=70;" type=textbox maxlength=5 name=txtDistance readonly=true value=>&nbsp;&nbsp;(in Kms.)</td>
</TR>



Kindly suggest.

mancubus
04-08-2015, 01:21 AM
pls see my post to your previous thread on the same request.

and pls do not duplicate the threads.