Har i en databas massa poster. Dessa poster har även en mapp. Vill nu med smidig kod göra en loop som kollar i databasen de poster som finns. Dessa poster har då en mapp och skall så klart vara kvar. Men de mappar som inte finns i databasen vill jag radera bort. Hur skriver man för att göra en sådan sak?
Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set Mapp = FSO.GetFolder(Server.MapPath("/galleri/"))
For Each Item In Mapp.SubFolders
Set RS=Conn.Execute("Select anvnamn From com_users Where anvnamn='" & Item.Name & "'")
If RS.EOF Then
response.write Item.Name & " - <b>Radera</b>...!<br>"
Else
response.write Item.Name & "<br>"
End If
RS.Close:Set RS=Nothing
Next
Set Mapp = Nothing
Set FSO=Nothing