Avatar billede frank74 Nybegynder
28. oktober 2006 - 15:24 Der er 6 kommentarer og
1 løsning

Vælg alle!

Hejsa.
Jeg har et lille script der viser en række filnavne (Billedfiler) og ud hvert filnavn er der en checkbox. I bunden er knappen "vis billede(r)"...
Jeg magler en knap hvormed jeg kan enten vælge alle checkboxe eller vise alle billeder. Nogen der kan hjælpe??
Avatar billede hiks Nybegynder
28. oktober 2006 - 15:30 #1
hej

første del vil jeg tro:

http://www.eksperten.dk/spm/510817

/hiks
Avatar billede tjaz Nybegynder
28. oktober 2006 - 17:56 #2
Avatar billede frank74 Nybegynder
29. oktober 2006 - 15:31 #3
Ok, det kunne jeg ikke bruge til noget specielt. Mit script kommer her som det ser ud nu. ->
<%
' Indsæt mappens navn her:
path = "Billeder"
%>
<html>
<body>
<% if Request.Form("file") = "" then%>
<form method="post" action="<%="" & Request.ServerVariables("SCRIPT_NAME") & ""%>">
<%
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFolder(server.mappath(path))
for each file in f.files
name = file.name
ext = lcase(right(name,3))
    if ext = "jpg" then
%>
<input type="checkbox" name="file" value="<%=name%>"> - <%=Left(name, Len(name)-4)%>
<br>
<%
    end if
next
set f=nothing
set fs=nothing
%>
<input type="reset" value="Nulstil" name="Nulstil">
<input type="submit" value="Se billeder" name="submit">
<form>

<%
else
file = replace(Request.Form("file"),", ",",")
fileArr = split(file,",")
for i=0 to ubound(fileArr)
    if fileArr(i) <> "" then
%>
<img src="<%="" & path & "/" & fileArr(i) & ""%>" border="0" height="288" width="200">

<%
    end if
next
end if
%>
</body>
</html>
Avatar billede hiks Nybegynder
29. oktober 2006 - 16:13 #4
men det er jo lige det du skal bruge. :o)
<%
' Indsæt mappens navn her:
path = "Billeder"
%>
<html>
<head>

<script type="text/javascript">
function checkAll(){
  var c = document.getElementsByTagName('INPUT');
  for(i=0;c.length>i;i++){
    if(c[i].type=='checkbox'&&c[i].attribut=='værdi')c[i].checked=true;
  }
}
</script>

</head>
<body>
<% if Request.Form("file") = "" then%>
<form method="post" action="<%="" & Request.ServerVariables("SCRIPT_NAME") & ""%>">
<%
dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.GetFolder(server.mappath(path))
for each file in f.files
name = file.name
ext = lcase(right(name,3))
    if ext = "jpg" then
%>
<input type="checkbox" name="file" value="<%=name%>"> - <%=Left(name, Len(name)-4)%>
<br>
<%
    end if
next
set f=nothing
set fs=nothing
%>
<input type="reset" value="Nulstil" name="Nulstil" OnClick="java script: CheckAll();">
<input type="submit" value="Se billeder" name="submit">
<form>

<%
else
file = replace(Request.Form("file"),", ",",")
fileArr = split(file,",")
for i=0 to ubound(fileArr)
    if fileArr(i) <> "" then
%>
<img src="<%="" & path & "/" & fileArr(i) & ""%>" border="0" height="288" width="200">

<%
    end if
next
end if
%>
</body>
</html>

/hiks
Avatar billede frank74 Nybegynder
29. oktober 2006 - 22:03 #5
Hmmm. Det virker altså ikke...
Avatar billede ldanielsen Nybegynder
30. oktober 2006 - 17:15 #6
java script: CheckAll();">  skal være java script: checkAll();">
Avatar billede frank74 Nybegynder
31. oktober 2006 - 18:45 #7
ldanielsen -> Virker heller ikke...
Hvorfor er det lige at min "reset" knap er lavet om?? Det har da aldrig været meningen... Der skal være en "reset" og en "submit" knap som der altid har været. Der skal så også være en ny knap der hedder "Vælg alle"...
Avatar billede Ny bruger Nybegynder

Din løsning...

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester