Solved

VB Script Login to Webpage

Posted on 2011-09-03
12
939 Views
Last Modified: 2012-05-12
Getting error in vbs.  The problem I am having is the input name attribute contain $

Brings up page but does not apply account number to input field and password to input field for password

Can anyone help
Thanks

VBS
 
Dim objIE
Dim strtext
Dim strpasstext
Dim strbutton

strtext = "DisplayExpressTopNav1" & Chr(36) & "TextboxLogin"
strpasstext = "DisplayExpressTopNav1" & Chr(36) & "TextboxPassword"
strbutton = "DisplayExpressTopNav1" & Chr(36) & "ButtonLogin"


Set objIE = WScript.CreateObject("InternetExplorer.Application")

objIE.Navigate "http://www.tab.com.au/ExpressBet/LoginFrame.aspx?State=2&ExpressBetMode=Standard"
objIE.Visible = true

While objIE.Busy = true
	WScript.Sleep 100
Wend


objIE.Document.form1.DisplayExpressTopNav1$TextboxLogin.value = "test"
objIE.Document.form1.strpasstext.Value = "test"

objIE.Document.form1.strbutton.Click

Open in new window


page source
 
<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/tr/xhtml1/DTD/xhtml1-transitional.dtd">


<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="en" lang="en">
<head><title>

</title><link href="/Shared/Styles/common_login.css?v=5.14.2.0" rel="stylesheet" type="text/css" /><link href="/Shared/Styles/common_login.css?v=5.14.2.0" rel="stylesheet" type="text/css" /><link href="/Shared/Styles/sty_express.css?v=5.14.2.0" rel="stylesheet" type="text/css" /></head>
<body>
    <form name="form1" method="post" action="LoginFrame.aspx?State=2&amp;ExpressBetMode=Standard" id="form1">
