Guest User

Untitled

a guest
Apr 21st, 2018
92
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.88 KB | None | 0 0
  1. <div id="divLogin">
  2. <table>
  3. <tr><th style="width:50%; text-align:right">Имя пользователя</th><td style="width:50%"><input id="tb_username" onkeypress="RestrikeSymbolInput(event,'@\')" style="width:98%" /></td></tr>
  4. <tr><th style="text-align:right">Пароль</th><td><input id="tb_password" type="password" style="width:98%" onkeypress="if((event.keyCode ? event.keyCode : event.which)==13) LoginClickAction();" /></td></tr>
  5. <tr><th style="text-align:right">Домен</th><td><select id="ddl_domains" style="width:98%" ></select></td></tr>
  6. <tr><td colspan="2" style="text-align:left"><input type="checkbox" id="chb_persistent" /><label for="persistent" onclick = "document.all.chb_persistent.checked = !document.all.chb_persistent.checked">Сохранять пароль</label></td></tr>
  7. <tr><th></th><td><input class="button_default" type="button" value="Вход" onclick="LoginClickAction()" />&nbsp;&nbsp;<input class="button_default" type="button" value="Отмена" onclick="hideLogin()" /></td></tr>
  8. </table>
  9. </div>
  10.  
  11. Dim login_field : Set login_field = oIE.document.getElementById("tb_username")
  12. Dim password_field : Set password_field = oIE.document.getElementById("tb_password")
  13. login_field.value="123" ' логин
  14. password_field.value="123" ' пароль
  15.  
  16. Dim tb_username : Set tb_username = oIE.document.getElementById("tb_username")
  17. Dim tb_password : Set tb_password = oIE.document.getElementById("tb_password")
  18. Dim form_submit : Set form_submit = oIE.document.forms(0)
  19. tb_username.value="123" ' логин
  20. tb_password.value="123" ' пароль
  21. form_submit.Submit 'Отсылает данные
  22.  
  23. Dim submit : Set submit = oIE.document.getElementsByClassName("button_default")
  24. submit.Click()
  25.  
  26. Dim submit : Set submit = oIE.document.getElementsByClassName("button_default")
  27. submit.Submit()
Add Comment
Please, Sign In to add comment