42 messaggi dal 14 maggio 2004
 ciao

vi spiego il mio problema.
Io ho una pagina asp che contiene un editor html. In questo editor posso caricare delle immagini che al momento della creazione avranno come SRC il percorso da cui me le sono andate a pescare <IMG src="c:\Immagini\ekgc.jpeg"> (un percorso mio locale). Dato che le immagini nel momento in cui sono inserite nell'editor vengono uploadate sul server, al momento del salvataggio del contenuto html dell'editor sarà necessario modificare il contenuto della SRC dell'immagine con il nuovo percorso sul server in modo che tutti possano poi vedere allo stesso modo il contenuto dell'editor.

Come posso fare per modificare nel contenuto html la stringa che identifica il sorgente dell'immagine con la stringa che identifica il nuovo percorso sul server.
Inserisco il codice che ho provato io ma non funzione correttamente:








  percorso2=Request.ServerVariables ("HTTP_REFERER")
  percorso2=Left(percorso2, InStrRev(percorso2, "/"))
  
  percorso2=percorso2&"IMMAGINISITO2/"
  Response.Write (percorso2)
  content=(codificastringa(Uploader.form("txt_contenuto")))
  S=codificastringa(Uploader.form("txt_contenuto"))
   i=1
   lunghezza=len(content)
      
    While i <= Len(S)
      Response.Write "contenuto:"&S
      inizio = InStr(i, UCase(S), "IM")
      Response.Write "immagine inizio:"&inizio
      If inizio <> 0 Then
      fine = InStr(inizio, S, ">", vbTextCompare)
        Response.Write "immagine fine:"&fine &vbcrlf
      stringaimg = Mid(S, inizio - 1, fine - inizio + 1)
      
      sorgente = InStr(1, UCase(stringaimg), "SRC", vbTextCompare)
       
      If sorgente <> 0 Then
       sorgente2 = InStr(sorgente, stringaimg, "''", vbTextCompare)
      sorgente3 = InStr(sorgente2 + 1, stringaimg, "''", vbTextCompare)
      iniziomid=sorgente2+1
      lungmid=Sorgente3-(sorgente2+1)
      path = Mid(stringaimg,iniziomid+1,lungmid)
      fileScelto = path
      
      path = Left(path, InStrRev(path, "\"))
       
      If path <> "" Then
         
        NomeModello = Right(fileScelto, Len(fileScelto) - InStrRev(fileScelto, "\"))
       
        NomeAllegato=percorso2& NomeModello
         Response.Write ("file scelto:"&fileScelto &vbcrlf)  
      Response.Write("nomeallegato:"&NomeAllegato &vbcrlf)
              
          
                content = Replace(content, fileScelto,NomeAllegato)
    

    
          
       '********************
      i = fine
      Else
      i = fine
      End If
      Else
       i = Len(S) + 1
      End If
      Else
       i = Len(S) + 1
      end if
    Wend


Qualcuno che mi può aiutare???
 Grazie,
Silvia
Ti indico la via: Regular Expression.
Purtroppo non ce l'ho pronta all'uso...

Matteo Casati
GURU4.net
593 messaggi dal 09 ottobre 2002
www.dotnetside.org
Ciao silvia,
assunto che la variabile persorso2 è correttamente valorizzata a rappresentare l'url effettivo e completo del file immagine, io farei molto semplicemente così:
Replace(S, "c:\Immagini\", percorso2)

Ciao

Pochi post. Anzi, quasi quasi spengo
http://www.dotnetside.org/
42 messaggi dal 14 maggio 2004
Il mio problema è che devo ricavarmi il percorso dell'immagine da sostituire con percorso2 perchè a priori non lo conosco ma è contenuto nella stringa che mi recupero dall'editor!!!

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.