dim x as integer for x = 1 to 10 if filnavnIB" & x & " <> "" then myarrayIB" & x & " = split(filnavnIB" & x & ","\") dbfilnavnokIB" & x & " = myarrayIB" & x & "(ubound(myarrayIB" & x & ")) end if x=x+1 next
dim x as integer for x = 1 to 10 if filnavnIB & x <> "" then myarrayIB & x = split(filnavnIB" & x & ","\") dbfilnavnokIB" & x & " = myarrayIB" & x & "(ubound(myarrayIB" & x & ")) end if x=x+1 next
for x = 1 to 10 if filnavnIB & x <> "" then myarrayIB & x = split(filnavnIB" & x & ","\") dbfilnavnokIB" & x & " = myarrayIB" & x & "(ubound(myarrayIB" & x & ")) end if x=x+1 next
for x = 1 to 10 if myarrayIB(x) <> "" then myarrayIB(x) = split(filnavnIB(x),"\") dbfilnavnokIB(x) = myarrayIB(x)(ubound(myarrayIB(x))) end if x=x+1 next
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.