Download da pagina privata

[semolino]

Sono all'interno della mia pagina privata con accesso tramite session.
Vorrei automatizzare una funzione!
In pratica vorrei fare il download del mio .mdb dalla sua sottocartella del server ad un indirizzo specifico in locale (la cartella in questione non ha i permessi di download).
Questa funzione mi serve perchè il simpatico cliente è totalmente imp....o!!! Non è in grado di entrare nell'ftp e scaricare il database!!!
E' fattibile?
E' sicuro (dato che sono dentro la mia pagina ad accesso limitato)?

[Roby_72]

Inviatelo per posta elettronica...

Roby

[semolino]

In che senso? lo allego come oggetto?
Ma per i permessi di download? Tramite mail non può essere "visto" da qualcuno?

[Roby_72]

Se ti preoccupa tanto la sicurezza perché hai scelto Access?


Roby

[semolino]

perchè è l'unico modo per il cliente che usa filemaker per poter esportare da quel programma ed importare su access tutti i prodotti!!
Dato che sul database vengono registrati dei messaggi, devo fare in modo di fare dei backup in modo facilitato. Ripeto non è in grado di usare cuteftp!!
Quindi volevo dotare la pagina di un tasto download!

[Roby_72]

Per farne il download devi PRIMA copiarlo in una cartella che te le consente (public) tramite FSO, poi farne il download ed al termine cancellarlo (la copia ovviamente).

Roby

[semolino]

Ok quindi la copia è consentita con quei permessi? Immagino di si.
Azz, faccio prima ad insegnarli ad usare ftp

No dai mi metto a farlo.
Copio, scarico ed elimino.

Ma per il download posso specificare un percorso locale dove salvarlo? Nel caso esistesse già in locale mi chiede di sovrascrivere o lo fa senza chiedere?
Grazie Roby

[Roby_72]

E' un semplice download. Non puoi via server mettere il file in una cartella predefinita. Premi SALVA SU DISCO e lo metti dove ti pare.

Roby

[semolino]

OK working progress

[semolino]

Allora sono arrivato ad una prima soluzione dove ho provato a copiare ed eliminare il file. Funziona.
Ora ho aggiunto nel mezzo la funzione di download ma si interrompe proprio li. Invece di scaricare il file me lo apre nel browers tutto codificato come un'infinita serie di caratteri sullo schermo.

'Prima copio il database
Set fso = Server.CreateObject("Scripting.FileSystemObject") 
	fso.CopyFile Server.MapPath("/da/data.mdb"), Server.MapPath("/qui/data.mdb")
Set copy = Nothing 
Set fso = Nothing

'Poi lo scarico
Dim objStream, strFileName
strFileName = "/qui/data.mdb"
Set objStream = Server.CreateObject("ADODB.Stream")
objStream.Type = 1 ' adTypeBinary
objStream.Open

objStream.LoadFromFile Server.MapPath(strFileName)
' Istruiamo il browser sul tipo di file
Response.AddHeader "Content-Disposition", "attachment; filename=" & strFileName
Response.ContentType = "application/octet-stream"
Response.BinaryWrite objStream.Read
objStream.Close
Set objStream = Nothing

'Ora lo elimino!
		file = Server.mapPath("/qui/data.mdb")
		Set fso = server.createObject("Scripting.FileSystemObject")
			If fso.fileExists(file) Then
			fso.deleteFile(file)
			End If
		Set fso = Nothing

Cosa c'è che non va nel download?