script upload baol - estrarre nome file e salvarlo in database

[Pandolfo]

come faccio durante l' upload a salvare in una tabella del database i nomi dei file uploadati?

[Pandolfo]

up

[michele.santoro]

Guarda che all'interno del file zip dell'upload di Baol che hai scaricato, ci sono vari esempi tra cui anche quello che serve a te.

[Pandolfo]

sarebbe questo?
quindi questo non carica i file direttamente su database?

<%
Dim oUpload
Set oUpload= new cUpload
With oUpload
'La riga seguente impoosta la connessione al database e la tabella di inserimento dati
'La connesione e la tabella verranno aperti con il metodo oUpload.Database.Open()
.SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("news.mdb"),"SELECT Top 1 * FROM news"
.EnabledAspUpload	= False
.EnabledImageSize	= False
.EnabledLog 		 = False
.AutoRename 		 = True
.Overwrite			 = False
.SetPath "files\"
.Load
.MoveFirst
if .EOF then
	NumFiles = .Count()
	Response.write "0 Files caricati su " & NumFiles &" : controlla le dimensioni e il ttipo di file."
else
	.Database.Open()
	While Not .EOF
			.Save
			response.Write "il file " & .GetFileName &" è stato salvato 
"
			'Inserimento dei valori
			.Database.Fields("Titolo") = .Form("Titolo")
			.Database.Fields("Percorso") = .GetCompletePathFile
			'Inserimento
			.Database.AddNew()
	.MoveNext
	Wend
end if
End With
Set oUpload = Nothing
%>

[michele.santoro]

Non capisco perché vorresti caricare direttamente i file su database, dato che non faresti altro che appesantirlo. Sul database ti basta salvare il percorso del file di cui hai effettuato l'upload, poi per richiamarlo vai a leggerti il percorso del file memorizzato sul database e lo visualizzi normalmente sulla pagina.
Comunque se dovesse servirti puoi dare un'occhiata anche quì

[Pandolfo]

no ma infatti è quello che voglio fare... pensavo che quello script caricasse direttamente i file su db... grazie

[michele.santoro]

Prego!

[Pandolfo]

altro favore...
ho praticamente come impostato già nello script 5 campi file, file1, file2,file3, file4, file5 vicino a questi ho inserito io per ciascun campo file un campo select, select1 select2 select3 select4 select5.

Come faccio ad inserirli nel ciclo affinchè vengano memorizzati nel database?

<%
Dim oUpload
Set oUpload= new cUpload
With oUpload
'La riga seguente impoosta la connessione al database e la tabella di inserimento dati
'La connesione e la tabella verranno aperti con il metodo oUpload.Database.Open()
.SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("/mdb-database/db2.mdb"),"SELECT Top 1 * FROM news"
.EnabledAspUpload	= False
.EnabledImageSize	= False
.EnabledLog 		 = False
.AutoRename 		 = True
.Overwrite			 = False
.SetPath "/public/"
.Load
.MoveFirst
if .EOF then
	NumFiles = .Count()
	Response.write "0 Files caricati su " & NumFiles &" : controlla le dimensioni e il ttipo di file."
else
	.Database.Open()
	While Not .EOF
			.Save
			response.Write "il file " & .GetFileName &" è stato salvato 
"
			'Inserimento dei valori
			.Database.Fields("idoperatore") = Request.querystring("idoperatore")
			.Database.Fields("idcliente") = Request.querystring("idcliente")
			.Database.Fields("Titolo") = .GetFileName
			.Database.Fields("Percorso") = .GetCompletePathFile
			'Inserimento
			.Database.AddNew()
	.MoveNext
	Wend
end if
End With
Set oUpload = Nothing
%>