ASP实现记录访问者信息的代码,出现“VBScript运行时错误,没有权限”

来源:百度知道 编辑:UC知道 时间:2024/06/08 07:20:56
ASP实现记录访问者信息的代码,在windowsXP系统中运行正常,但在windows2003以及2000服务器系统中出现如下错误:

Microsoft VBScript 运行时错误 错误 '800a0046'

没有权限

/index.asp,行 109
网上说的更改scrrun.dll权限也不行;网站文件也是放在FAT32分区中的;IIS目录权限也设置为EveryOne有所有权限(这一方法不行而且大大降低安全性)
请高手指点
先送10分,如果问题解决,再加20分!!!
代码:
Function GetMACAddress(strIP)
Set net = Server.CreateObject("wscript.network")
Set sh = Server.CreateObject("wscript.shell")
sh.run "%comspec% /c nbtstat -A " & strIP & " > c:\" & strIP & ".txt",0,true
Set sh = nothing
Set fso = createobject("scripting.filesystemobject")
Set ts = fso.opentextfile("c:\" & strIP & ".txt")
macaddress = null
Do While Not ts.AtEndOfStream
data = ucase(trim(ts.readline))
If instr(data,"MAC ADDRESS") Then
macaddress = trim(split(data,"=")(1))
Exit

记得是要把那些要执行的文件丢到一个特定的目录里面去,再配置执行权限的,就是你那个Shell CMD执行的权限,长时间不用了,很模糊了,而且上面的c:\?!你不会用相对的目录存吗?IUSR????账户对C盘根目录有写权限吗?建议去下个asp黑客后台,里面有服务器CMD的执行部分,可以参考一下……
你那服务器是内网用吧?联上外网就……^_^