<div>
<input type="hidden" name="__EVENTTARGET" id="__EVENTTARGET" value="" />
<input type="hidden" name="__EVENTARGUMENT" id="__EVENTARGUMENT" value="" />
<input type="hidden" name="__VIEWSTATE" id="__VIEWSTATE" value="/wEPDwUKMTc2ODc2NTE2NA9kFgICBA9kFgwCAQ8PFgYeCEltYWdlVXJsBTIvU2hhcmVkL0ltYWdlcy9FeHByZXNzQmV0L2VuLWF1L2V4cHJlc3NCRVRfTlNXLmdpZh4HVG9vbFRpcAVHVEFCIFNwb3J0c2JldCAtIEhvcnNlIFJhY2luZyAtIEdyZXlob3VuZCBSYWNpbmcgLSBIYXJuZXNzIFJhY2luZyAtIEhvbWUeDUFsdGVybmF0ZVRleHQFR1RBQiBTcG9ydHNiZXQgLSBIb3JzZSBSYWNpbmcgLSBHcmV5aG91bmQgUmFjaW5nIC0gSGFybmVzcyBSYWNpbmcgLSBIb21lZGQCAg8WAh4EVGV4dAXYAzxhIGhyZWY9ImphdmFzY3JpcHQ6dm9pZCgwKSIgb25jbGljaz0iT3BlblBvcHVwKCcvTG9naW4vSm9pbk5vdy5hc3B4P1N0YXRlPTImYW1wO1JlZmVycmluZ1BhZ2VUeXBlPUV4cHJlc3NCZXRTdGFuZGFyZCZhbXA7UmV0dXJuVXJsPS9FeHByZXNzQmV0L0xvZ2luRnJhbWUuYXNweCUzZlN0YXRlJTNkMiUyNkV4cHJlc3NCZXRNb2RlJTNkU3RhbmRhcmQnLCAnSm9pbk5vd1dpbmRvdycsICc2NDAnLCAnNDgwJywgJ25vJyk7V3JpdGVQYXJlbnRVcmwoICdodHRwOi8vd3d3LnRhYi5jb20uYXUvRXhwcmVzc0JldC9Mb2dpbkZyYW1lLmFzcHg/U3RhdGU9MiZhbXA7RXhwcmVzc0JldE1vZGU9U3RhbmRhcmQnICk7Ij48aW1nIGFsdD0nJyBhbGlnbj0idG9wIiBzcmM9Jy9TaGFyZWQvSW1hZ2VzL0V4cHJlc3NCZXQvZW4tYXUvam9pbk5vd19ibHVlQkcuZ2lmJyBzdHlsZT0idmVydGljYWwtYWxpZ246dG9wO2JvcmRlcjpub25lOyIvPjwvYT5kAgQPDxYEHwMFC0VYUEVSVCBNT0RFHgtOYXZpZ2F0ZVVybAUnL0V4cHJlc3NCZXQvRXhwZXJ0L0RlZmF1bHQuYXNweD9TdGF0ZT0yZGQCBQ9kFgJmD2QWAgIBDw8WAh8DBQFlZGQCBg8UKwACEA9kFgIeCG9uY2hhbmdlBbECZXZhbChkb2N1bWVudC5nZXRFbGVtZW50QnlJZCgnZGRsTXlBY2NvdW50Jykub3B0aW9uc1tkb2N1bWVudC5nZXRFbGVtZW50QnlJZCgnZGRsTXlBY2NvdW50Jykuc2VsZWN0ZWRJbmRleF0udmFsdWUpO2RvY3VtZW50LmdldEVsZW1lbnRCeUlkKCdkZGxNeUFjY291bnQnKS5zZWxlY3RlZEluZGV4PTA7Q2NBZGRDYWxsYmFjayhQTV9MT0dJTl9SRUZSRVNIX0NBTExCQUNLX0NPT0tJRU5BTUUgKyAnLCcgKyBQTV9MT0dJTl9SRUZSRVNIX0NBTExCQUNLX0NPT0tJRUtFWSwgUG1Qb3N0TG9naW5SZWZyZXNoKTtDY1N0YXJ0TGlzdGVuZXIoKTsQFQkKTXkgQWNjb3VudApNeSBEZXRhaWxzB0JhbGFuY2UJU3RhdGVtZW50B0RlcG9zaXQIV2l0aGRyYXcITXkgUG9wdXALUHJlZmVyZW5jZXMHUmVzdWx0cxUJAFJTZXRHZW5lcmljQWxlcnRGb3JMb2dpbignUGxlYXNlIGxvZyBpbiBhbmQgc2VsZWN0ICZxdW90O015IERldGFpbHMmcXVvdDsgYWdhaW4uJyk7T1NldEdlbmVyaWNBbGVydEZvckxvZ2luKCdQbGVhc2UgbG9nIGluIGFuZCBzZWxlY3QgJnF1b3Q7QmFsYW5jZSZxdW90OyBhZ2Fpbi4nKTtRU2V0R2VuZXJpY0FsZXJ0Rm9yTG9naW4oJ1BsZWFzZSBsb2cgaW4gYW5kIHNlbGVjdCAmcXVvdDtTdGF0ZW1lbnQmcXVvdDsgYWdhaW4uJyk7T1NldEdlbmVyaWNBbGVydEZvckxvZ2luKCdQbGVhc2UgbG9nIGluIGFuZCBzZWxlY3QgJnF1b3Q7RGVwb3NpdCZxdW90OyBhZ2Fpbi4nKTtQU2V0R2VuZXJpY0FsZXJ0Rm9yTG9naW4oJ1BsZWFzZSBsb2cgaW4gYW5kIHNlbGVjdCAmcXVvdDtXaXRoZHJhdyZxdW90OyBhZ2Fpbi4nKTtQU2V0R2VuZXJpY0FsZXJ0Rm9yTG9naW4oJ1BsZWFzZSBsb2cgaW4gYW5kIHNlbGVjdCAmcXVvdDtNeSBQb3B1cCZxdW90OyBhZ2Fpbi4nKTtTU2V0R2VuZXJpY0FsZXJ0Rm9yTG9naW4oJ1BsZWFzZSBsb2cgaW4gYW5kIHNlbGVjdCAmcXVvdDtQcmVmZXJlbmNlcyZxdW90OyBhZ2Fpbi4nKTuJBHdpbmRvdy5vcGVuKCcvUmFjaW5nL0luZm9ybWF0aW9uL1Jlc3VsdHMvRGVmYXVsdC5hc3B4P1N0YXRlPTImUGFyZW50VXJsPWh0dHAlM2ElMmYlMmZ3d3cudGFiLmNvbS5hdSUyZkV4cHJlc3NCZXQlMmZTdGFuZGFyZCUyZkRlZmF1bHQuYXNweCUzZlN0YXRlJTNkMiUyNkV4cHJlc3NCZXRNb2RlJTNkU3RhbmRhcmQmU21hbGxTaXplPVBvcFVwTG9naW5TbWFsbFNpemUmUmVmZXJyaW5nUGFnZVR5cGU9RXhwcmVzc0JldFN0YW5kYXJkJywgJ1Jlc3VsdHMnLCAnaGVpZ2h0PTU0MCx3aWR0aD04NDAsc2NyZWVuWD0xMCxzY3JlZW5ZPTI1LGxlZnQ9MTAsdG9wPTI1LHNjcm9sbGJhcnM9eWVzLGRpcmVjdG9yaWVzPW5vLHRvb2xiYXJzPXllcyxtZW51YmFyPXllcyxkZXBlbmRlbnQ9eWVzLHN0YXR1cz15ZXMscmVzaXphYmxlPXllcycpO1dyaXRlUGFyZW50VXJsKCAnaHR0cDovL3d3dy50YWIuY29tLmF1L0V4cHJlc3NCZXQvU3RhbmRhcmQvRGVmYXVsdC5hc3B4P1N0YXRlPTImRXhwcmVzc0JldE1vZGU9U3RhbmRhcmQnICk7FCsDCWdnZ2dnZ2dnZxYBZmRkAgcPZBYKZg8PFgIfAwW7ATxhIGNsYXNzPSJMb2dpbkJhckxpbmtEZWZhdWx0IiBvbmNsaWNrPSIiIG9ubW91c2VvdmVyPSJ0aGlzLmNsYXNzTmFtZT0nTG9naW5CYXJNb3VzZU92ZXInIiBvbm1vdXNlb3V0PSJ0aGlzLmNsYXNzTmFtZT0nTG9naW5CYXJMaW5rRGVmYXVsdCciIGhyZWY9Ii9EZWZhdWx0LmFzcHgiIHRhcmdldD0iX3BhcmVudCI+SG9tZTwvYT5kZAICDxYCHgdWaXNpYmxlaBYEAgEPZBYCZg9kFggCAQ8PFgIfA2VkZAIFDw8WAh8DZWRkAgkPDxYCHwNlZGQCEQ8PFgYfAwUHUmVmcmVzaB4IQ3NzQ2xhc3MFE0xvZ2luQmFyTGlua0RlZmF1bHQeBF8hU0ICAhYEHgtvbm1vdXNlb3ZlcgUidGhpcy5jbGFzc05hbWU9J0xvZ2luQmFyTW91c2VPdmVyJx4Kb25tb3VzZW91dAUkdGhpcy5jbGFzc05hbWU9J0xvZ2luQmFyTGlua0RlZmF1bHQnZAIDDw8WBh8DBQZMb2dvdXQfBwUgTG9naW5CYXJUZXh0IExvZ2luQmFyTGlua0RlZmF1bHQfCAICFgQfCQUidGhpcy5jbGFzc05hbWU9J0xvZ2luQmFyTW91c2VPdmVyJx8KBSR0aGlzLmNsYXNzTmFtZT0nTG9naW5CYXJMaW5rRGVmYXVsdCdkAgMPZBYKAgEPDxYCHwMFDkFjY291bnQgTnVtYmVyZGQCAw8PFgIfAwUIUGFzc3dvcmRkZAIFDw8WAh4LUG9zdEJhY2tVcmwFoAFodHRwczovL3d3dy50YWIuY29tLmF1L0xvZ2luL0xvZ2luVXNlci5hc3B4P1N0YXRlPTImUmV0dXJuVVJMPWh0dHAlM2ElMmYlMmZ3d3cudGFiLmNvbS5hdSUyZkV4cHJlc3NCZXQlMmZMb2dpbkZyYW1lLmFzcHglM2ZTdGF0ZSUzZDIlMjZFeHByZXNzQmV0TW9kZSUzZFN0YW5kYXJkZGQCCg8WAh8DBaQCPGEgY2xhc3M9IkxvZ2luQmFyTGlua0RlZmF1bHQiIG9uY2xpY2s9IiIgb25tb3VzZW92ZXI9InRoaXMuY2xhc3NOYW1lPSdMb2dpbkJhck1vdXNlT3ZlciciIG9ubW91c2VvdXQ9InRoaXMuY2xhc3NOYW1lPSdMb2dpbkJhckxpbmtEZWZhdWx0JyIgaHJlZj0iaHR0cDovL25ldHRhYi5jdXN0aGVscC5jb20vY2dpLWJpbi9uZXR0YWIuY2ZnL3BocC9lbmR1c2VyL3N0ZF9hZHAucGhwP3Bfc2lkPVl1RUUqNDhoJmFtcDtwX2x2YT0mYW1wO3BfZmFxaWQ9MyIgdGFyZ2V0PSJfYmxhbmsiPkFjY291bnQgTnVtYmVyPC9hPmQCDg8WAh8DBb4EPGEgaHJlZj0iamF2YXNjcmlwdDp2b2lkKDApOyIgb25jbGljaz0iT3BlblBvcHVwKCdodHRwczovL3d3dy50YWIuY29tLmF1L0FjY291bnRNYW5hZ2VtZW50L0FjY291bnRIb2xkZXIvUGFzc3dvcmQvUmV0cmlldmVGb3Jnb3R0ZW5QYXNzd29yZERlZmF1bHQuYXNweD9TdGF0ZT0yJmFtcDthbXA7UmVmZXJyaW5nUGFnZVR5cGU9RXhwcmVzc0JldFN0YW5kYXJkJmFtcDthbXA7UGFyZW50VXJsPS9FeHByZXNzQmV0L0xvZ2luRnJhbWUuYXNweCUzZlN0YXRlJTNkMiUyNkV4cHJlc3NCZXRNb2RlJTNkU3RhbmRhcmQnLCAnTXlTdGF0ZVdpbmRvdycsICc2NDAnLCAnNTMwJywgJ25vJyk7V3JpdGVQYXJlbnRVcmwoJ2h0dHA6Ly93d3cudGFiLmNvbS5hdS9FeHByZXNzQmV0L0xvZ2luRnJhbWUuYXNweD9TdGF0ZT0yJmFtcDtFeHByZXNzQmV0TW9kZT1TdGFuZGFyZCcpOyIgY2xhc3M9IkxvZ2luQmFyTGlua0RlZmF1bHQiIG9ubW91c2VvdmVyPSJ0aGlzLmNsYXNzTmFtZT0nTG9naW5CYXJNb3VzZU92ZXInIiBvbm1vdXNlb3V0PSJ0aGlzLmNsYXNzTmFtZT0nTG9naW5CYXJMaW5rRGVmYXVsdCciPlBhc3N3b3JkPC9hPmQCBA8WCh4EaHJlZgUTamF2YXNjcmlwdDp2b2lkKDApOx4Hb25jbGljawXSAk9wZW5Qb3B1cCgnL0FjY291bnRNYW5hZ2VtZW50L015U3RhdGUvTXlTdGF0ZVBvcHVwLmFzcHg/U3RhdGU9MiZQYXJlbnRVcmw9JTJmRXhwcmVzc0JldCUyZlN0YW5kYXJkJTJmRGVmYXVsdC5hc3B4JTNmU3RhdGUlM2QyJlNtYWxsU2l6ZT1Qb3BVcExvZ2luU21hbGxTaXplJlJlZmVycmluZ1BhZ2VUeXBlPUV4cHJlc3NCZXRTdGFuZGFyZCZQYWdlQXV0aG9yaXNhdGlvbj0nLCAnTG9naW4nLCAnNjUwJywgJzQ4NScpO1dyaXRlUGFyZW50VXJsKCAnaHR0cDovL3d3dy50YWIuY29tLmF1L0V4cHJlc3NCZXQvTG9naW5GcmFtZS5hc3B4P1N0YXRlPTImRXhwcmVzc0JldE1vZGU9U3RhbmRhcmQnICk7HwkFInRoaXMuY2xhc3NOYW1lPSdMb2dpbkJhck1vdXNlT3ZlcicfCgUkdGhpcy5jbGFzc05hbWU9J0xvZ2luQmFyTGlua0RlZmF1bHQnHglpbm5lcmh0bWwFCE15IFN0YXRlZAIGDxYCHwMFxwE8YSBjbGFzcz0iTG9naW5CYXJMaW5rRGVmYXVsdCIgb25jbGljaz0iIiBvbm1vdXNlb3Zlcj0idGhpcy5jbGFzc05hbWU9J0xvZ2luQmFyTW91c2VPdmVyJyIgb25tb3VzZW91dD0idGhpcy5jbGFzc05hbWU9J0xvZ2luQmFyTGlua0RlZmF1bHQnIiBocmVmPSJodHRwOi8vbmV0dGFiLmN1c3RoZWxwLmNvbSIgdGFyZ2V0PSJfYmxhbmsiPkhlbHA8L2E+ZGSIjGcV3+Iq5Ppe98hWmbk/AAGKgQ==" />
</div>

