AUTORIZZAZIONE NEGATA

[fablan]

Salve, ho un probelema che mi affligge da giorni, sto cercando di creare una pagina in ASP, ma nel momento in cui cerco di visualizzarla mi appare questo messaggio di errore:
Errore di run-time di Microsoft VBScript (0x800A0046)
Autorizzazione negata: 'Clear'
/GWMTutorial/USSampleData/Content/Build/LegendBuild.inc, line 92

Premettendo che uso windows XP e IIS, non credo che dipenda dal codice ma penso che probabilmente sia un problema di autorizzazioni della cartella ma a me pare che sia tutto in ordine, la cartella è settata in lettura e scrittura e le autorizzazioni di accesso sono settate per: Accesso anonimo IUSR_nome macchina.
Qual'è il problema? Help me! Se riuscite a trovare una possibile soluzione ditemi dettagliatamente tutti i passaggi da effettuare per favore! Rispondete prima possibile! Grazie

[kalosjo]

Posta un po' di codice

[fablan]

Questa è la parte incriminata, premetto che non l'ho scritto io, ma l'ha creata automaticamente il software che utilizzo (GeoMedia):

.......
.......

'------------------------------------------------------------------------------
' Build legend
'------------------------------------------------------------------------------

'-- Get Display Rule Script Definitions
svarDRScriptDefs = GetDRScriptDefs

'-- Get Display flag array
If sstrDisplayFlags<>"" Then
svarDisplayFlagArray = GetDisplayFlagArray(sstrDisplayFlags)
Else
sstrDisplayFlags = GetBaseDisplayFlags(UBound(svarLegendEntryDefs,1))
End If

'-- Get GUID and Cache Location for Custom Display Rule Icons
Dim objMapServerMgr, objMapServer
Set objMapServerMgr = Server.CreateObject("GMWebMap.MapServerManager")
Set objMapServer = objMapServerMgr.MapServer("")
objMapServer.Clear
strGUID = GetGUID(objMapServer)
strGWMCacheVirtualDir = GetGWMCacheVirtualDir(objMapServer)
strCacheLocation = Server.MapPath(strGWMCacheVirtualDir) & "\"
Set objMapServer = Nothing
Set objMapServerMgr = Nothing

......
......