kan nån hjälpa mig och fixa denna kod?
dim sokvag
sokvag = split(request.form("tabort"),",")
for i =1 to sokvag.count
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile(Server.MapPath("bilder/"& sokvag))
next
10 svar · 257 visningar · startad av antar
kan nån hjälpa mig och fixa denna kod?
dim sokvag
sokvag = split(request.form("tabort"),",")
for i =1 to sokvag.count
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile(Server.MapPath("bilder/"& sokvag))
next
nu kommer koden:
dim sokvag
sokvag = split(request.form("tabort"),",")
for i = 0 to UBound(sokvag)
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
objFSO.DeleteFile(Server.MapPath("bilder/"& sokvag(i)))
next
.count finns inte i vbscript/asp. Den finns i .NET
cya,
PatrikB
är det så svårt och fixa så att man kan radera två bilder sammtidigt med fso???????
Det fungerar alltså när du bara kryssar i en "borttagningsruta"? (checkbox)
precis när jag kryssar i flera får jag felmeddelande!
Den här koden funkar klockrent:
<%
varFiles = Split(Request.Form("tabort"), ",")
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
For N = 0 TO UBound(varFiles)
strFile = varFiles(N)
objFSO.DeleteFile(Server.MapPath("/FSO/" & Trim(strFile)))
Response.Write "Deleted file: " & Server.MapPath("/FSO/" & Trim(strFile)) & "<br />"
Next
Set objFSO = Nothing
%>
Om du inte får den att funka så har du antingen ingen array eller oxå så är det fel på sökvägen, eller så har det med rättigheterna att göra, dvs om du får ta bort filen eller inte.
cya,
PatrikB
funkar perfekt asså