powered by simpleCommunicator - 2.0.51     © 2025 Programmizd 02
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA Access 2016 использование текстовых значений
25 сообщений из 61, страница 2 из 3
VBA Access 2016 использование текстовых значений
    #39990931
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Панург,
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990932
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Панург,

Кусок кода старый, log и pas соответствуют log_mb и pwd_mb
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990936
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker
Кусок кода старый, log и pas соответствуют log_mb и pwd_mb
блин!

...тут пропущено самоцензурой...

И потом этот человек спрашивает
greker
А смысл выкладывать весь код, вопрос только в том, как заменить эти константы?


Пусть помогает кто другой...
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990940
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Панург
Пусть помогает кто другой...



greker
Кусок кода старый, log и pas соответствуют log_mb и pwd_mb

Если я не ошибаюсь , то судя по скрину эта форма у вас отображается в браузере ???
И эти константы автоматически заносятся в текстовые поля . Если поля не readonly , то теоретически Вы их можете изменить вручную.
Но теперь возникает вопрос , а как дальше используются эти логин и пароль.
Здесь Панург абсолютно прав , нужен весь код . :))
P.S Это так , мысли вслух.
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990946
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Логин и пароль из констант вставляются в item-ы 2 и 3 из картинки с кодом, для авторизации на ресурсе. Раньше эти логин и пароль были постоянны, теперь нет, а сам код должен быть неизменный
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990948
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DarkMan
Панург
Пусть помогает кто другой...



greker
Кусок кода старый, log и pas соответствуют log_mb и pwd_mb

Если я не ошибаюсь , то судя по скрину эта форма у вас отображается в браузере ???
И эти константы автоматически заносятся в текстовые поля
. Если поля не readonly , то теоретически Вы их можете изменить вручную.
Но теперь возникает вопрос , а как дальше используются эти логин и пароль.
Здесь Панург абсолютно прав , нужен весь код . :))
P.S Это так , мысли вслух.


Не ошибаетесь, именно так. Надо, чтобы эти константы перестали быть константами, брались с поля в форме или таблицы, а сам код был константен).
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990953
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker
Не ошибаетесь, именно так. Надо, чтобы эти константы перестали быть константами, брались с поля в форме или таблицы, а сам код был константен).

Еще раз уточняю , в браузере открывается форма . Эти поля , логин и пароль уже заполнены , или звездочками , или каким то значением констант например. Я правильно понял ???
Далее Вы нажимаете кнопку , и форма отправляет данные на сервер , или куда там еще ???? Правильно ?
Ну , а затем где то происходит обработка данных . Возможно проверяется логин и пароль и юзер аунтифицируется , или еще что то . Я правильно понимаю????

Если да , то не исключена возможность , если Вы поменяете значение констант , и в результате получите какую нибудь ошибку. Я думаю , что я прав. А может и ошибаюсь , подскажите.
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990955
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker
Надо, чтобы эти константы перестали быть константами, брались с поля в форме или таблицы, а сам код был константен).

Взять данные из таблицы и подсунуть константам переменным не проблема . Но вот что дальше будет ????
Попробуйте поменять значения констант вручную и запустить программу, все работает нормально ????
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990959
alecko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker, Вы в сообщении 22184246 под спойлер заглядывали?
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990962
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
alecko
greker, Вы в сообщении 22184246 под спойлер заглядывали?


Сейчас заглянул, с телефона пропустил спойлер (((

Виновит, вижу, каюсь, буду пробовать на работе, завтра, сразу же отпишусь!
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990964
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
DarkMan
greker
Надо, чтобы эти константы перестали быть константами, брались с поля в форме или таблицы, а сам код был константен).

Взять данные из таблицы и подсунуть константам переменным не проблема . Но вот что дальше будет ????
Попробуйте поменять значения констант вручную и запустить программу, все работает нормально ????


Именно это и надо сделать, чтобы переменные брались из таблицы или поля в форме )
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990965
DarkMan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker
Именно это и надо сделать, чтобы переменные брались из таблицы или поля в форме
вы так и не ответили,что будет ,если их значение поменять вручную . Какую то же роль они играют?
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39990967
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Чё-то читаю-читаю и не вкурю-так что это просто авторизация с паролем который почему-то меняется?... Да уж....
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991078
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
alecko,

Помогло, спасибо огромное!))) Причём сработало как через таблицу, так и через поле на форме!)))

