Формат поля

  • Автор темы Автор темы Oksana
  • Дата начала Дата начала
O

Oksana

Подскажите, пожалуйста, можно ли и если да, то как задать формат поля.

Мне нужно поля для ввода и хранения ИП-адреса.

Соответвенно хочется чтобы вводили все одинаково и не ошибались, не было разброса в разделителях (точки), ну и соответственно стандартный формат ИП адреса 000.000.000.000, чтобы все разряды были заполнены.
 
Для: Oksana
используйте секцию Input translation в поле для приведения к одному виду
и Input validation для проверки правильности ввода
 
Oksana сказал(а):
Подскажите, пожалуйста, можно ли и если да, то как задать формат поля.

Мне нужно поля для ввода и хранения ИП-адреса.

Соответвенно хочется чтобы вводили все одинаково и не ошибались, не было разброса в разделителях (точки), ну и соответственно стандартный формат ИП адреса 000.000.000.000, чтобы все разряды были заполнены.
Нажмите, чтобы раскрыть...

Такие данные вобщето не должны вводиться пользователями
попробуй лучше вот такой вариант

Sub Initialize
Dim session As NotesSession
Set session = New NotesSession
Dim doc As NotesDocument
Set doc = session.DocumentContext
Print "<H2>IP address is " + _
doc.Remote_Addr(0) + "</H2>"
End Sub
 
Ronchik сказал(а):
Такие данные вобщето не должны вводиться пользователями
попробуй лучше вот такой вариант
Нажмите, чтобы раскрыть...
Спасибо, но мне не нужет текущий ИП, мне нужно текстовое поле, в которое будет вводится произвольный ИП-адрес, просто хотелось единообразия при вводе и просмотре.

А вот как сделать обработку, так пока еще и не придумала, ошибок при вводе может быть куча и по длине строки и по содержанию. Может использовать подформу для ввода или диалог какой, который уже разделит по разрядам, и при сборке вставит нужный разделитель, точку. Но с этими элементами тоже еще не работала.
 
Oksana
Используйте Input translation - в нём вы сможете
1. проверить длинну, в Вашем случае это 15 символов
2. забить недостающие символы 0
3. ОБЯЗАТЕЛЬНО использовать текстовое поле
 
Morpheus сказал(а):
Oksana
Используйте Input translation - в нём вы сможете
1. проверить длинну, в Вашем случае это 15 символов
2. забить недостающие символы 0
3. ОБЯЗАТЕЛЬНО использовать текстовое поле
Нажмите, чтобы раскрыть...
Сделала @DialogBox, использующий форму для ввода значений, вводится в 4 поля, проверяется соответственно что бы длина была не более 3-х символов в каждом, точки вставляю потом.
как использовать Input translation не совсем поняла, к тому же перебор строки не простой получается, вариаций много
 
<!--QuoteBegin-Oksana+27:04:2007, 09:36 -->
<span class="vbquote">(Oksana @ 27:04:2007, 09:36 )</span><!--QuoteEBegin-->к тому же перебор строки не простой получается, вариаций много
[snapback]63679" rel="nofollow" target="_blank[/snapback]​
[/quote]
зря Вы так, очень даже легко получаеться )))
щас просто нет времени накарлякать :)
 
Oksana сказал(а):
Сделала @DialogBox, использующий форму для ввода значений, вводится в 4 поля, проверяется соответственно что бы длина была не более 3-х символов в каждом, точки вставляю потом.
как использовать Input translation не совсем поняла, к тому же перебор строки не простой получается, вариаций много
Нажмите, чтобы раскрыть...
Что-то такое раз делал, в Validation-ф-ле. Сначала проверка на доп.сиволы (@Matches), перебор упростил преобразованием в Numeric-список:

Lip:=@Explode(@ThisValue;".");
@TextToNumber(Lip) etc..

Еще проще проверЯть по маске, но там ошибку не конкретизируешь
 
Ronchik сказал(а):
Такие данные вобщето не должны вводиться пользователями
попробуй лучше вот такой вариант

Sub Initialize
Dim session As NotesSession
Set session = New NotesSession
Dim doc As NotesDocument
Set doc = session.DocumentContext
Print "<H2>IP address is " + _
doc.Remote_Addr(0) + "</H2>"
End Sub
Нажмите, чтобы раскрыть...
Кстати, как получить IP, с которого подключился пользователь, с помощью LS, вышеприведенный пример не подходит.

