• Курсы Академии Кодебай, стартующие в мае - июне, от команды The Codeby

    1. Цифровая криминалистика и реагирование на инциденты
    2. ОС Linux (DFIR) Старт: 16 мая
    3. Анализ фишинговых атак Старт: 16 мая Устройства для тестирования на проникновение Старт: 16 мая

    Скидки до 10%

    Полный список ближайших курсов ...

письмо с вопросом

  • Автор темы reg5
  • Дата начала
R

reg5

Подскадите, как правильно сделать
Необходимо отправить письмо, в котором вопрос и две кнопки. Пользователь нажимает на кнопку, форма закрывается и желательно удалять документ из базы. Его ответ будет отображаться в другой базе. В другой базе должны быть такие данные: вопрос, ответ пользователя и его данные
Как правильно это сделать?
 
A

alik86

Правильно - это так, чтобы получить желаемый результат.
Как вариант, можно в само письмо (в то, что вы создаете в своей почтовой базе при помощи "Создать") в тело письма вписать вопрос (ручками по буквам клавиатуры пишется) и туда же вставить две кнопки (Create -> Hotspot -> Button...) с нужным кодом. И разослать его кому надо.
 
A

alik86

То что Вы повесите на Click:
Код:
Sub Click(Source As Button) 
'<ЧТО-ТО ОТСЮДА> 
End Sub
<div class="sp-wrap"><div class="sp-head-wrap"><div class="sp-head folded clickable">"так"</div></div><div class="sp-body"><div class="sp-content">она: тебе нравится программировать?
он: да!
она: охренеть...
он: а тебе что ли не нравится?
она: а с чего бы мне нравилось? )
он: ну смотри
int i = 5;
разве это не круто? ты сказала, что в i будет 5 и оно там реально будет. А почему? Потому что ты так сказала! власть!
 
M

MAZ

Как насчет такой технологии: в базе с вопросами делаем форму "questForm" с кнопками 1 и 2
И другую маленькую формочку, куда вбиваем адресатов и нажимаем "отправить":
Код:
	Dim mdoc As New Notesdocument( db )
mdoc.form = "questForm"
mdoc.subject ="Вопрос на обсуждение"
Call mdoc.Send( True, recipients)

На кнопки вешаем код типа
Код:
	Set answerDoc = New NotesDocument( OriginDB )
call answerDoc.ReplaceItemValue("Answer"; "I'm agree!") ' или "да ну вас всех"
call answerDoc.Save(true, false)
call uidoc.DeleteDocument
call workspace.ViewRefresh
 
Мы в соцсетях:

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