Съдържание
Автоматизацията може да ви спести време за писане, като направите компютъра си сам. "Sendkeys" е помощна програма, вградена в Windows, която ви дава възможност да изпитате автоматизация на системата в реално време. Можете дори да използвате "SendKeys" за автоматично попълване на уеб формуляри. Вместо да въвеждате потребителски идентификатори, адресна информация и пароли, нека компютърът ви свърши работата вместо вас. Не е необходимо да сте програмист, за да създадете прост скрипт, който работи във всякаква форма, която можете да намерите в интернет.
инструкции
-
Стартирайте уеб браузър и отидете на страница, която съдържа формуляр, който искате да попълните. Натиснете бутона "Tab" многократно, докато курсорът на мишката достигне първото текстово поле на формуляра. Помнете колко пъти сте натискали клавиша, докато стигне до това текстово поле.
-
Отворете „Бележник“ или текстов редактор и в нов документ поставете следния код:
Задаване на Shell = WScript.CreateObject ("WScript.Shell")
Първият ред създава обект "Windows Script Host". "Windows Script Host" ви позволява да комуникирате с Windows.
-
Добавете линията, показана по-долу, след показаната в предишната стъпка:
Shell.AppActivate ("Заглавие на Windows")
Този код активира прозореца, който съдържа заглавието "Заглавие на Windows". Заменете "Заглавие на Windows" със заглавието, което се показва в заглавната лента на браузъра ви.
-
Поставете следния код под кода, посочен в последната стъпка:
Shell.SendKeys "{TAB}"
Това изречение кара компютъра ви да изпрати клавиша „Tab“ в прозореца на браузъра. Дублирайте този отчет толкова пъти, колкото сте го направили, за да го насочите към първото поле на формуляра. Например, ако сте го натиснали три пъти, поставете този код в документа:
Shell.SendKeys "{TAB}" Shell.SendKeys "{TAB}" Shell.SendKeys "{TAB}"
-
Добавете реда на кода, показан по-долу, след кода, който сте създали в предишната стъпка:
Shell.SendKeys "Текст 1" Shell.SendKeys "{TAB}"
Заменете "Текст 1" със стойността, която обикновено влиза във формуляра. Например, ако е форма за влизане, заменете „Текст 1“ със стойността, която сте поставили в първото текстово поле. И вторият ред на "Tab" в следващото текстово поле.
-
Дублирайте двете предишни редове за всяко текстово поле, което съществува във формуляра. Ако формулярът съдържа още две текстови полета, добавете следния код след кода, посочен в последната стъпка:
Shell.SendKeys "Текст 1" Shell.SendKeys "{TAB}"
Shell.SendKeys "Текст 1" Shell.SendKeys "{TAB}"
Когато "Раздели" достигнат края на текстовото поле, обикновено ще намерите бутона "изпрати" на формуляра.
-
Поставете последния отчет след кода, който сте създали в предишната стъпка:
Shell.SendKeys "{ENTER}"
Този код изпраща клавиш "Enter", който натиска бутона на формуляра. Следният пример показва как този документ би бил, ако сте натиснали две "Раздели", за да стигнете до първото текстово поле във формуляр с две текстови полета и бутон:
Задаване на Shell = WScript.CreateObject ("WScript.Shell") Shell.AppActivate ("Заглавие 1")
"Таблото до първото поле за въвеждане Shell.SendKeys" {TAB} "Shell.SendKeys" {TAB} "
„Изпращане на входни Shell.SendKeys“ Текст 1 „Shell.SendKeys“ {TAB} „Shell.SendKeys“ Текст 2 „Shell.SendKeys“ {TAB} "
„Бутон„ Раздел за изпращане “и натиснете„ Въведете „Shell.SendKeys“ {ENTER} “
Запазете документа с разширението на файла "vbs". Това създава "VBScript" файл.
-
Стартирайте Windows Explorer и намерете файла. Придвижете се до уеб страницата, която съдържа формуляра и щракнете двукратно върху файла "VBScript". Вашият браузър ще премине към първото поле и създаденият от вас скрипт ще попълни формуляра и ще го изпрати.
съвети
- Най-добре е да използвате пълното заглавие на уеб страницата в командата "Shell.AppActivate", но тя ще работи и ако въведете само част от заглавието, която се появява в прозореца на браузъра.
- След като създадете програма "VBScript", можете да я модифицирате, за да работите с други форми, като коригирате броя на клавишите "Tab", необходими за тази нова форма.
- Понякога може да се нуждаете от повече от един клавиш "Tab", за да преминете от крайното текстово поле на формуляр към бутона, който изпраща формуляра. Ако случаят е такъв, дайте допълнителните "Tabs", използвайки "SendKeys", както е показано в предишните стъпки.