lavorare con database access e asp

[azocomposto]

Ciao, sto cercando due script per lavorare con database access, che mi consentano di:
1. estrarre i dati da access e importarli in excel
2. effettuare il backup di un database access.

Per il problema 2, ho trovato questo script:

<%
Function mdb_backup(dir)
' Dimensiono le variabili
Dim fso, folder, files, File
' Creo l'oggetto FileSystem
Set fso = CreateObject("Scripting.FileSystemObject")

' Imposto e creo la cartella di backup per i file mdb
bckdir = "backup_mdb_" & Replace(FormatDateTime(Date(),2),"/","-")
If NOT fso.FolderExists(Server.MapPath(bckdir)) Then
fso.CreateFolder(Server.MapPath(bckdir))
End If

' Attivo la cartella
Set folder = fso.getfolder(Server.MapPath(dir))
' Recupero i files contenuti nella cartella
Set files = folder.files
' Ciclo i files
For Each file in files
' Se il file ha estensione mdb procedo alla copia nella cartella di backup
If fso.GetExtensionName(file.path) = "mdb" then
fso.CopyFile file.path, Server.MapPath(bckdir & "/" & file.name)
End If
Next

' Stampo un messaggio di conferma
Response.Write "Backup eseguito con successo!"
End Function

' Lancio la funzione specificando la cartella che contiene i db Access
Call mdb_backup("/")
%>


nella root del sito, mi crea automaticamente la cartella chiamata backup_data_ che dovrebbe contenere il backup del database, ma non mi copia nulla qui dentro.
Come si può risolvere questo problema?

Ciao Grazie

[Santino83_02]

probabilmente il path che gli passi alla funzione (quel "/") non punta ad una cartella con attivi i permessi di scrittura. se ad esempio la cartella con già i permessi di scrittura si chiama "public", dovresti chiamare la fuznione passandogli "/public"

ps: anche se la pecca nel mio ragionamento è che non dovrebbe neanche creare la directory.boh prova va




edit: mi correggo, la path che passi "/" evidentemente non contiene nessun file di database. che so, se dalla root del sito il database si trova sotto "mdb-database", te gli devi passare "/mdb-database"