-Поиск по дневнику

Поиск сообщений в rss_sql_ru_access_programming

 -Подписка по e-mail

 

 -Постоянные читатели

 -Статистика

Статистика LiveInternet.ru: показано количество хитов и посетителей
Создан: 16.03.2006
Записей:
Комментариев:
Написано: 4


Автоматическая авторизация

Среда, 24 Декабря 2014 г. 06:31 + в цитатник
Здравствуйте.
Есть база данных Access. В ней есть привязки к таблицам MS SQL Server. В БД создан макрос Autoexec. Макрос запускает следующую программу (сам очень слабо знаю VBA, данную программу писал пользователь до меня):

Option Compare Database

 Function AutoEnterODBCPassword()
         Dim tdfLinked As TableDef
         Dim mydb As Database

        Set mydb = CurrentDb
                
DoCmd.SetWarnings False


        Set tdfLinked = mydb.CreateTableDef("Проверка")

                tdfLinked.Connect = "ODBC;DATABASE=temp_reports;Description=***;PWD=***;DSN=cs11;WSID=CE3"
                  tdfLinked.SourceTableName = "dbo.price_spec_group"
     
               mydb.TableDefs.Append tdfLinked
              mydb.TableDefs.Delete ("Проверка")
   
         Set tdfLinked = Nothing

        Set mydb = Nothing
   
     End Function


В результате при запуске БД у меня всплывает окно авторизации. В нем введены мои логин и пароль. Мне нужно нажать «ОК». И далее можно работать с БД.
Запуск этой БД происходит каждый день в 04:00. Запускаю с помощью xStarter. Сначала запускаю ярлык на макрос в этой базе. Далее симулирую нажатие кнопки Enter, что бы пройти авторизацию. После этого выполняется запущенный макрос.
Вопрос: Можно прописать изначально в Autoexec, что бы авторизация проходила автоматически, без нужны нажатия клавиши Enter? Т.е. просто заходить в эту базу и авторизация уже была пройдена?

http://www.sql.ru/forum/1134179/avtomaticheskaya-avtorizaciya


 

Добавить комментарий:
Текст комментария: смайлики

Проверка орфографии: (найти ошибки)

Прикрепить картинку:

 Переводить URL в ссылку
 Подписаться на комментарии
 Подписать картинку