Компьютерный форум OSzone.net  

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)
-   Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)
-   -   как создать VBArray в JS? (http://forum.oszone.net/showthread.php?t=123113)

pva 16-11-2008 19:09 954277

как создать VBArray в JS?
 
Как создать и передать в функцию VBArray? Есть объект, метод которого принимает в качестве аргумента массив их вариантов, на Array ругается. Мне надо, ни жить, ни быть, этот метод вызвать с массивом (2,3,4)

Busla 16-11-2008 19:39 954305

а откуда в javascript-программе такие необычные объекты?
может, оно не на Array ругается, а на его содержимое?

pva 16-11-2008 20:05 954325

Задача сгруппировать объекты в PowerPoint и назначить им анимацию. На месте "сгруппировать" не хочет. Писать на бейсике не позволяет пижонство.
Код:

  with (slide1.shapes.Range(Array(2,3,4)).Group())
  {
    Fill.BackColor.RGB = 0xc0c0c0;
    Fill.ForeColor.RGB = 0xffffff;
    Fill.TwoColorGradient(2, 1);
    Line.Visible = false;
    AnimationSettings.Animate = true;
    AnimationSettings.AdvanceMode = 2;
    AnimationSettings.AdvanceTime = 0.;
    AnimationSettings.EntryEffect = 2051;
  }

а так работает:
Код:

Sub Animation1(Shapes1)
  With Shapes1.Range(Array(2,3,4)).Group
    .Fill.BackColor.RGB = &hc0c0c0
    .Fill.ForeColor.RGB = &hffffff
    .Fill.TwoColorGradient 2, 1
    .Line.Visible = false
    .AnimationSettings.Animate = true
    .AnimationSettings.AdvanceMode = 2
    .AnimationSettings.AdvanceTime = 0.
    .AnimationSettings.EntryEffect = 2051
  End With
End Sub


pva 16-11-2008 21:21 954383

пока что решил так:
Код:

<SCRIPT LANGUAGE="VBS">
Function ToVBArray(str)
  ToVBArray = Split(str, ",")
End Function
</SCRIPT>
<SCRIPT LANGUAGE="JavaScript">
  <!-- // Activate cloak

но жутко неудобно


Время: 15:22.

Время: 15:22.
© OSzone.net 2001-