Oksana сказал(а):
Оставлю пока свой вариант, а Ваш подожду :) все равно хочется посмотреть как иначе можно сделать
Нажмите, чтобы раскрыть...
Убрала диалог, сделала трансляцию и проверку. Если данные введены корректно, то транслирует как мне надо, если нет, то выходит окно предупреждения, но документ все равно сохраняется, почему так?
 
Oksana сказал(а):
Убрала диалог, сделала трансляцию и проверку. Если данные введены корректно, то транслирует как мне надо, если нет, то выходит окно предупреждения, но документ все равно сохраняется, почему так?
Нажмите, чтобы раскрыть...
Сообщение как выводишь? @Prompt ? А validation f-la что системе возвращает? Должна:
либо @Yes (@True) - значит сохранять
либо "некий текст" (=@Failure("Text") ) - значит вывести его на экран и НЕ сохранять
 
Constantin A Chervonenko сказал(а):
либо "некий текст" (=@Failure("Text") ) - значит вывести его на экран и НЕ сохранять
Нажмите, чтобы раскрыть...
ОК, теперь использую @Failure, по кнопке "Сохранить и закрыть", выдает предупреждение, не сохраняет, но зкрывает, а мне бы так, что бы и выйти не дало, если значение не верное.
 
Oksana сказал(а):
ОК, теперь использую @Failure, по кнопке "Сохранить и закрыть", выдает предупреждение, не сохраняет, но зкрывает, а мне бы так, что бы и выйти не дало, если значение не верное.
Нажмите, чтобы раскрыть...
На кнопке "Сохранить и закрыть" что висит? 2 команды? ([FileSave] и [..Close])? Имей в виду, что 1-я возвращает результат!
Т.е. надо примерно так:
@If(@Command([FileSave]); @Command([FileClose]); @No)
 
Для: Oksana
DocumentContext property
просто исходя из хэлпа это надо зделать как агент ))) так как
Read-only. The in-memory document when an agent starts.

вот потому этот код
Код: 
Sub Initialize	
Dim session As NotesSession	
Set session = New NotesSession	
Dim doc As NotesDocument	
Set doc = session.DocumentContext	
Print "<H2>IP address is " + _	doc.Remote_Addr(0) + "</H2>" 
End Sub
Просто так с кнопки не срабатывает, пишите агентик :)

От блин, не совсем то
 
LIGHT сказал(а):
Тоже интересно.... как бы вычислить B)
Нажмите, чтобы раскрыть...
По NRPC? Гы... Lotus - мультипротокольная среда. Что такое адрес юзера при соединении по NETBIOS? А по SPX? AppleTalk? X.25? Banian? X.PC? А в случае passThru соединения? Какой из адресов 6 промежуточных серверов?
IMHO нет в Notes API такого инструмента :(

Из наколеночных способов: почитать Log.nsf, там вроде что-то оседало (или это в DomLog??)
 
Constantin A Chervonenko сказал(а):
По NRPC? Гы... Lotus - мультипротокольная среда. Что такое адрес юзера при соединении по NETBIOS? А по SPX? AppleTalk? X.25? Banian? X.PC? А в случае passThru соединения? Какой из адресов 6 промежуточных серверов?
IMHO нет в Notes API такого инструмента :P

Из наколеночных способов: почитать Log.nsf, там вроде что-то оседало (или это в DomLog??)
Нажмите, чтобы раскрыть...
Вот есть задача billing, она прекрасно формирует документы в базу billing.nsf, в которые как раз и записывает пользователя, время его поключения и с какого ип, он был поключен. Вот как бы получить эту информацию.
Я протоколирую свою базу, в которой хотела бы заносить эту информацию:
Документ такой-то был прочитан(редактирован) таким-то юзером, подключенным с такого-то ип (вот этот ип и не могу ни как получить...). Доступ к базе предполагается только черз клиента лотус (веб доступа не будет), используем только TCPIP
 
<!--QuoteBegin-Oksana+10:05:2007, 04:09 -->
<span class="vbquote">(Oksana @ 10:05:2007, 04:09 )</span><!--QuoteEBegin-->Доступ к базе предполагается только черз клиента лотус (веб доступа не будет), используем только TCPIP
[snapback]65341" rel="nofollow" target="_blank[/snapback]​
[/quote]
В таком случае могу предложить только разве что библиотеку dll ( писана кадато на делфях ) , работает только с NT win ( тоесть 98 и милениум и ниже отдыхают ) и только с TCP/IP

выкладывать?
 
Для ответа нужно войти/зарегистрироваться
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!

Верх Низ