Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сравнение переменных. / 3 сообщений из 3, страница 1 из 1
28.04.2014, 21:39
    #38628259
sfire
sfire
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение переменных.
Добрый вечер.
Сравниваю переменные.
авторlog="login"
pass=1234
logs=thisform.text1.Value
passwr=thisform.text2.Value
IF ((logs==log) AND (passwr==pass)) then
DO FORM admin.scx

Ошибка на скрине. Что не так?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
28.04.2014, 22:26
    #38628293
Станислав С...кий
Станислав С...кий
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение переменных.
sfireДобрый вечер.
Сравниваю переменные.
авторlog="login"
pass=1234
logs=thisform.text1.Value
passwr=thisform.text2.Value
IF ((logs==log) AND (passwr==pass)) then
DO FORM admin.scx

Ошибка на скрине. Что не так?
1. Здесь же ясным английским языком написано, что Вы сравниваете несовместимое: текст с числом, тогда как ожидается сравнение текста с текстом или числа с числом.
Скорее всего, в переменную passwr из text2 попадает строка. Поэтому надо сделать такую проверку:
Код: sql
1.
2.
3.
4.
5.
6.
... по тексту
passwr=thisform.text2.Value
if vartype('passwr') = 'C'
  passwr = val(passwr)
endif
... далее по тексту



2. IF всегда должен иметь "закрывающую скобку" в виде ENDIF. Странно, что компилятор не заругался на Ваш код, хотя должен был...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
29.04.2014, 07:11
    #38628370
dimuhametov
dimuhametov
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Сравнение переменных.
Станислав С...кийsfireДобрый вечер.
Сравниваю переменные.
пропущено...


Ошибка на скрине. Что не так?
1. Здесь же ясным английским языком написано, что Вы сравниваете несовместимое: текст с числом, тогда как ожидается сравнение текста с текстом или числа с числом.
Скорее всего, в переменную passwr из text2 попадает строка. Поэтому надо сделать такую проверку:
Код: sql
1.
2.
3.
4.
5.
6.
... по тексту
passwr=thisform.text2.Value
if vartype('passwr') = 'C'
  passwr = val(passwr)
endif
... далее по тексту



2. IF всегда должен иметь "закрывающую скобку" в виде ENDIF. Странно, что компилятор не заругался на Ваш код, хотя должен был...

VARTYPE( ) не требует заключение выражения или идентификатора в кавычки ("")
vartype('passwr') всегда будет возвращать тип Character
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / Сравнение переменных. / 3 сообщений из 3, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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