<script type="text/javascript">
//<![CDATA[
var theForm = document.forms['form1'];
if (!theForm) {
    theForm = document.form1;
}
function __doPostBack(eventTarget, eventArgument) {
    if (!theForm.onsubmit || (theForm.onsubmit() != false)) {
        theForm.__EVENTTARGET.value = eventTarget;
        theForm.__EVENTARGUMENT.value = eventArgument;
        theForm.submit();
    }
}
//]]>
</script>


<script src="/WebResource.axd?d=bR6C-CV5y3I7IIexwpGorw2&amp;t=634460446983917618" type="text/javascript"></script>


<script src="/Shared/Scripts/Shared/GlobalCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/Shared/DeepMetrixCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/shared/CookieCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/expressbet/XmlHttpCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/ExpressBet/XmlHttpControlsCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/expressbet/PageManagerCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/ExpressBet/NextToGoCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/ExpressBet/UtilityCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/ExpressBet/CookieCallbackCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/Shared/CookieCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/Shared/Scripts/ExpressBet/LoginCompiled.js?v=5.14.2.0" type="text/javascript"></script>
<script src="/ScriptResource.axd?d=AU1FFUZ27DfOgnOcLIW0BL6psinTL2AnaXefjH202GZ1H0R3e8aQZBlabwT6nrubSzBmBhiQ_eXMwPERhGFfpZpH9KBmPWjSHvv_eYKxEgQ1&amp;t=ffffffff825547af" type="text/javascript"></script>
<script src="/ScriptResource.axd?d=AU1FFUZ27DfOgnOcLIW0BL6psinTL2AnaXefjH202GZ1H0R3e8aQZBlabwT6nrubLaIyDxDLd4jDKelELS4YccqwQOoGQMZwUB1AItKHvu41&amp;t=ffffffff825547af" type="text/javascript"></script>
<div>

	<input type="hidden" name="__PREVIOUSPAGE" id="__PREVIOUSPAGE" value="PlM6Byao-2PsH9j-c3J9Ug5oQpIjeWJUwL_wrIQpBqA1" />
	<input type="hidden" name="__EVENTVALIDATION" id="__EVENTVALIDATION" value="/wEWBQKa9ouHAQKWz4GjAQLqnuqYBwLqysTwCgLjscrzDNE1YufDiB0WX4zTrCjod3Tg30c1" />
