Microsoft VBScript 运行时错误 错误 '800a0046' 
没有权限: 'CreateObject' 
我的测试服务器上也出了这个问题.不过今天弄好了.
是因为c:\windows\system32下的scrrun.dll文件的权限问题.
有可能大家使用一些服务器维护或者安全软件给scrrun.dll这个文件设置了拒绝guest用户组的拒绝权限，
我把scrrun.dll这个文件直接就给administrators组全部权限，其他的都没有加，然后这个Microsoft VBScript 运行时错误 错误 '800a0046' 没有权限: 'CreateObject' 问题解决了。