Спасибо за помощь!!)))
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991092
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker,
если я угадал насчет защиты-может имеет смысл поизучать штатный "мастер защиты"
(на работе из любопытства,с ребятами,очень компетентными, т.н.защиту ВОРДа и ЕКСЕЛЬ обошли запросто,а штатную ACCESS после множества безуспешных попыток не смогли-что уж говорить о рядовых юзерах)
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991103
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sdku
Чё-то читаю-читаю и не вкурю-так что это просто авторизация с паролем который почему-то меняется?... Да уж....
а чего там "вкуривать"? У них есть ресурс, доступ по IE, туда раньше ходили все по одному паролю/логину (как константы были записаны), теперь доступ разделили, вот и появилась потребность заменить константы. ТС морозится со своим кодом как с величайшим достоянием, обычный код, только всем голову морочит. Посмотрел и в других топиках ТС та же ерунда. Ну не можешь выложить код как текст, сфотографируй, в редакторе замажь адреса и явки.

greker
Помогло
учти, публичные переменные слетают при необработанных ошибках.
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991251
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Панург
учти, публичные переменные слетают при необработанных ошибках.[/quot]

Надеюсь, таких ошибок не будет))

Сам код длинный слишком, фотографировать чревато, мягко говоря (опять же, специфика компании). Весь переписывать - больно трудоёмко будет(
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991252
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Панург
sdku
Чё-то читаю-читаю и не вкурю-так что это просто авторизация с паролем который почему-то меняется?... Да уж....
а чего там "вкуривать"? У них есть ресурс, доступ по IE, туда раньше ходили все по одному паролю/логину (как константы были записаны), теперь доступ разделили, вот и появилась потребность заменить константы. ТС морозится со своим кодом как с величайшим достоянием, обычный код, только всем голову морочит.


Причина именно та, почему потребовалось избавиться от констант, а по поводу "величайшего достояния" написал выше. Прекрасно понимаю, что для хотя бы более-менее понимающих код представится наверняка поделкой школьника эдак второго-третьего класса от силы)
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991261
Фотография sdku
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sdku
...может имеет смысл поизучать штатный "мастер защиты"...
Ваши цели будут достигнуты, доступ разделен, кода при этом 0, защита вполне достаточна и не надо изобретать велосипед-все уже придумано до нас.
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991293
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker
Прекрасно понимаю, что для хотя бы более-менее понимающих код представится наверняка поделкой школьника эдак второго-третьего класса от силы)
тут, как на приёме у врача, разного повидали...
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991294
Фотография Панург
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker
Надеюсь, таких ошибок не будет))
ну-ну.
лучше замени глобальные переменные на TempVar . У них есть ряд преимуществ.
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991422
alecko
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
greker, используются эти переменные наверное в 1-2 х местах, но если есть желание избавиться от проблемы слетания публичных переменных - сделайте функции вместо них
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
Public function log () as string
dim prov
prov=dlookup("[field1]","tblName","[id]=1") 
log=nz(prov,vbnullstring)
end function
Public function pass() as string
dim prov
prov=dlookup("[field1]","tblName","[id]=2")
pass=nz(prov,vbnullstring)
end function

...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991604
ROI
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Панург
лучше замени глобальные переменные на TempVar . У них есть ряд преимуществ.

ещё какие! Очень классная вещь.
PS: жалко, что с объектами не работают.
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991835
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
alecko,

Уже так и сделал, выше вроде отписался))
Спасибо за помощь!)
...
Рейтинг: 0 / 0
VBA Access 2016 использование текстовых значений
    #39991836
greker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Тут теперь другая проблемка выскочила:
Теперь на ресурсе доступ висит некоторое время.
Возможно ли прописать в коде проверку: если на странице explorer есть фраза "Вы успешно авторизировались", то переходим к строке в коде дальше, минуя авторизацию, а если нет, то идём дальше по коду просто (то есть проходим процесс авторизации)?
Это же вроде через условие можно сделать, с проверкой по фразе?
...
Рейтинг: 0 / 0
25 сообщений из 61, страница 2 из 3
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / VBA Access 2016 использование текстовых значений
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]