</div>
    <script type="text/javascript">
//<![CDATA[
Sys.WebForms.PageRequestManager._initialize('ScriptManager1', document.getElementById('form1'));
Sys.WebForms.PageRequestManager.getInstance()._updateControls(['tDateUpdatePanel'], [], [], 90);
//]]>
</script>

    <table width="100%" border="0" cellpadding="0" cellspacing="0" id="Header" style="height: 57px;">
        <tr>
            <td style="width: 98px; vertical-align: top">
                <a href="/Racing/Default.aspx?State=2" target="_parent">
                    <img id="ImageExpress" title="TAB Sportsbet - Horse Racing - Greyhound Racing - Harness Racing - Home" src="/Shared/Images/ExpressBet/en-au/expressBET_NSW.gif" alt="TAB Sportsbet - Horse Racing - Greyhound Racing - Harness Racing - Home" style="border-width:0px;" /></a>
            </td>
            <td style="width: 180px; vertical-align: middle; white-space: nowrap;">
                <a href="javascript:void(0)" onclick="OpenPopup('/Login/JoinNow.aspx?State=2&amp;ReferringPageType=ExpressBetStandard&amp;ReturnUrl=/ExpressBet/LoginFrame.aspx%3fState%3d2%26ExpressBetMode%3dStandard', 'JoinNowWindow', '640', '480', 'no');WriteParentUrl( 'http://www.tab.com.au/ExpressBet/LoginFrame.aspx?State=2&amp;ExpressBetMode=Standard' );"><img alt='' align="top" src='/Shared/Images/ExpressBet/en-au/joinNow_blueBG.gif' style="vertical-align:top;border:none;"/></a>                
            </td>
            <td width="390px">
                <div id="ErrorMessageDiv" style="display: none;position:absolute;top:0;">
                    <input type="hidden" id="ErrorMessageFocus" value="" />
                    <table cellpadding="0" cellspacing="0" border="0" class="LoginErrorExpressMessage" style="height:28px;width:480px">
                        <tr>
                            <td style="width:7px">
                                <img alt="" src="/Shared/Images/AccountManagement/en-au/gra_spacer.gif" width="7" height="1" />
                            </td>                          
                            <td style="width:23px">
                                <img alt="" id="ExclamationImage" src="/Shared/Images/Sports/en-au/error_icon.gif" />
                            </td>
                            <td style="width:5px">
                                <img alt="" src="/Shared/Images/AccountManagement/en-au/gra_spacer.gif" width="5" height="1" />
                            </td>
                            <td style="width:auto;vertical-align: middle;">
                                <span id="ErrorMessageLabel" style="font-size:11px;font-family:Arial;color:#ffffff;"></span>
                            </td>
                            <td style="width:39px;white-space: nowrap; color: #ffffff; vertical-align: middle;text-align:right;">
                                <a id="ErrorMessageCloseLabel" class="CloseLinkDefault" onclick="CloseErrorMessage();" href="javascript:void(0);">Close</a>
                            </td>
                            <td style="width:5px">
                                <img alt="" src="/Shared/Images/AccountManagement/en-au/gra_spacer.gif" width="5" height="1" />
                            </td>                            
                            <td style="width:13px">
                                <img alt="" class="CloseImageDefault" align="top" id="CloseImage" src="/Shared/Images/Sports/en-au/error_close_btn.gif" onclick="CloseErrorMessage();" />
                            </td>
                            <td style="width:7px">
                                <img alt="" src="/Shared/Images/AccountManagement/en-au/gra_spacer.gif" width="7" height="1" />
                            </td>  
                        </tr>
                    </table>
                </div>
                <img alt="" src="/Shared/Images/AccountManagement/en-au/gra_spacer.gif" width="1px" height="1px" />
            </td>
            <td>
                <table width="330px" border="0" cellpadding="0" cellspacing="0" id="Table1" align="right">
                    <tr>
                        <td style="width: 100px; vertical-align: middle; white-space: nowrap; text-align: right">
                            <a id="HyperLinkMode" href="/ExpressBet/Expert/Default.aspx?State=2" target="_parent">EXPERT MODE</a>
                        </td>
                        <td style="width: 85px; white-space: nowrap; vertical-align: middle; text-align: right" class="whiteText">
                            <div id="DateUpdatePanel">
	
                                    <b>
                                        
                                        <span id="clock">&nbsp;</span></b>                                        
                                
