Ricavo utlima parte da url

[semolino]

Passo attraverso form con imput file, il percorso dell'immagine da caricare e recuper in questo modo:

strImage = Request.Form("image")
strPath = Right(strImage, (Len(strImage) - InStrRev(strImage, "/")))
	response.Write(strPath)
	response.End()

Mentre faccio delle prove
se stampo strImage = C:\Documents and Settings\SimoZa\Documenti\Immagini\00.jpg

se stampo strPath = C:\Documents and Settings\SimoZa\Documenti\Immagini\00.jpg

Ma non dovrebbe, nel secondo caso, stampare solo 00.jpg?

[viki1967]

Scusa ma è un form che invia in upload i files al server?
Se così fosse il metodo Request.Form non è consentito.

[semolino]

Che cosa dovrei usare invece di request.form?

[viki1967]

Puoi utilizzare uno script già confezionato come quello di Baol74 (previsto anche l'invio delle immagini):

http://www.aspxnet.it/public/files/d.../upload312.zip

O in alternativa:

http://www.pstruh.cz/dlldownload/pASPUpl2.zip
(ugualmente valido)

[kluster]

strPath = Right(strImage, (Len(strImage) - InStrRev(strImage, "\")))

?

[semolino]

Originariamente inviato da kluster

strPath = Right(strImage, (Len(strImage) - InStrRev(strImage, "\")))

?

Grazie , cosi funziona.

Originariamente inviato da viki1967
Puoi utilizzare uno script già confezionato come quello di Baol74

Lo stavo già guardando, ma non capisco come si usa.
Il file upload è incluso in tutte le varie tipologie.
Ma come utilizzo un file per quello che serve a me?
In pratica io faccio scegliere l'immagine da caricare e con lo script vorrei che venisse caricata nella cartella "public" del server e poi scrivo il nome dell'immagine all'interno del db.

[semolino]

Stavo guardando questo codice:

If Form.State = 0 Then 'Completted
Form.Files.Save ImgDirPath 
response.write "
<Font Color=green>File (" & Form.TotalBytes \1024 & "kB) salvato nell cartella " & ImgDirPath & ".</Font>"
ElseIf Form.State > 10 then
 Const fsSizeLimit = &HD
 Select case Form.State
case fsSizeLimit: response.write  "
<Font Color=red>Source form size (" & Form.TotalBytes & "B) exceeds form limit (" & Form.SizeLimit & "B)</Font>
"
case else response.write "
<Font Color=red>Some form error.</Font>
"
  end Select
End If

come posso ottenere il nome della foto? Cosi posso inserirlo nel database.
Lo script è una parte dell'esempio
http://www.pstruh.cz/dlldownload/pASPUpl2.zip

[viki1967]

  Dim DestinationPath, DestinationFileName
  DestinationPath = Server.mapPath("UploadFolder")
  DestinationFileName = DestinationPath & "\" & Form("SourceFile").FileName

Così determini la cartella dove caricare il file (UploadFolder) ed il nome del file (Form("SourceFile").FileName)

[semolino]

Per "SourceFile" intendi il nome che hai assegnato al campo input type="file"?

- Tu mi indichi, come da esempio:
DestinationPath = Server.mapPath("UploadFolder")

Supponiamo che io eseguo lo script in
root>admin
in questo caso mi verrà creata qui:
root>admin>UploadFolder

Io la vorrei far creare in:
root>public

Cosa metto al posto di
DestinationPath = Server.mapPath("UploadFolder")?