Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / логин и пароль / 10 сообщений из 10, страница 1 из 1
17.06.2008, 10:27
    #35376194
Евгений1
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
Здраствуйте

Написал програмку теперь нужно поставить ограничение доступа в начале чтобы спрашавал спрашивал логин и пароль
Сделал отдельную таблицу (pass назвал) в которой логины и пароли создал форму (form1) на ней бонально text1 text2 и кнопка назовем ее вход и вот....дальше тупик в голове пусто что писать
в коде не знаю и что куда, если кому не трудно напишите пожалуста код в обработчике события Click кнопки
...
Рейтинг: 0 / 0
17.06.2008, 10:37
    #35376218
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
Посмотри.
...
Рейтинг: 0 / 0
17.06.2008, 12:36
    #35376734
q1w1e1
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
а чё это я пытаюсь открыть форму она спрашивает про файл libs\kernel.vcx, поиск по каталогу VFP9 ничего не дал...
...
Рейтинг: 0 / 0
17.06.2008, 14:29
    #35377200
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
Пример был выдран на живую из рабочего приложения. Библиотеку прилагаю.
...
Рейтинг: 0 / 0
13.12.2008, 15:38
    #35712597
dji_buffon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
поясните пожалуйста, на строке:
lnPos=ASUBSCRIPT(This.aroles,lnPos,1)
выдает ошибку
...
Рейтинг: 0 / 0
13.12.2008, 22:07
    #35712854
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
Какого рода ошибка?
...
Рейтинг: 0 / 0
14.12.2008, 19:04
    #35713404
dji_buffon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
пишит буквально нижеследующее:
"cannot load 32-bit DLL aamd532.dll"
...
Рейтинг: 0 / 0
14.12.2008, 19:11
    #35713409
dji_buffon
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
понял что дело в библиотеке, скачал, устоновил.
теперь ошибка выскакивает на строке
IF Vartype(goParameter.nUserId)="L",
и пишит что goParameter не найден
...
Рейтинг: 0 / 0
14.12.2008, 19:42
    #35713424
alextashk
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
dji_buffonпонял что дело в библиотеке, скачал, устоновил.
теперь ошибка выскакивает на строке
IF Vartype(goParameter.nUserId)="L",
и пишит что goParameter не найден
Не все библиотеки скачали ;-)
судя по префиксу go - Объект тип Public
...
Рейтинг: 0 / 0
14.12.2008, 20:21
    #35713448
Dag
Dag
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
логин и пароль
Сейчас глянул тот код, что когда-то здесь выложил и думаю что зря это сделал- уж больно он напичкан обьектами из другой части программы.

goParameter-обьект, свойства которого содержат параметры настройки предыдущего запуска программы, например
goParameter.nUserId- идентификатор текущего юзера
goParameter.cRole - права доступа текущего юзера
goParameter.cUser - имя текущего юзера
goParameter.xtSave() - метод обьекта goParameter для сохранения текущих настроек в файл
goParameter.xtLoad() - метод обьекта goParameter для загрузки настроек из файла.

Если есть желание разбираться могу выложить код класса. Если нет-то для формы можно создать свойства аналогичные свойствам обьекта goParameter и обращаться к ним.,
например ThisForm.nUserId. В дизайнере присвоить им значения желаемые по умолчанию (они должны совпадать со значениями в таблице user поля id,crole,rname - в любой строке)


Тогда выполнение методов из текста программы вообще удалить, также как и упоминание других обьектов типа goApp, goRegistrator
...
Рейтинг: 0 / 0
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / логин и пароль / 10 сообщений из 10, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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