</div>
                        </td>
                        <td style="width: 145px; padding-right: 5px; text-align: right">
                            <select name="ddlMyAccount" id="ddlMyAccount" class="accountSelect" onchange="eval(document.getElementById('ddlMyAccount').options[document.getElementById('ddlMyAccount').selectedIndex].value);document.getElementById('ddlMyAccount').selectedIndex=0;CcAddCallback(PM_LOGIN_REFRESH_CALLBACK_COOKIENAME + ',' + PM_LOGIN_REFRESH_CALLBACK_COOKIEKEY, PmPostLoginRefresh);CcStartListener();">
	<option selected="selected" value="">My Account</option><option value="SetGenericAlertForLogin('Please log in and select &quot;My Details&quot; again.');">My Details</option><option value="SetGenericAlertForLogin('Please log in and select &quot;Balance&quot; again.');">Balance</option><option value="SetGenericAlertForLogin('Please log in and select &quot;Statement&quot; again.');">Statement</option><option value="SetGenericAlertForLogin('Please log in and select &quot;Deposit&quot; again.');">Deposit</option><option value="SetGenericAlertForLogin('Please log in and select &quot;Withdraw&quot; again.');">Withdraw</option><option value="SetGenericAlertForLogin('Please log in and select &quot;My Popup&quot; again.');">My Popup</option><option value="SetGenericAlertForLogin('Please log in and select &quot;Preferences&quot; again.');">Preferences</option><option value="window.open('/Racing/Information/Results/Default.aspx?State=2&ParentUrl=http%3a%2f%2fwww.tab.com.au%2fExpressBet%2fStandard%2fDefault.aspx%3fState%3d2%26ExpressBetMode%3dStandard&SmallSize=PopUpLoginSmallSize&ReferringPageType=ExpressBetStandard', 'Results', 'height=540,width=840,screenX=10,screenY=25,left=10,top=25,scrollbars=yes,directories=no,toolbars=yes,menubar=yes,dependent=yes,status=yes,resizable=yes');WriteParentUrl( 'http://www.tab.com.au/ExpressBet/Standard/Default.aspx?State=2&ExpressBetMode=Standard' );">Results</option>
</select>
                        </td>
                    </tr>
                </table>
            </td>
        </tr>
        <tr>
            <td height="10" width="98" valign="top" align="left">
                <a href="/ExpressBet/Standard/Default.aspx?State=2&Home=True" target="_parent">
                    <img alt="ExpressBET" src="/shared/Images/ExpressBet/en-au/expressBet_blueBG.gif" border="0" title="About ExpressBET" /></a>
            </td>
            <td height="20" align="left" valign="top" class="padRight whiteText padBottom" colspan="3">
                

<script type="text/javascript">
var msgNotLoggedIn = 'You are currently not logged in to tab.com.au.';
var msgSelectBetNow = 'Please log in and select "Bet Now" again to place your bet.';
var msgSelectJoinNow = 'Select Join Now to open an account with Tabcorp.';
var msgSelectMyAccount = 'Please log in and select "My Account" to view your account.'; 
var setLoginFocusCount = 0;
var maskedPasswordTextBox;
var unmaskedPasswordTextBox;

function getBrowser()
{
    var browser =navigator.appName;
    if(browser.indexOf("Internet Explorer") > -1)
        browser = "IE";

    return browser;
}

function DoPrefreshActions()
{
    document.getElementById("DisplayExpressTopNav1_GetAccountBalanceFromCam").value="true";
    document.getElementById("DisplayExpressTopNav1_ButtonRefreshLink").style.display="none";
    document.getElementById("DisplayExpressTopNav1_AjaxLoaderRefresh").style.display="inline";
}

function CheckTextLimit(evt,field) {
    if (evt.which && evt.which == 8) 
    {
        return true;
    }
    else 
    {
        SelectLoginTextBox();
        return (field.value.length < 8);
    }
}

function SelectLoginTextBox()
{
    if (document.getElementById("DisplayExpressTopNav1_TextboxLogin").value == "Account Number")
    {
        document.getElementById("DisplayExpressTopNav1_TextboxLogin").value = '';
        SwapLoginTextBox('true');    
    }
} 

function SetAlertForLoginStandard()
{
    alert(msgNotLoggedIn + '\n\n' + msgSelectBetNow + '\n\n' + msgSelectJoinNow);
    SetFocusPostAlert();
}
function SetAlertForLoginMyAccount()
{
    alert(msgNotLoggedIn + "\n\n" + msgSelectMyAccount + '\n\n' + msgSelectJoinNow);
    SetFocusPostAlert();
}
function SetGenericAlertForLogin(msg)
{
    alert(msgNotLoggedIn + "\n\n" + msg + "\n\n" + msgSelectJoinNow);
    SetFocusPostAlert();
}

function SetFocusPostAlert()
{
    SelectLoginTextBox();
    FocusLoginTextBox();
}

function FocusLoginButton()
{
    document.getElementById("DisplayExpressTopNav1_ButtonLogin").focus();
} 

function FocusLoginTextBox()
{
    document.getElementById("DisplayExpressTopNav1_TextboxLogin").focus();
} 

