Как да влезете в сайта, използвайки VBA код в Excel

Автор: Peter Berry
Дата На Създаване: 16 Август 2021
Дата На Актуализиране: 18 Ноември 2024
Anonim
Как да влезете в сайта, използвайки VBA код в Excel - Статии
Как да влезете в сайта, използвайки VBA код в Excel - Статии

Съдържание

Програмният език Visual Basic for Applications (VBA) позволява на програмистите на Microsoft Office да разширяват оригиналните възможности на Excel. Пример за това е VBA програма, която може да въведе информация за сметка в уеб страница и да изпрати тази информация. Този шаблон е йерархия на виртуални обекти, които покриват програмируемите функции на Excel. Изпращането на потребителско име и парола към уебсайт с VBA спестява на потребителя неудобството от въвеждане на тяхната информация ръчно.


инструкции

Можете да правите невероятни неща в Excel (Photos.com/Photos.com/Getty Images)
  1. Отворете Excel и покажете VBA кода с натискане на Alt + F11.

  2. Щракнете двукратно върху елемента, който показва "Тази работна книга" в навигационния екран от лявата страна на екрана. Това ще отвори прозорец за въвеждане на кодове в текущата работна книга.

  3. Въведете или поставете програмата по-долу в появилия се прозорец. Тази програма извиква оператора VBA "AppActivate", за да насочи текущия запис на приложението (Excel) към браузъра ви. Изразът "SendKeys" изпраща въведеното, информацията за акаунта и паролата на активирания браузър. Текстът "{TAB}" и "~" представлява клавишите "Tab" и "Enter". Изявлението "Приложение" казва на Excel да прекъсне бързо, за да позволи на Windows и времето на браузъра да обработи написаното и да го изпрати.


    Публично Sub SendPassword () AppActivate "NTNAME", True SendKeys "YourUserName", True Application.Wait 1000 SendKeys "{TAB}", True SendKeys "SUA_SENHA", Истинско приложение.

  4. Заменете текста "NAVIGATION_NAME" с името на браузъра си (например: "Firefox", "Internet Explorer" или "Google Chrome"), което ще използвате за достъп до профила на уеб страницата. Заменете текста „YOUR_USERNAME“ и „SUA_SENHA“ с информацията за достъп до профила, която страницата изисква.

  5. Отворете уеб страницата, до която искате да имате достъп.

  6. Щракнете върху едно от показанията в подпрограмата "SendPassword" и след това натиснете "F5", за да завъртите подпрограмата. Windows ще възстанови фокуса на браузъра, който програмата ви е активирала. Програмата ще влиза и изпраща информация за достъп до профила, който сте въвели в кода.

  7. Поставете следната ревизия в първата програма под програмата, която вече е в прозореца за разработка на VBA. Тази версия на "sendPassword" няма да въведе информация за вашия код, а стойности в работен лист на текущата работна книга. Основното предимство на това е удобството да се променя информацията за вход. Данните, съхранени в работния лист, са по-удобни за промяна от кодовете за програмиране.


    Публично Sub sendPasswordStoredInWorksheet () Dim login, pword, app app = ActiveSheet.Cells (1, 1) .Value login = ActiveSheet.Cells (2, 1) .Value pword = ActiveSheet.Cells (3, 1) .Value AppActivate приложение, True SendKeys вход, True Application.Wait 1000 SendKeys "{TAB}", True SendKeys пауза, True Application.Wait 1000 SendKeys "~", True

    Край Под

  8. Въведете името на браузъра и информацията за вход в кода на първата версия на програмата в първите три клетки на първия работен лист на работната книга на Excel.

  9. В браузъра излезте от профила в сайта, до който е осъществена първата ви програма, и се върнете на страницата за вход в сайта. Стартирайте новата версия на програмата, като използвате инструкциите в стъпка 6. Сесията на тази сметка ще започне като в стъпка 6.

Фибростъклото е материал, широко използван от строители и изпълнители за направата на изолация. Този продукт съдържа малки остри парчета стъкло, които обикновено се придържат към кожата, така че е нео...

Има два основни типа инфекция. Локализираният обикновено се наблюдава, когато кожата се счупи и раната или порезът се окажат заразени. Ако инфекцията се пренася от тялото в кръвната система, тя е сист...

Съветваме Ви Да Видите