I am making an auto form filler. I want it to select a radio button from two radio buttons. It is for gender selection for an account for this site.
</div>
<div class="formRow">
<label class="form-label" for="gender">Gender:</label>
<div class="formRadio signupPage">
<input id="MaleBtn" type="radio" name="ctl00$cphRoblox$ctl00$Gender" value="MaleBtn" onclick="Roblox.SignupFormValidator.checkGender();" tabindex="4" /><label for="MaleBtn">Male</label>
<input id="FemaleBtn" type="radio" name="ctl00$cphRoblox$ctl00$Gender" value="FemaleBtn" onclick="Roblox.SignupFormValidator.checkGender();" tabindex="5" /><label for="FemaleBtn">Female</label>
</div>
Set IE = CreateObject("InternetExplorer.Application")
intHighNumber = 193949
intLowNumber = 1
For i = 1 to 5
Randomize
intNumber = Int((intHighNumber - intLowNumber + 1) * Rnd + intLowNumber)
Next
set WshShell = WScript.CreateObject("WScript.Shell")
IE.Navigate "https://www.roblox.com/Login/Signup.aspx#13706547239921&resize,128px"
IE.Visible = True
Wscript.Sleep 1000
IE.Document.All.Item("ctl00$cphRoblox$ctl00$lstMonths").Value = "6"
IE.Document.All.Item("ctl00$cphRoblox$ctl00$lstDays").Value = "2"
IE.Document.All.Item("ctl00$cphRoblox$ctl00$lstYears").Value = "2000"
IE.Document.All.Item("ctl00$cphRoblox$ctl00$UserName").Value = "dafasgsadgasq32"
IE.Document.All.Item("pass").Value = "nono2355"
IE.Document.All.Item("passConfirm").Value = "nono2355"
`[[[[[[[[[[Problem]]]]]]]]]]]]]
IE.Document.All.Item("ctl00$cphRoblox$ctl00$Gender").Value = "MaleBtn"
`[[[[[[[[End of Problem]]]]]]]]
WshShell.AppActivate "IE"
WshShell.SendKeys "{ENTER}"
</div>
<div class="formRow">
<label class="form-label" for="gender">Gender:</label>
<div class="formRadio signupPage">
<input id="MaleBtn" type="radio" name="ctl00$cphRoblox$ctl00$Gender" value="MaleBtn" onclick="Roblox.SignupFormValidator.checkGender();" tabindex="4" /><label for="MaleBtn">Male</label>
<input id="FemaleBtn" type="radio" name="ctl00$cphRoblox$ctl00$Gender" value="FemaleBtn" onclick="Roblox.SignupFormValidator.checkGender();" tabindex="5" /><label for="FemaleBtn">Female</label>
</div>
Set IE = CreateObject("InternetExplorer.Application")
intHighNumber = 193949
intLowNumber = 1
For i = 1 to 5
Randomize
intNumber = Int((intHighNumber - intLowNumber + 1) * Rnd + intLowNumber)
Next
set WshShell = WScript.CreateObject("WScript.Shell")
IE.Navigate "https://www.roblox.com/Login/Signup.aspx#13706547239921&resize,128px"
IE.Visible = True
Wscript.Sleep 1000
IE.Document.All.Item("ctl00$cphRoblox$ctl00$lstMonths").Value = "6"
IE.Document.All.Item("ctl00$cphRoblox$ctl00$lstDays").Value = "2"
IE.Document.All.Item("ctl00$cphRoblox$ctl00$lstYears").Value = "2000"
IE.Document.All.Item("ctl00$cphRoblox$ctl00$UserName").Value = "dafasgsadgasq32"
IE.Document.All.Item("pass").Value = "nono2355"
IE.Document.All.Item("passConfirm").Value = "nono2355"
`[[[[[[[[[[Problem]]]]]]]]]]]]]
IE.Document.All.Item("ctl00$cphRoblox$ctl00$Gender").Value = "MaleBtn"
`[[[[[[[[End of Problem]]]]]]]]
WshShell.AppActivate "IE"
WshShell.SendKeys "{ENTER}"