- str="举个栗子"
- CreateObject("WScript.Shell").Exec("mshta.exe ""about:<hta:application showintaskbar=no />" &_
- "<title>提示</title><script>window.resizeTo(200, 150);</script>" & _
- "<body style='text-align:center'><div><font style='color:#FF0000;'>"&str&"</font></div></body>""")
复制代码
|