function ValidateLoginInputs()
{
    var NoAccountNumber = "Please enter your account number." ; // “Please enter your Account Number” 
    var AccountNumberInvalid = "Your account number is invalid. Your account number can be 6 - 8 characters long and contain only numbers." ; // “Your Account number is invalid. Your account number can be at most 6 to 8 characters long and only contain numbers” 
    var NoPassword = "Please enter your password." ; // “Please enter your Password” 
    var PasswordTooShort = "Your password must be a minimum of 8 alpha numeric characters long. (No spaces allowed.)" ; // “Please enter a password that is at least 8 characters”
    var CloseMessage = "Close"
    
    var username = document.getElementById("DisplayExpressTopNav1_TextboxLogin");
    var password = document.getElementById("DisplayExpressTopNav1_TextboxPassword");
    
    /*
    while(username.value.charAt(0)=='0')
    {
        username.value=username.value.substring(1);
    }
    */
    
    if(username.value.length == 0 || username.value == "Account Number")
    {
        ShowErrorMessage(NoAccountNumber, 'DisplayExpressTopNav1_TextboxLogin');
        return false;
    }
    else if (username.value.length < 6)
    {
        ShowErrorMessage(AccountNumberInvalid, 'DisplayExpressTopNav1_TextboxLogin');
        return false;
    }
    else if (isNaN(username.value))
    {
        ShowErrorMessage(AccountNumberInvalid, 'DisplayExpressTopNav1_TextboxLogin');
        return false;
    }
    else if(password.value == '')
    {
        ShowErrorMessage(NoPassword, 'DisplayExpressTopNav1_TextboxPassword');
        return false;
    }
    else if(password.value.length < 7)
    {
        ShowErrorMessage(PasswordTooShort, 'DisplayExpressTopNav1_TextboxPassword');
        return false;
    }
    
    return true;

}

function ValidateBetSubmit(alertMessage, submitFunction)
{
    if (PmAuth==true)
    {
        eval("parent." + submitFunction);
    }
    else
    {
        SetGenericAlertForLogin(alertMessage);      
    }
}   
   
function PasswordTextBoxOnEnter(swapToAllowUserInput)
{
     var browser = getBrowser();
     var oldTextBox = document.getElementById("DisplayExpressTopNav1_TextboxPassword");
     if(oldTextBox.value == "Password")
     {
        if (browser=="IE")
        {
            // it is unmasked
            unmaskedPasswordTextBox = oldTextBox;
            var np= oldTextBox.cloneNode(true);
            np.type='password';           
            oldTextBox.parentNode.replaceChild(np,oldTextBox); 
            np.setAttribute("onfocus", null);
            np.value = '';
            np.focus();
            np.select();
          }
          else
          {
            oldTextBox.setAttribute("onfocus", null); 
            oldTextBox.type='password'; 
            oldTextBox.value = '';
            oldTextBox.focus();
            oldTextBox.select();
          }
          return;
     }
 
}

function PasswordTextBoxOnBlur()
{
    var browser = getBrowser();
        
    var oldTextBox = document.getElementById("DisplayExpressTopNav1_TextboxPassword");
    
        if (browser=="IE")
        {
            if(oldTextBox.value == '') // 
            {
                oldTextBox.parentNode.replaceChild(unmaskedPasswordTextBox,oldTextBox);  
                return;
            }
        }
        else    // safari and firefox play nicely.
        {
            if(oldTextBox.value == '') // restore
            {
                oldTextBox.setAttribute("onfocus", "PasswordTextBoxOnEnter();"); // fix
                oldTextBox.value = "Password";
                oldTextBox.type='text';                 
            }
        }
     
}

function SwapLoginTextBox(swapToAllowUserInput)
{
    var browser = getBrowser();
    
    if (browser=="IE")
    {
        if(swapToAllowUserInput == 'true')
        {
            var oldTextBox = document.getElementById("DisplayExpressTopNav1_TextboxLogin")
            var np= oldTextBox.cloneNode(true);    
            np.setAttribute("onfocus", null);
            np.maxLength=8;
            oldTextBox.parentNode.replaceChild(np,oldTextBox);
            np.focus();
            np.select();
            return;
        }
        else
        {
            var oldTextBox = document.getElementById("DisplayExpressTopNav1_TextboxLogin")
            if(oldTextBox.value == '')
            {
                var np= oldTextBox.cloneNode(true);    
                np.setAttribute("onfocus", "SelectLoginTextBox(true);");
                np.maxLength=20;
                np.value = "Account Number";
                oldTextBox.parentNode.replaceChild(np,oldTextBox);
            }
            return;
        }
    }
    else    // standards compliant browsers
    {
        if(swapToAllowUserInput == 'true')
        {
            var oldTextBox = document.getElementById("DisplayExpressTopNav1_TextboxLogin")
            oldTextBox.setAttribute("onfocus", null);
            oldTextBox.maxLength=8;
            oldTextBox.focus();
            oldTextBox.select();
            return;
        }
        else
        {
            var oldTextBox = document.getElementById("DisplayExpressTopNav1_TextboxLogin")
            if(oldTextBox.value == '')
            {
                oldTextBox.setAttribute("onfocus", "SelectLoginTextBox(true);");
                oldTextBox.maxLength=20;
                oldTextBox.value = "Account Number";                
            }
            return;
        }
    
    }
}

var Account_Cookie_Name = "Account";
var Account_Cookie_Key = "Account_DisplayBalance";
function ToggleAccountBalanceView()
{
  var today = new Date();
  var expiry = new Date(today.getTime() + 1095 * 24 * 60 * 60 * 1000); // plus 1095 days (3 years)  
  var cookieAccountValue =  GetCookieValue(Account_Cookie_Name);  
  var HideOrShow = document.getElementById("DisplayExpressTopNav1_LinkHideShowAccountBalance");
  
  if(HideOrShow.innerHTML == HideAccountBalance)
    HideOrShow.innerHTML = ShowAccountBalance;
   else
    HideOrShow.innerHTML = HideAccountBalance;
  
  // could make this nicer
  if(cookieAccountValue == null || (cookieAccountValue.indexOf("Account_DisplayBalance=1") > -1))
  {
      AddSessionCookie(Account_Cookie_Name, Account_Cookie_Key, "0", "/", "tab.com.au", "");
    HideShowAccountBalanceControls("hidden");                    
  }
  else
  {
      AddSessionCookie(Account_Cookie_Name, Account_Cookie_Key, "1", "/", "tab.com.au", "");
    HideShowAccountBalanceControls("visible");
  }
    
}

