Salve a tutti, vorrei crearmi uno script che mi prende dei file nella cartella
li legge ad uno ad uno, controlla se il file è presente nel db, se non lo è, lo
cancella, io ho elaborato un procedimento, ma ho alcune lacune:
Per selezionare il file dalla cartella mi basta fare:
vorrei sapere nel punto 2 come potrei fare,codice:Set fso = CreateObject("Scripting.FileSystemObject") Set dove = fso.GetFolder(Server.MapPath("\lacartella\")) Set cartella = dove.Files '1 qui attuo una procedura che seleziona i file uno ad uno For Each file In cartella '2 qui dovrei selezionare il file ma non so come devo fare. '3 mi connetto set conn = CreateObject("ADODB.Connection") '4 apro il db e vedo se ci sta il file conn.open... set recordset = CreateObject("ADODB.Recordset") set recordset = conn.execute("select * from database where file="&file) if recordset.eof then '5 lo cancello set del = CreatObject("Scripting.FileSystemObject") set canc =del.DeleteFile(Server.MapPath("\lacartella\"&file)) end if next
grazie, ciao.

Rispondi quotando