图 片 从 右 向 左 移 动 特 效 代 码

<SCRIPT>
// the name of your first picture-file
var picture1="http://www.86010.net/user/123/media/image/sohu.gif"

// the name of your second picture-file
var picture2="http://www.86010.net/user/123/media/image/sina.gif"

// the width and height of your pictures (pixels)
var picturewidth=133
var pictureheight=100
</SCRIPT>

<SCRIPT>
if (document.all) {
document.write('<OBJECT ID="DAControl_Wipe" ')
document.write('STYLE="width:'+picturewidth+';height:'+pictureheight+'"')
document.write('CLASSID="CLSID:B6FFC24C-7E13-11D0-9B47-00C04FC2F51D">')
document.write('</OBJECT>')
m = DAControl_Wipe.MeterLibrary;

whatTransformation = new ActiveXObject("DXImageTransform.Microsoft.Wipe");

whatPictures = new Array();
whatPictures[0] = m.ImportImage(picture1);
whatPictures[1] = m.ImportImage(picture2);

forward = m.Interpolate(0, 1, 3);
back = m.Interpolate(1, 0, 2);
whatMovement = m.Sequence(forward, back).RepeatForever();

whatTransformation.GradientSize = 1.0;
whatTransformation.WipeStyle = 0;

theResult = m.ApplyDXTransform( whatTransformation, whatPictures, whatMovement );

DAControl_Wipe.Image = theResult.OutputBvr;
DAControl_Wipe.Start();

}
</SCRIPT>