// flip controls  
function HideShowAccountBalanceControls(HideShow)
{
    document.getElementById("DisplayExpressTopNav1_LabelBalance").style.visibility=HideShow;
    document.getElementById("DisplayExpressTopNav1_LabelAccountNumber").style.visibility=HideShow;
    document.getElementById("DisplayExpressTopNav1_LabelPipe5").style.visibility=HideShow;
    document.getElementById("DisplayExpressTopNav1_LabelBalance").style.visibility=HideShow;
    document.getElementById("DisplayExpressTopNav1_LabelBalanceTime").style.visibility=HideShow;
    document.getElementById("DisplayExpressTopNav1_LabelPipe1").style.visibility=HideShow;
   
        // need this one to collapse
    SwapNodes(HideShow);
    // need this one to collapse
    if(HideShow == 'hidden')
    {
        document.getElementById("DisplayExpressTopNav1_ButtonRefreshLink").style.display = 'none';
        //document.getElementById("DisplayExpressTopNav1_LabelPipe6").style.visibility='none';
        document.getElementById("DisplayExpressTopNav1_LabelPipe6").style.display='none';
    }
    if(HideShow == 'visible')
    {
        document.getElementById("DisplayExpressTopNav1_LabelPipe6").style.display='inline';
        document.getElementById("DisplayExpressTopNav1_ButtonRefreshLink").style.display='inline';
    }
}

    function SwapNodes(HideShow)
      {
           var browser = getBrowser();
            if (browser=="IE")
            {
                var swapOne = document.getElementById("DisplayExpressTopNav1_LinkHideShowAccountBalance");
                var swapTwo = document.getElementById("DisplayExpressTopNav1_ButtonRefreshLink");
                if(HideShow == "hidden")
                {
                    swapOne.swapNode(swapTwo);
                }
                else
                {
                    swapTwo.swapNode(swapOne);
                }
            }
      }
</script>
<table cellspacing="0" cellpadding="0" border="0">
	<tr>
	    <!-- Added below code for TT28711 HALO - Insert 'Home' hyperlink into header area -->
	    <td class="LinksTD" nowrap="nowrap" style="padding-left:1px;">
		     <!-- Home Hyper Link to www.tab.com.au -->
			 <a id="DisplayExpressTopNav1_HomeHyperlink"><a class="LoginBarLinkDefault" onclick="" onmouseover="this.className='LoginBarMouseOver'" onmouseout="this.className='LoginBarLinkDefault'" href="/Default.aspx" target="_parent">Home</a></a>
			 <!-- | -->
			 <span id="DisplayExpressTopNav1_LabelHome" class="LoginBarPipe">|</span>
		</td>	
		
		
	    <td style="white-space: nowrap;text-align: left;">
		    
                <!-- Account Number Field -->
                <input name="DisplayExpressTopNav1$TextboxLogin" type="text" value="Account Number" id="DisplayExpressTopNav1_TextboxLogin" tabindex="2" onblur="SwapLoginTextBox(false)" onkeypress="return CheckTextLimit(event, this);" onclick="SelectLoginTextBox();" class="LoginTextField" style="width:85px;" />
                <!-- Password Field -->
                <input name="DisplayExpressTopNav1$TextboxPassword" type="text" value="Password" id="DisplayExpressTopNav1_TextboxPassword" tabindex="3" onblur="PasswordTextBoxOnBlur()" onfocus="PasswordTextBoxOnEnter();" class="PasswordTextField" style="width:85px;" />
                <!-- Login Button -->
                <input type="submit" name="DisplayExpressTopNav1$ButtonLogin" value="" onclick="if(!ValidateLoginInputs()){return false;};WebForm_DoPostBackWithOptions(new WebForm_PostBackOptions(&quot;DisplayExpressTopNav1$ButtonLogin&quot;, &quot;&quot;, false, &quot;&quot;, &quot;https://www.tab.com.au/Login/LoginUser.aspx?State=2&amp;ReturnURL=http%3a%2f%2fwww.tab.com.au%2fExpressBet%2fLoginFrame.aspx%3fState%3d2%26ExpressBetMode%3dStandard&quot;, false, false))" id="DisplayExpressTopNav1_ButtonLogin" tabindex="4" class="LoginButton" style="border-style:None;" /><input type="hidden" name="DisplayExpressTopNav1$ShowBetSlipOnLogin" id="DisplayExpressTopNav1_ShowBetSlipOnLogin" value="false" />
                <!-- Forgot Field -->
                <span id="DisplayExpressTopNav1_LabelForgot" class="LoginBarText">Forgotten</span>
                <!-- Account Number Link -->
                <a class="LoginBarLinkDefault" onclick="" onmouseover="this.className='LoginBarMouseOver'" onmouseout="this.className='LoginBarLinkDefault'" href="http://nettab.custhelp.com/cgi-bin/nettab.cfg/php/enduser/std_adp.php?p_sid=YuEE*48h&amp;p_lva=&amp;p_faqid=3" target="_blank">Account Number</a>
                <!-- or -->
                <span id="DisplayExpressTopNav1_LabelOr" class="LoginBarText">or</span>
                <!-- PasswordLink -->
                <a href="javascript:void(0);" onclick="OpenPopup('https://www.tab.com.au/AccountManagement/AccountHolder/Password/RetrieveForgottenPasswordDefault.aspx?State=2&amp;amp;ReferringPageType=ExpressBetStandard&amp;amp;ParentUrl=/ExpressBet/LoginFrame.aspx%3fState%3d2%26ExpressBetMode%3dStandard', 'MyStateWindow', '640', '530', 'no');WriteParentUrl('http://www.tab.com.au/ExpressBet/LoginFrame.aspx?State=2&amp;ExpressBetMode=Standard');" class="LoginBarLinkDefault" onmouseover="this.className='LoginBarMouseOver'" onmouseout="this.className='LoginBarLinkDefault'">Password</a>				
	            <span class ="LoginBarText" style="margin-left:-2px;">?</span>	
            
                <span class="LoginBarPipeNarrow">|</span>
                <!-- My State -->
                <a href="javascript:void(0);" id="DisplayExpressTopNav1_anchorMyState" class="LoginBarLinkDefault" onclick="OpenPopup('/AccountManagement/MyState/MyStatePopup.aspx?State=2&amp;ParentUrl=%2fExpressBet%2fStandard%2fDefault.aspx%3fState%3d2&amp;SmallSize=PopUpLoginSmallSize&amp;ReferringPageType=ExpressBetStandard&amp;PageAuthorisation=', 'Login', '650', '485');WriteParentUrl( 'http://www.tab.com.au/ExpressBet/LoginFrame.aspx?State=2&amp;ExpressBetMode=Standard' );" onmouseover="this.className='LoginBarMouseOver'" onmouseout="this.className='LoginBarLinkDefault'">My State</a>
                <!--|-->
                <span id="DisplayExpressTopNav1_LabelPipe3" class="LoginBarPipeNarrow">|</span>
                <!-- Help -->
                <a class="LoginBarLinkDefault" onclick="" onmouseover="this.className='LoginBarMouseOver'" onmouseout="this.className='LoginBarLinkDefault'" href="http://nettab.custhelp.com" target="_blank">Help</a>
		</td>
	</tr>
