dnscmd.exe eksekveres via wscript

Hej,

Jeg er ved at lave et lille script til at opsætte domæner automatisk i DNS.

Jeg mangler nu blot at få eksekveret dnscmd.exe med mine parametre på...

Når jeg forsøger dette via disse linier:

Set objshell = CreateObject("WScript.Shell")
dnsadd = "D:\webhoteller\webkontrol\www\inc\serveradmin\dnscmd.exe /zoneadd "& domain &" /primary /file "& domain &".dns /load"
objRun = objshell.run(dnsadd, 0, True)

...får jeg følgende fejl:

Microsoft VBScript runtime error '800a0046'

Permission denied

/inc/serveradmin/serveradmin.dns.inc.asp, line 61


Jeg har været rundt og kigge på rettigheder på dnscmd.exe og cmd.exe... men ikke rigtig noget har virket.

Er der nogen der har et par gode idéer?

SYSTEM INFO:
Windows Server 2003
Internet Information Services 6.0