VBA: Как бороться с паролями? - PullRequest
0 голосов
/ 10 февраля 2020

относительно плохо знаком с VBA и ищу решение для следующего.

Я пытаюсь создать надстройку в VBA, которая будет выполнять множество ручных задач для меня и моих коллег. Для некоторых задач понадобится имя пользователя и пароль, что хорошо. Мое текущее решение состоит в том, чтобы скрыть файл .txt на наших дисках H (персональных дисках) с паролем, чтобы мы могли просто извлечь его. Но, допустим, что-то идет не так, и они хотят, чтобы я отлаживал их на своем экране, тогда я мог бы видеть это как переменную - чего я не хочу.

Есть ли решение для безопасного использования этой строки без ущерба для нашей безопасности?

Sub ExtractData()
    Dim MyFolder As String, MyFile As String
    Dim text As String, textline As String, filedate As String
    Dim filenum As Integer

    MyFolder = "C:\directory\"
    MyFile = Dir(MyFolder & "creds.txt")

    Open (MyFolder & MyFile) For Input As #1
    Do Until EOF(1)
        Line Input #1, textline
        text = text & textline

    Loop
    Close #1
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...