Upload Baol - recuperare nome file

[supergeniux]

Originariamente inviato da Cesar
a me, così funziona:

.Database.Fields("xxx") = .GetFileName

per più file:

....
.Database.Open()


	If Not .EOF then	
	While Not .EOF
		.Save
			response.Write "il file " & .GetFileName &" è stato salvato 
"


			Select Case lCase(.Files("InputName"))
			Case "ins_img_1" :.Database.Fields("img_1") = .GetFileName
			Case "ins_img_2" :.Database.Fields("img_2") = .GetFileName
			Case "ins_img_3" :.Database.Fields("img_3") = .GetFileName
			Case "ins_img_4" :.Database.Fields("img_4") = .GetFileName
			Case "ins_img_5" :.Database.Fields("img_5") = .GetFileName
			End Select


			.MoveNext
	Wend
	
Else
Response.write("Nessuna immagine caricata")
End if

.Database.AddNew()
.Database.Close

Il nome non è un problema recuperarlo, il problema è recuperare il nome una volta che questi, vista la presenza di un file con lo stesso nome e la stessa estensione, viene rinominato.

[Cesar]

Originariamente inviato da supergeniux
Il nome non è un problema recuperarlo, il problema è recuperare il nome una volta che questi, vista la presenza di un file con lo stesso nome e la stessa estensione, viene rinominato.

a me funziona anche quando il script rinomina il file.

[supergeniux]

Ti mostra il nome per intero? Ad esempio quando rinomina l'img cesar.gif in cesar_01.gif?

[Cesar]

Originariamente inviato da supergeniux
Ti mostra il nome per intero? Ad esempio quando rinomina l'img cesar.gif in cesar_01.gif?

ma certo. lo salva anche nel db.

[Cesar]

Ho provto proprio adesso (funziona):

                        Select Case lCase(.Files("InputName"))
			Case "ins_img_1" :.Database.Fields("img_1") = .GetFileName
			Response.Write .GetFileName
			Case "ins_img_2" :.Database.Fields("img_2") = .GetFileName
			Response.Write .GetFileName
			Case "ins_img_3" :.Database.Fields("img_3") = .GetFileName
			Response.Write .GetFileName
			Case "ins_img_4" :.Database.Fields("img_4") = .GetFileName
			Response.Write .GetFileName
			Case "ins_img_5" :.Database.Fields("img_5") = .GetFileName
			End Select