/ Forside/ Teknologi / Udvikling / ASP / Spørgsmål
Login
Glemt dit kodeord?
Brugernavn

Kodeord


Reklame
Top 10 brugere
ASP
#NavnPoint
smorch 9259
Harlekin 1866
molokyle 1040
Steffanst.. 758
gandalf 657
smilly 564
gibson 560
cumano 530
MouseKeep.. 480
10  Random 410
ikke vise .asp filer
Fra : hubi
Vist : 794 gange
100 point
Dato : 21-07-07 13:54

hey har lige et galleri i asp som der viser alle billeder i den mappe som galleriet ligger i men desværre viser galleriet også den asp fil nogle der ved hvordan jeg gør så den ikke viser asp filer koden er her:

Kode
<%
billedeSti = "/album/skitur/"
antalBillederPrSide = 9
antalBillederPrRekke = 3


if Request.QueryString("billede") = "" then
start = request.querystring("start")
if start = "" then start = 0

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(server.mappath(billedeSti))

Set fc = f.Files
For Each billed in fc
arrayBuild = arrayBuild & billed.name & "|"
next
arrayBuild = left(arrayBuild, (len(arrayBuild) - 1))

myArray = Split(arrayBuild, "|")

Antalsider = int(ubound(myarray) / antalBillederPrSide)
antal = 0
for i = start to (start + antalBillederPrSide-1)
if not i > ubound(myarray) then
if antal = 0 then Response.Write "<TR>"
%>
<td width="<%=Int(antalBillederPrRekke/100)%>"><p align="center">
<a href="?billede=<%=billedeSti%>/<%=myArray(i)%>">
<img SRC="<%=billedeSti%>/<%=myArray(i)%>" border="1" color="black" WIDTH="116" HEIGHT="82">
</a></td>
<%
else
nesteside = 1
end if

antal = antal + 1
if antal = 3 then
Response.Write "</TR>"
antal = 0
end if
next
if antal > 0 then Response.Write "</TR>"
%>
</table>
<center>
<%
if start <> 0 then
response.write "<a href=""?start=" & (start - 6) & """>Forrige</a>"
end if
response.write("&nbsp;")
if nesteside <> 1 then
response.write "<a href=""?start=" & (start + 6) & """>Næste</a>"
end if
%>
</center>
<%
else
'Vis billedet
%>
<tr><td align="center">
<img SRC="<%=Request.QueryString("billede")%>" border="1" width="506" height="462">
<p align="center"><a href="javascript:history.back();">Tilbage</a></p>
</td>
</tr>
</table>
<%
end if %>


//jesper

 
 
Kommentar
Fra : smorch


Dato : 21-07-07 14:09

For Each billed in fc

if billed.type="JPEG Image" or thing.type="GIF Image" then

arrayBuild = arrayBuild & billed.name & "|"

end if

next


Det skulle gøre det, hvis det er gif og jpg billeder du vil se

Mvh

sMorch

Kommentar
Fra : hubi


Dato : 21-07-07 14:26

jeg får fejlen: Et objekt er obligatorisk: ''

i linien

if billed.type="JPEG Image" or thing.type="GIF Image" then

Kommentar
Fra : smorch


Dato : 21-07-07 14:44

thing skal skiftes ud med billed i

if billed.type="JPEG Image" or thing.type="GIF Image" then

Kommentar
Fra : hubi


Dato : 21-07-07 14:54

det altså ikk for at være besværlig men nu får jeg en fejl der hedder:
Procedurekaldet eller argumentet er ugyldigt: 'left'

i linien:
arrayBuild = left(arrayBuild, (len(arrayBuild) - 1))

det er linien lige efter next


Kommentar
Fra : smorch


Dato : 21-07-07 15:18

Set fc = f.Files
For Each billed in fc
arrayBuild = arrayBuild & billed.name & "|"
next
For Each thing in f.files

   if thing.type="JPEG Image" or thing.type="GIF Image" then
   
      arrayBuild = arrayBuild & thing.name & "|"
   
   end if

next

Kommentar
Fra : hubi


Dato : 21-07-07 15:40

