Click this Radio Button NewBie

[nbob]

Need to click accept radio button then click submit button ?

                  Accept
                  Decline

 

[nbob]

Sorry need to decode the HTML...

input type=radio id="rdoTC" name="rdoTC" value="Y" accesskey="A
input type=radio id="rdoTC" name="rdoTC" value="N"

input type=button id="btnTC" name="btnTC" value="Submit" *******="javascript:return btnTC_*******()" accesskey="S"

 

[Leith Ross]

Hello nbob,

Are you using Internet Explorer and you want to click the button from VB?
Do you have any code you can post?

 

[nbob]

Yes navigating IE and this screen is previous to the login screen at my URL. So far I have the following...

Sub GoToWebSiteAndEnterPWUN()

Dim appIE As Object ' InternetExplorer.Application
Dim sURL As String
Dim UserN As Variant, PW As Variant
Dim Element As Object ' HTMLButtonElement
Dim btnInput As Object ' MSHTML.HTMLInputElement
Dim Subframe As Object 
Set appIE = CreateObject("InternetExplorer.Application")

sURL = "http:myURL.asp"

With appIE
    .Navigate sURL
.Visible = True
'Click Radio Button ? ? ?


' enter username and password in textboxes
Set UserN = appIE.Document.getElementsByName("&txtTheAgent=")
If Not UserN Is Nothing Then UserN(0).Value = "myValue"
    
    
Set PW = appIE.Document.getElementsByName("&txtTheInitials=")
If Not PW Is Nothing Then PW(0).Value = "My Value"
    
    
Set PW2 = appIE.Document.getElementsByName("&txtThePassword")
If Not PW2 Is Nothing Then PW2(0).Value = "My Value!"
    

' click 'Submit' button
Set ElementCol = appIE.Document.getElementsByTagName("btnSubmit")

For Each btnInput In ElementCol
    If btnInput.Value = "Submit" Then btnInput.Click
  

Next
End with 
End Sub

My previous post contained the HTML for the Radio Button here is the HTML for my Login Page.

PageBodyForm.txtMsgData.value  = "SIGNON" + 
        "&txtTheAgent="    + PageBodyForm.txtTheAgent.value + 
        "&txtTheInitials=" + PageBodyForm.txtTheInitials.value + 
        "&txtOR="          + PageBodyForm.txtOR.value;  

// 10-12-2007 Moved to DoPrepPage for mix case
//        "&txtThePassword=" + PageBodyForm.txtThePassword.value;
}
//-->
*********>
******** ******************** FOR=btnSubmit EVENT=*******>
  btnSubmit_*******()
//-->
*********>

 

[nbob]

Any Help here?

 

[Leith Ross]

Hello nbob,

What is the current code not doing?