powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / OLAP и DWH [игнор отключен] [закрыт для гостей] / DrillThrough
1 сообщений из 1, страница 1 из 1
DrillThrough
    #33544251
NikolayS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Подскажите пожалуйста, как можно составить DrillThrough - запрос.
Задача следующая:
По двойному щелчку сформировать строку (запрос).
Не могу понять как вычислить какие измерения и какие фильтры выбраны.

Создал проект на VB.NET.
На клиентской части пишу:

<OBJECT id="MyPT" style="WIDTH: 502px; HEIGHT: 217px" height="217" width="502" classid="clsid:0002E55A-0000-0000-C000-000000000046"
VIEWASTEXT>
</OBJECT>

<script language="VBScript">
function GetTupleMDX()
Dim sTupleMDX
Dim i, iLen

sTupleMDX = ""
if (MyPT.Members = null) Then
GetTupleMDX = ""
End if

iLen = MyPT.Members.length
for i=0 To iLen
sTupleMDX = sTupleMDX + MyPT.Members(i).UniqueName
if (i < (iLen - 1)) then
sTupleMDX = sTupleMDX + ", "
end if
next
GetTupleMDX = sTupleMDX
end function

Sub MyPT_DblClick()
Dim sMDX

if (MyPT.SelectionType = "PivotAggregates") then
if (MyPT.Selection.Count = 1) then
sMDX = "DRILLTHROUGH "
sMDX = sMDX + "SELECT FROM [" + MyPT.DataMember + "] "
sMDX = sMDX + "WHERE ("
sMDX = sMDX + GetTupleMDX()
sMDX = sMDX + ")"

MsgBox sMDX
End if
End if
End Sub
</script>

По двойному клику вызывается MyPT_DblClick(), а далее из MyPT_DblClick() вызывается GetTupleMDX().
Эта функция говорит, что Объект не поддерживает это св-во или метод: 'MyPT.Members'

Функцию GetTupleMDX() я содрал из toolpack'a (но не совсем разобрался в нем). Скажите что в этой ф-ии не правильно.

Подскажите, как правильно надо написать, что бы решить мою проблему.
Заранее спасибо!
...
Рейтинг: 0 / 0
1 сообщений из 1, страница 1 из 1
Форумы / OLAP и DWH [игнор отключен] [закрыт для гостей] / DrillThrough
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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