der kommer ingen fejl nu så der er jo rigtig godt, men derimod så viser en stadig det "billede" for den asp fil der ligger i mappen :(

Kommentar
Fra : hubi


Dato : 21-07-07 15:41

her er koden lige med de ændringer

Kode
<%
billedeSti = "/album/skitur/"
antalBillederPrSide = 9
antalBillederPrRekke = 3


if Request.QueryString("billede") = "" then
start = request.querystring("start")
if start = "" then start = 0

Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder(server.mappath(billedeSti))

Set fc = f.Files
For Each billed in fc
arrayBuild = arrayBuild & billed.name & "|"
next
For Each billed in f.files

if billed.type="JPEG" or billed.type="GIF" then

arrayBuild = arrayBuild & billed.name & "|"

end if

next
arrayBuild = left(arrayBuild, (len(arrayBuild) - 1))

myArray = Split(arrayBuild, "|")

Antalsider = int(ubound(myarray) / antalBillederPrSide)
antal = 0
for i = start to (start + antalBillederPrSide-1)
if not i > ubound(myarray) then
if antal = 0 then Response.Write "<TR>"
%>
<td width="<%=Int(antalBillederPrRekke/100)%>"><p align="center">
<a href="?billede=<%=billedeSti%>/<%=myArray(i)%>">
<img SRC="<%=billedeSti%>/<%=myArray(i)%>" border="1" color="black" WIDTH="116" HEIGHT="82">
</a></td>
<%
else
nesteside = 1
end if

antal = antal + 1
if antal = 3 then
Response.Write "</TR>"
antal = 0
end if
next
if antal > 0 then Response.Write "</TR>"
%>
</table>
<center>
<%
if start <> 0 then
response.write "<a href=""?start=" & (start - 6) & """>Forrige</a>"
end if
response.write("&nbsp;")
if nesteside <> 1 then
response.write "<a href=""?start=" & (start + 6) & """>Næste</a>"
end if
%>
</center>
<%
else
'Vis billedet
%>
<tr><td align="center">
<img SRC="<%=Request.QueryString("billede")%>" border="1" width="506" height="462">
<p align="center"><a href="javascript:history.back();">Tilbage</a></p>
</td>
</tr>
</table>
<%
end if %>


Kommentar
Fra : smorch


Dato : 21-07-07 15:44

Prøv lige dette:

For Each thing in f.files

if thing.type="JPEG Image" or thing.type="GIF Image" then
response.write(thing.type & "<br>")
arrayBuild = arrayBuild & thing.name & "|"

end if

next


Og find så ud af hvad asp filens ´´type´´ er - kopier det ind i

if thing.type<>"ASP FILENS TYPE" then

i stedet for

if thing.type="JPEG Image" or thing.type="GIF Image" then


og prøv igen.

Accepteret svar
Fra : smorch

Modtaget 100 point
Dato : 21-07-07 16:05

Og - jeg Dumkopffffffff - du kunne jo bare lægge asp filen et helt andet sted end i album/skitur mappen, da du jo bruger

billedeSti = "/album/skitur/"

og så sørge for, at der ikke er andet end billeder i /album/skitur/ mappen

Mvh

sMorch

Kommentar
Fra : hubi


Dato : 21-07-07 16:05

det er sq en besværlig kode hehe den vil bare ingen ting den viser stadig det "billede" plus at den skriver "jpeg-billede" så mange gange som der er billeder i mappen

Kommentar
Fra : hubi


Dato : 21-07-07 16:12

den mlighed har jeg også tænkt på men jeg reger med at jeg får lidt flere ferie billeder og dermed flere albums og så skal jeg jo ha en mappe med asp filen som der peger på album mappen

og når jeg har et nyt album så skal jeg lave en ny mappe lægge asp filen og pege den på det album den skal vise det ser jeg lidt som en besværlig metode

jeg skal hele tiden have en mappe med gallery.asp og en mappe med billeder da der ikke er 2 filer der kan hedde det samme ved ikk lige om jeg misforstår noget??

Kommentar
Fra : smorch


Dato : 21-07-07 16:19

kan du jo bare lægge en variabel ind i gallery.asp hvor du bestemmer mappenavnet


billedeSti = request.querystring("mappe")
if billedeSti = "" then billedeSti = "/album/skitur/"

og så sørge for at billedestien starter og slutter med / fx.: /mappenavn/


sMorch

Godkendelse af svar
Fra : hubi


Dato : 22-07-07 13:17

Tak for svaret smorch. sorry jeg først svarer nu men tiden løb sq fra mig i går, det ikk sån når man interessere sig for det hehe...

Kommentar
Fra : smorch


Dato : 22-07-07 13:23

Kender det - Jeg har også meget ild i hjernen

Sæl Tak

og ilm

sMorch

Du har følgende muligheder
Eftersom du ikke er logget ind i systemet, kan du ikke skrive et indlæg til dette spørgsmål.

Hvis du ikke allerede er registreret, kan du gratis blive medlem, ved at trykke på "Bliv medlem" ude i menuen.
Søg
Reklame
Statistik
Spørgsmål : 177558
Tips : 31968
Nyheder : 719565
Indlæg : 6408925
Brugere : 218888

Månedens bedste
Årets bedste
Sidste års bedste