Permission denied: 'CreateObject'
HejsaJeg bruger et lille script til at lave et visitor count på en hjemmeside. Dette har fungeret fint, indtil jeg for nylig reinstalerede serveren (kører windows 2003 Server), men nu kommer den med en fejl!
Jeg har prøvet en helt masse med permissions, både på IUSR_ og everyone, men intet virker.
Scriptet jeg bruger ser sådan ud:
<%
' -----------------------------------------------------------------------
' Counter System
' Udviklet af : Jacob Piil / www.piilstil.com
' Dato : 30-11-1999
' Kommentar : Denne sourcekode må bruges frit, men ikke commercielt.
' Krav : ASP baseret NT server!
' -----------------------------------------------------------------------
CountPath = server.mappath("count.txt")
Set objFSO = CreateObject("Scripting.FileSystemObject")
Set objFile = objFSO.GetFile(CountPath)
Set objFileTextStream = objFile.OpenAsTextStream(1,-2)
usercount = cint(objFileTextStream.readline)
if session("counted") = 1 then
'do nothing
else
usercount = usercount + 1
session("counted") = 1
end if
Set objFileTextStream = objFile.OpenAsTextStream(2,-2)
objFileTextStream.WriteLine usercount
objFileTextStream.close
%>
og fejlen jeg får er:
Microsoft VBScript runtime error '800a0046'
Permission denied: 'CreateObject'
/count.inc, line 11
Kan nogen hjælpe??
Hilsen
Stig :-)
