• Познакомьтесь с пентестом веб-приложений на практике в нашем новом бесплатном курсе

    «Анализ защищенности веб-приложений»

    🔥 Записаться бесплатно!

  • CTF с учебными материалами Codeby Games

    Обучение кибербезопасности в игровой форме. Более 200 заданий по Active Directory, OSINT, PWN, Веб, Стеганографии, Реверс-инжинирингу, Форензике и Криптографии. Школа CTF с бесплатными курсами по всем категориям.

Диаграмма на Lotus

  • Автор темы Gor
  • Дата начала
G

Guest

Для: allex

А что тебя именно интересует?
Построить на основе данных обычную столбцовую диаграму на которой показать исполнения быджета (отношение запланированных сумм и израсходованных).
 
A

allex

<!--QuoteBegin-Юлия+15:02:2006, 16:34 -->
<span class="vbquote">(Юлия @ 15:02:2006, 16:34 )</span><!--QuoteEBegin-->Для: allex

А что тебя именно интересует?
Построить на основе данных обычную столбцовую диаграму на которой показать исполнения быджета (отношение запланированных сумм и израсходованных).
[snapback]30660" rel="nofollow" target="_blank[/snapback]​
[/quote]

Прям в точку попала.
Но в планах и более грандиозные задумки
 
A

allex

Для: Юлия
Если можешь,вышли на lotus@melenki.ru

[/quote]
 
D

Domino6

<!--QuoteBegin-Medevic+15:02:2006, 15:12 -->
<span class="vbquote">(Medevic @ 15:02:2006, 15:12 )</span><!--QuoteEBegin-->Т.е. открыть в клиенте ? Как веб-страницу ?
[snapback]30656" rel="nofollow" target="_blank[/snapback]​
[/quote]
При условии что в "Месте вызова" установлен браузер Нотес или Нотес с ядром ИЕ

Можно сначала сформировать в вайл (html) создать документ по форме в котором есть маймовое боди туда заимпортировать файл и тогда в клиенте будет отрисовыватся даже если и браузер другой выставлен
 
A

allex

<!--QuoteBegin-Domino6+15:02:2006, 19:05 -->
<span class="vbquote">(Domino6 @ 15:02:2006, 19:05 )</span><!--QuoteEBegin-->При условии что в "Месте вызова" установлен браузер Нотес или Нотес с ядром ИЕ

Можно сначала сформировать в вайл (html) создать документ по форме в котором есть маймовое боди туда заимпортировать файл и тогда в клиенте будет отрисовыватся даже если и браузер другой выставлен
[snapback]30674" rel="nofollow" target="_blank[/snapback]​
[/quote]

Вот я так и хотел, сначала html сформировать (сохранять его с именем файла = дате создания) а потом его импортировать в форму.Но сначала надо диаграмму сделать , чтоб ее в html запихать.

- наглядный пример для использования.Переточить только под свои цыфири и порядок.
 
A

allex

Для Юли

Давай обсудим наболевшее.
Поделись мыслями.
 
A

allex

Для Medevic
<!--QuoteBegin-Medevic+15:02:2006, 10:04 -->
<span class="vbquote">(Medevic @ 15:02:2006, 10:04 )</span><!--QuoteEBegin--> [/quote]
Что то я не понял что там за база.И где связь с SVG
 
A

allex

Создание графиков

Посмотрите -
 
G

Gor

Для: Medevic

Имхо, без дополнительных компонентов и не в вебе сделать что-нибудь более-менее нормальное не получится.
Так что проще вставить на форму Microsoft Excel Chart, получить его через GetObject и нарисовать что надо. MS Office есть почти у всех.

Ну а как же достучаться до значений определённых в Microsoft Excel Chart??????
Конечно есть метод GetObject я так понимаю вот он-----
Код:
Dim workspace As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim handle As Variant
Set uidoc = workspace.CurrentDocument
Set handle = uidoc.GetObject( "MES" )
handle.Application.Visible = True
Получаю объект MES но полей то в нём нету никаких!!!!!Никаких значений не показывается свойст у Object нет... В дебаггере после гетобжекта handle = [OBJECT] Вообще Object-ом управлять можно??
т.е. чтобы диаграмма сама менялась строилась если там одно значение потом другое программно получаем??
И ещё один вопросик может быть глуповатый но я с этим просто не встречался никогда... В каком смысле работать через СOM с Microsoft Excel Chart???Это как?
 

Medevic

Что это ? :)
Green Team
10.12.2004
3 334
1
BIT
4
Открываешь Excel. Там редактор Visual Basic. Там справку по нему. Смотришь свойства и методы у объекта Chart.
Вот пример:
Код:
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim neo As Variant
Dim exch As Variant
Dim chart As Variant
Set uidoc = ws.CurrentDocument
Set neo = uidoc.GetObject("Microsoft Office Excel Chart")
Set chart = neo.ActiveChart
chart.HasTitle = True
chart.ChartType = 5
chart.ChartTitle.Text = "Пирог"
 
G

Gor

Для: Medevic

Действительно работает!! Просмотрел в ВБА свойства MEChart.... Только вот ещё кое чего не пойму... Неужели нельзя программно (по событию или по нажатию кнопки...) Изменять диаграмму?? Получить какие нибудь данные или что либо и строить эту диаграмму в соответствии с полученными данными...
Потому что свойства и методы просмотрел а там в основном свойства на изменение цвета, имени итд, а как подлезть туда где значения для построения записаны? Надо как то программно записывать на Sheet? Хотя с помощью свойств Sheeta тоже ничего нельзя вроде бы сделать...Так можно ли
изменять значения в диаграмме программно? И какие свойства надо использовать чтобы до значений её долезть не подскажешь :( ?
 

Medevic

Что это ? :)
Green Team
10.12.2004
3 334
1
BIT
4
Chart берет данные с Sheet'а. Он там же расположен.
Взять можно, например так.
Код:
Dim ws As New NotesUIWorkspace
Dim uidoc As NotesUIDocument
Dim neo As Variant
Dim exch As Variant
Dim chart As Variant
Dim sheet As Variant
Set uidoc = ws.CurrentDocument
Set neo = uidoc.GetObject("Microsoft Office Excel Chart")
Set chart = neo.ActiveChart
Set sheet = neo.Worksheets("Sheet1")
chart.HasTitle = True
chart.ChartType = 5
chart.ChartTitle.Text = "Пирог"

Строить можно с помощью метода chart.Chartwizard.
 
Мы в соцсетях:

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