</table>


            </td>
        </tr>
    </table>
    <script type="text/javascript" >
//reparse=true;
PmSetAuth(false);PmSetUsersBetType('WinPlace');</script>
    

<script type="text/javascript">
//<![CDATA[
var Jurisdiction = 'State=2';try{executeDeepMetrix('//deepmetrix.tab.com.au/dm.gif?');} catch (err) { }FocusLoginButton();
            if(clock != null){
                clock.destroy();
            } 
            clock = new WorldTime('05/09/2011 16:15', {clockFormat: 'e', elementId: 'clock', timeZone: ' AEST'}).init();
            //Sys.WebForms.PageRequestManager.getInstance().add_endRequest(function(){clock.destroy();});
            FocusFirstFormField();Sys.Application.initialize();
//]]>
</script>
</form>
</body>
</html>

Open in new window

0
Comment
Question by:Jason
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 7
  • 3
  • 2
12 Comments
 
LVL 35

Expert Comment

by:Robert Schutt
ID: 36479995
I'm not able to test right now but I was thinking along the lines of form1.elements(strtxt).value ...

Looking at http://msdn.microsoft.com/en-us/library/ms537457(v=vs.85).aspx however, you should be able to use:

objIE.Document.forms("form1", strtext).value = "test"
objIE.Document.forms("form1", strpasstext).Value = "test"

objIE.Document.forms("form1", strbutton).Click

Open in new window

0
 

Author Comment

by:Jason
ID: 36480387
HI

Errors VBS Error
0
 
LVL 47

Expert Comment

by:Martin Liss
ID: 36480490
Try

strtext = ["DisplayExpressTopNav1" & Chr(36) & "TextboxLogin"]
0
Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 

Author Comment

by:Jason
ID: 36480528
No Joy

empty strtext and error on same line
 empty variables error
0
 
LVL 47

Expert Comment

by:Martin Liss
ID: 36480591
Okay, I'm not a VBScript person but try this

strtext = "DisplayExpressTopNav1$TextboxLogin"
0
 

Author Comment

by:Jason
ID: 36480661
done that doesn't work error on same line same error
0
 
LVL 35

Accepted Solution

by:
Robert Schutt earned 500 total points
ID: 36480720
Actually got around to testing it and my first idea does work. Try this:

objIE.Document.form1.elements(strtext).Value = "test"
objIE.Document.form1.elements(strpasstext).Value = "test"

objIE.document.form1.submit()

Open in new window

0
 

Author Comment

by:Jason
ID: 36480966
HI Robert

The only thing that is not working is the submit.

The Acc gets entered and the gets entered bot the submit does not occur
0
 

Author Comment

by:Jason
ID: 36480971
This is the source for submit

<input type="submit" name="DisplayExpressTopNav1$ButtonLogin" value="" onclick="if(!ValidateLoginInputs()){return false;};WebForm_DoPostBackWithOptions(new WebForm_PostBackOptions(&quot;DisplayExpressTopNav1$ButtonLogin&quot;, &quot;&quot;, false, &quot;&quot;, &quot;https://www.tab.com.au/Login/LoginUser.aspx?State=2&ReturnURL=http%3a%2f%2fwww.tab.com.au%2fExpressBet%2fLoginFrame.aspx%3fState%3d2%26ExpressBetMode%3dStandard";, false, false))" id="DisplayExpressTopNav1_ButtonLogin" tabindex="4" class="LoginButton" style="border-style:None;" /><input type="hidden" name="DisplayExpressTopNav1$ShowBetSlipOnLogin" id="DisplayExpressTopNav1_ShowBetSlipOnLogin" value="false" />
0
 
LVL 35

Expert Comment

by:Robert Schutt
ID: 36481001
Sorry I didn't see that onclick code, most of the time code like that is in the onsubmit code I think. Maybe your original works better in combination with the use of 'elements'?

objIE.Document.form1.elements(strbutton).Click

Open in new window

0
 

Author Comment

by:Jason
ID: 36481073
Robert Your a champ

I will need further help with this.  I will new post with what I need

If you could help that would be great

Thanks Heaps

0
 

Author Comment

by:Jason
ID: 36486554
Robert

If you can help just did a new post

Heading:
Extracting from webpage using vbs and writing into excel cell

Thanks
0

Featured Post

Free Tool: ZipGrep

ZipGrep is a utility that can list and search zip (.war, .ear, .jar, etc) archives for text patterns, without the need to extract the archive's contents.

One of a set of tools we're offering as a way to say thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Recently I finished a vbscript that I thought I'd share.  It uses a text file with a list of server names to loop through and get various status reports, then writes them all into an Excel file.  Originally it was put together for our Altiris server…
This article is the result of a quest to better understand Task Scheduler 2.0 and all the newer objects available in vbscript in this version over  the limited options we had scripting in Task Scheduler 1.0.  As I started my journey of knowledge I f…
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
In an interesting question (https://www.experts-exchange.com/questions/29008360/) here at Experts Exchange, a member asked how to split a single image into multiple images. The primary usage for this is to place many photographs on a flatbed scanner…

737 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question