在IE和VB中支持png图片透明效果的实现方法(vb源码打包)

　　var arVersion = navigator.appVersion.split("MSIE")

　　var version = parseFloat(arVersion[1])

　　function fixPNG(myImage)

　　{

　　if ((version >= 5.5) && (version < 7) && (document.body.filters))

　　{

　　var imgID = (myImage.id) ? "id='" + myImage.id + "' " : ""

　　var imgClass = (myImage.className) ? "class='" + myImage.className + "' " : ""

　　var imgTitle = (myImage.title) ?

　　"title='" + myImage.title + "' " : "title='" + myImage.alt + "' "

　　var imgStyle = "display:inline-block;" + myImage.style.cssText

　　var strNewHTML = "<span " + imgID + imgClass + imgTitle

　　+ " style=\"" + "width:" + myImage.width

　　+ "px; height:" + myImage.height

　　+ "px;" + imgStyle + ";"

　　+ "filter:progid:DXImageTransform.Microsoft.AlphaImageLoader"

　　+ "(src=\'" + myImage.src + "\', sizingMethod='scale');\"></span>"

　　myImage.outerHTML = strNewHTML

　　}

　　}