CftClub.ru
Клуб специалистов ЦФТ-Банк

Клиент-скрипт

 
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Уроки ЦФТ-Банк для начинающих
Предыдущая тема :: Следующая тема  
Автор Сообщение
ict_2010
Участник со стажем


Вступление в Клуб: 25.03.2015
СообщениеПт Апр 24, 2015 14:04   Клиент-скрипт Ответить с цитатой
Полезность: Нет оценки
Здравствуйте!
В операции в вкладке Клиент-скрипт реализую MsgBox("<текст сообщения>",vbYesNo) и по нажатию кнопки vbYes запись текстбокса(Text1.text ) записать в реквизит соответствующий этому тексбоксу, а если vbNo то не записывал.Подскажите как можно это реализовать?
prankster
Профи


Вступление в Клуб: 22.08.2014
СообщениеПт Апр 24, 2015 15:32   Re: Клиент-скрипт Ответить с цитатой
Полезность: Нет оценки
ict_2010 пишет:
Здравствуйте!
В операции в вкладке Клиент-скрипт реализую MsgBox("<текст сообщения>",vbYesNo) и по нажатию кнопки vbYes запись текстбокса(Text1.text ) записать в реквизит соответствующий этому тексбоксу, а если vbNo то не записывал.Подскажите как можно это реализовать?


Код:

Public Function Main(LastControl)
   if LastControl is OK then
      sText = "Какой-то текст"
      if msgBox(sText, vbYesNo + vbQuestion, "Внимание") <> vbNo then
         Text1.Text = sText
      end if
   end if
   Main = True
End Function


Как пример. Кнопка ОК должна валидироваться, операция - "Сервер-клиент", а в теле операции нужному реквизиту присваивать значение текстового параметра. Пляшите от того, что требуется сделать.
Random
Эксперт


Вступление в Клуб: 27.06.2011
СообщениеПт Апр 24, 2015 16:06   Re: Клиент-скрипт Ответить с цитатой
Полезность: Нет оценки
prankster пишет:

Код:

Public Function Main(LastControl)
   if LastControl is OK then
      sText = "Какой-то текст"
      if msgBox(sText, vbYesNo + vbQuestion, "Внимание") <> vbNo then
         Text1.Text = sText
      end if
   end if
   Main = True
End Function


Как пример. Кнопка ОК должна валидироваться, операция - "Сервер-клиент", а в теле операции нужному реквизиту присваивать значение текстового параметра. Пляшите от того, что требуется сделать.


Вот объясните недалёкому?
Нафига вы все пишете всё в одной несчастной функции Main ?
Почему бы не написать
Код:

sub OK_OnClick
    MsgBox("Так же удобнее!")
end sub


Тогда и кнопка может даже не валидироваться!
ict_2010
Участник со стажем


Вступление в Клуб: 25.03.2015
СообщениеВс Апр 26, 2015 14:26    Ответить с цитатой
Полезность: Нет оценки
спасибо, но мне надо чтоб в текстовое поле каждый раз записывалось то значение которую меняют, а не то которое в коде указывается. В моем случае поле text1.text это реквизит списка имен и оно каждый раз меняется, необходимо чтоб записывалось то значение которую только что выбрали.
Показать сообщения:   
Ответить на тему    Клуб специалистов ЦФТ-Банк (IBSO) -> Уроки ЦФТ-Банк для начинающих Часовой пояс: GMT + 3
Страница 1 из 1

 
Перейти:  
Вы не можете начинать темы
Вы не можете отвечать на сообщения
Вы не можете редактировать свои сообщения
Вы не можете удалять свои сообщения
Вы не можете голосовать в опросах
Рейтинг@Mail.ru