Permisos con FSO

[Turrete]

Tengo el siguiente error cuando trato de abrir un archivo para escribir

Error de Microsoft VBScript en tiempo de ejecución error '800a0046'

Permiso denegado

/parsers/abiz_parser.asp, line 50

Este es el script que genera el error:
filename = "archivo.txt"
path = "c:\inetpub\" & filename

Const ForReading = 1, ForWriting = 2, ForAppending = 8
set fs = CreateObject("Scripting.FileSystemObject")
set ofile = fs.OpenTextFile(path, ForWriting, True)
ofile.WriteLine(Str_Parser)' LINEA QUE DA EL ERROR
ofile.Close()

Como le doy permisos desde el Windows XP Pro ?

Saludos
Gracias