可以用CreateObject方法建立DirectAnimation对象吗？如何办到？

MSDN 上的例子：<!doctype html public "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<title> New Document </title>
</head><body>
<OBJECT ID="DAControl_1" STYLE="width:300; height:300; z-index:-1" 
  CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D">
 </OBJECT>
 <SCRIPT language=JScript>
 <!--
 function TestDA(){
    // The DirectAnimation library
    m = DAControl_1.MeterLibrary;
 
   content = new ActiveXObject("DirectAnimation.DAImage");
 
   flower = CreateFlower();
 
   sky = CreateSky();
 
   grass = m.Rect(0.15,0.04).Fill(m.emptyLineStyle,m.SolidColorImage(m.colorRgb(0,0.5,0.3)));
   grass = grass.Transform(m.Translate2(0,-0.02));
   
   pickFg = grass.Pickable();
   pickEvent = m.AndEvent(m.LeftButtonDown, pickFg.PickEvent);
   mouseCoords = m.UntilEx(m.MousePosition, m.always.Snapshot(m.MousePosition));
   content.Init(
  m.Until(m.EmptyImage, pickEvent,
  m.Overlay(flower.Transform(m.Translate2Anim(mouseCoords.X,mouseCoords.Y)),content))
   );  
 
   DAControl_1.Image = m.OverlayArray( new Array(content, pickFg.Image, sky));
   DAControl_1.Start();
 }
   function CreateSky()
   {
  pointsArray = new Array(
   m.Point2(-0.06,0.03), 
   m.Point2(0.06,0.03),
   m.Point2(0.06,-0.01),
   m.Point2(-0.06,-0.01)
   );
 
  colorsArray = new Array( 
   m.ColorRgb(0.7,0.7,0.95),
   m.ColorRgb(0.7,0.7,0.95),
   m.ColorRgb(0.5,0.5,0.6),
   m.ColorRgb(0.5,0.5,0.6)
   );
 
  return m.GradientPolygon(pointsArray,colorsArray);
   }
 
   function CreateFlower()
   {
  stemGrowthTime = 3;
 
    p1 = m.Point2(0,0);
    p2Y = m.Interpolate(0.001,0.02,stemGrowthTime);
    p2 = m.Point2Anim(m.DANumber(0),p2Y);
 
    stem = m.Line(p1,p2).Draw(m.defaultLineStyle.Width(2).Color(m.colorRgb(0,0.8,0.2)));
 
  scalex = m.Interpolate(1,4,8);
 
  petal = m.Oval(0.001,0.0005).Fill(m.EmptyLineStyle,m.SolidColorImage(m.Red));
  petal1 = petal.Transform(m.Translate2(0.0005,0));
  petal2 = petal.Transform(m.Rotate2Degrees(45)).Transform(m.Translate2(0.0005,0.0005));
  petal3 = petal.Transform(m.Rotate2Degrees(90)).Transform(m.Translate2(0,0.0005));
  petal4 = petal.Transform(m.Rotate2Degrees(135)).Transform(m.Translate2(-0.0005,0.0005));
  petal5 = petal.Transform(m.Rotate2Degrees(180)).Transform(m.Translate2(-0.0005,0));
  petal6 = petal.Transform(m.Rotate2Degrees(225)).Transform(m.Translate2(-0.0005,-0.0005));
  petal7 = petal.Transform(m.Rotate2Degrees(270)).Transform(m.Translate2(0,-0.0005));
  petal8 = petal.Transform(m.Rotate2Degrees(315)).Transform(m.Translate2(0.0005,-0.0005));
 
  petals = m.OverlayArray( new Array(
   petal1,petal2,petal3,petal4,petal5,petal6,petal7,petal8));
  petals = petals.Transform(m.Scale2UniformAnim(scalex));
 
    radius = m.interpolate(0.001,0.003,8);
    ovalImg = m.OvalAnim(radius,radius).Fill(m.emptyLineStyle,m.SolidColorImage(m.Yellow));
 
  flowerCenter = m.OverlayArray( new Array(ovalImg, petals)).transform(m.translate2Anim(m.DANumber(0),p2Y));
 
  flowerCenter = m.Overlay(flowerCenter, stem.SubstituteTime(m.DANumber(3)));
 
    return m.Sequence(stem.Duration(stemGrowthTime), flowerCenter);
   }
  TestDA();
 -->
 </SCRIPT></body>
</html>

解决方案 »

  1.   

    TO edyang(石头)：对不起，问题不够严谨：不能用<OBJECT>标签如何办到呢？
      

  2.   

    to edyang(石头):兄弟，你这演示真是在MSDN里的？
    我怎么没看？
    我的MSDN三碟装，是新版，难道是在旧版两片装里？？
      

  3.   

    开闭：
      大虾们所指的MSDN都是正式向M$定购的那种十几张、用一个小塑料箱子装着、坐飞机来得，而不是我们随便看到的地摊货。
      

  4.   

    阿木一头：如何获得这样的MSDN啊？请告诉在下，感激不尽！！！
      

  5.   

    DirectAnimation是什么东西？有没有中文的介绍。谢谢。
      

  6.   

    to lul(涛涛）：DirectAnimation是微软COM/ActiveX的一个应用。她的底层由DirectX撑着上层用网页脚本语言来控制，当然VC，VB也可以用，但用于网页最合适。
    你只需要简单的几段程式就可做出几十K的动画效果来，这方面是她的长处。她最麻烦的就是学起来太难。用她的网页也不多好像。呵呵只能凭我自个儿所知随意说说各位大虾不要砸我鸡蛋哟：）