Server.MapPath() error 'ASP 0175 : 80004005'

[bob18]

salve ragazzi,
ho un problema con un ecommerce.
in locale funziona tutto benissimo, però mettendolo online si verifica un problema ogni volta che inserisco un nuovo prodotto.
praticamente mi permette di scegliere la foto del prodotto direttamente dai file del mio pc tramite un pulsante "Sfoglia...".

Solo che appena confermo il tutto mi compare il seguente errore:

Server.MapPath() error 'ASP 0175 : 80004005'

Disallowed Path Characters

/ScriptLibrary/incPureUpload.asp, line 162

The '..' characters are not allowed in the Path parameter for the MapPath method.

la riga in rosso corrisponde a quella alla quale l'errore si riferisce:

  GP_keys = UploadRequest.Keys
  for GP_i = 0 to UploadRequest.Count - 1
    GP_curKey = GP_keys(GP_i)
    'Save all uploaded files
    if UploadRequest.Item(GP_curKey).Item("FileName") <> "" then
      GP_value = UploadRequest.Item(GP_curKey).Item("Value")
      GP_valueBeg = UploadRequest.Item(GP_curKey).Item("ValueBeg")
      GP_valueLen = UploadRequest.Item(GP_curKey).Item("ValueLen")

      'Get the path
      if InStr(UploadDirectory,"\") > 0 then
        GP_curPath = UploadDirectory
        if Mid(GP_curPath,Len(GP_curPath),1)  <> "\" then
          GP_curPath = GP_curPath & "\"
        end if         
        GP_FullPath = GP_curPath
      else
        GP_curPath = Request.ServerVariables("PATH_INFO")
        GP_curPath = Trim(Mid(GP_curPath,1,InStrRev(GP_curPath,"/")) & UploadDirectory)
        if Mid(GP_curPath,Len(GP_curPath),1)  <> "/" then
          GP_curPath = GP_curPath & "/"
        end if 
       GP_FullPath = Trim(Server.mappath(GP_curPath)) 
      end if

so che in aruba con il windows 2003 (mi pare) bisogna sostituire determinate condizioni ma non so davvero dove mettere le mani.

potreste aiutarmi?


grazie mille e buone feste a tutti!

[maximum]

Dai uno sguardo qui --> http://forum.html.it/forum/showthrea...hreadid=682557

[bob18]

si, avevo già letto quel thread e molti altri sull'argomento.
so cosa cambia in Win2003 ma non so dove mettere le mani in quel codice

potreste darmi una mano?

[bob18]

uppete

è natale!!!

[maximum]

Prova a stampare il path:

  GP_keys = UploadRequest.Keys
  for GP_i = 0 to UploadRequest.Count - 1
    GP_curKey = GP_keys(GP_i)
    'Save all uploaded files
    if UploadRequest.Item(GP_curKey).Item("FileName") <> "" then
      GP_value = UploadRequest.Item(GP_curKey).Item("Value")
      GP_valueBeg = UploadRequest.Item(GP_curKey).Item("ValueBeg")
      GP_valueLen = UploadRequest.Item(GP_curKey).Item("ValueLen")

      'Get the path
      if InStr(UploadDirectory,"\") > 0 then
        GP_curPath = UploadDirectory
        if Mid(GP_curPath,Len(GP_curPath),1)  <> "\" then
          GP_curPath = GP_curPath & "\"
        end if         
        GP_FullPath = GP_curPath
      else
        GP_curPath = Request.ServerVariables("PATH_INFO")
        GP_curPath =  Trim(Mid(GP_curPath,1,InStrRev(GP_curPat
h,"/")) & UploadDirectory)
        if Mid(GP_curPath,Len(GP_curPath),1)  <> "/" then
          GP_curPath = GP_curPath & "/"
        end if 
     GP_FullPath = Trim(Server.mappath(replace(GP_curPath, "..", ""))         
        response.write(GP_FullPath)
        response.end
end if

e postalo qui.

[bob18]

scusa l'ignoranza, ma cosa vuol dire stampare il path?
:rollo:

[maximum]

Esegui il codice che ti ho modificato e posta qui il percorso.

[bob18]

sostituendo il codice che mi hai dato tu mi esce questo errore questa volta non appena apro la pagina di inserimento prodotti

Microsoft VBScript compilation error '800a03ee' 

Expected ')' 

/ScriptLibrary/incPureUpload.asp, line 162 

GP_FullPath = Trim(Server.mappath(replace(GP_curPath, "..", ""))
----------------------------------------------------------------^

ho capito che devo mettere una parentesi ma non so dove!


grazie!

[optime]

che il giovane s'aspetta una parentesi chiusa. gli manchera'....

[bob18]

si, ma dove la metto?