webForumDet fria alternativet

FSO, Next och Do?!

ASP

5 svar · 226 visningar · startad av Asa

Medlem sedan dec. 20011 860 inlägg
Frågan#1

Har en databas där jag sparar namn på filer och en medlems id. Alla medlemmar har en egen mapp för sina bilder oxå. Nu vill jag kolla i databasen och sedan i medlemmens mapp och om inte bilden finns med i databasen vill jag skriva ut den. Anledningen till detta är att man ska kunna radera den. Nån som förstår mig och vet?!?

Medlem sedan feb. 200112 078 inlägg
#2

Typ? Observera att detta är helt skrivet ur huvudet och jag gissar nu hur din databasstruktur ser ut. :OO

set objFso = server.createobject("scripting.filessystemobject")
set objRsUser = objConn.execute("SELECT * FROM [members] ORDER BY [ID]"

while not objRsUser.eof 

   lngMemberId = objRsUser("ID") '# medlemmens ID
   strPath = "files/" & lngMemberId '# Förutsätter att mappen heter samma som din medlems ID

   set folder = objFso.getFolder(server.mappath(strPath)) 

   for each file in folder.files
      set objRsFile = objConn.execute("SELECT * FROM [files] WHERE [memberID] = " & lngMemberId & " AND [image] = '" & file.name & "'")

      if objRsFile.eof then
         response.write "Bild saknas!<br>"
         response.write "MemberID: " & lngMemberId & "<br>"
         response.write "Bildnamn: " & file.name & "<br><br>"
      end if

      objRsFile.close
      set objRsFile = nothing
   next

objRsUser.movenext
wend

objRsUser.close
set objRsUser = nothing

Småbuggar.

Medlem sedan dec. 20011 860 inlägg
#3

Vad det jag var ute efter! Tackar :)

Medlem sedan feb. 200112 078 inlägg
#4

Observera att koden inte tar hänsyn till vad som finns i databasen, utan går efter vilka filer som finns i mappen, inte tvärtom.

Finns filen i mappen men inte i databasen, skrivs den ut. Finns filen i databasen men inte i mappen, skrivs den inte ut.

Medlem sedan dec. 20011 860 inlägg
#5

Var ju precis så jag vill ha det! Kanske inte lät så i mitt inlägg men det är ju perfekt!

Medlem sedan feb. 200112 078 inlägg
#6

Bra. :)

260 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
132 ms — hämta tråd, inlägg och bilagor (db)
124 ms — ändringar (db)