Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Bild script! [LÖST]

Postades av 2002-08-28 16:25:22 - Henrik Häggström, i forum asp - allmänt, Tråden har 9 Kommentarer och lästs av 575 personer

Jag har en sida som listar alla bilder i en mapp som innehåller tumnaglar som i sin tur leder till ett popupfönster med originalbilden när man klickar på den. Allt funkar bra och nu skulle jag vilja ha en funktion som
man kan klicka på nästa >> eller << bakåt och på så sätt navigera mellan alla bilder i den aktuella mappen...i popupfönstret.
Kan man lösa detta på ett smidigt sätt?


Svara

Sv: Bild script!

Postades av 2002-08-29 00:07:04 - Martin Sav

Hej jag antar att det du söker är Paging. Det finns en artikel om detta på pellesoft under länken "kurser & artiklar".


Svara

Sv: Bild script!

Postades av 2002-08-29 09:30:01 - Henrik Häggström

Kan man loopa sig igenom alla filer i en mapp och sen stoppa alla dessa filnamn i en variabel som separeras med tex "," för att sedan ta ut varje enskild fil så att när man väljer tex den 5:e filen så kan man stega på fallande och stigande inom denna variabels filer?
Array... men jag får inte till det...






Svara

Sv: Bild script!

Postades av 2002-08-30 12:48:20 - Göran Hansson

Gör en sökning på paging här på forumet!
Och ta en titt på detta. Kan kanske vara till lite hjälp:

http://www.asp101.com/samples/dir_list.asp
http://www.asp101.com/samples/db_paging.asp


Svara

Sv: Bild script!

Postades av 2002-08-30 15:28:33 - Henrik Häggström

Tack för tipset men jag är nog ute efter en Array som lagrar alla värden och sen kunna ta ut det man vill åt ... men jag får inte till det riktigt.


Svara

Lösning

Postades av 2002-08-30 18:32:33 - Oskar Johansson

Lösningen:

<%
dim strPath
strPath = server.mappath("images\") 'images är katalogen med BARA bilder
dim objFolder, objFiles, objSystem
set objSystem = createobject("Scripting.FileSystemObject")
set objFolder = objSystem.GetFolder(strPath)
set objFiles = objFolder.Files

i = -1
for each f in objFiles
i = i + 1
next
dim n

n = request.querystring("picture")

n = cint(n)

if (isnumeric(n)) then
if (n >= 0 AND n <= i) then
else
n=0
end if
else
n=0
end if


z = 0
for each f in objFiles
if (z = n) then
bild = "images/" & f.name
exit for
end if
z = z + 1
next



x = request.servervariables("SCRIPT_NAME")

if (n=i) then
nextl=x & "?picture=0"
else
nextl=x & "?picture=" & (n + 1)
end if

if (n=0) then
prevl=x & "?picture=" & i
else
prevl=x & "?picture=" & (n - 1)
end if


%>
<html>
<head>
<title>
<%=bild%>
</title>
</head>
<body>
<img src="<%=bild%>" height="200" width="200"><br>
Prev.||Next
</body>
</html>


Svara

Sv: Lösning

Postades av 2002-09-02 11:19:31 - Henrik Häggström

Tack för detta! funkar jättebra.

En fråga har jag angående Arrayer?

Om man har ett antal saker i en array och vill skriva ut tex den tredje i denna.

skiver man så här ungeför då??

Response.write Min Array(3) eller hur kan man få ut just detta värde ur Arrayen??

//HH


Svara

Sv: Lösning

Postades av 2002-09-04 13:52:08 - Henrik Häggström

Är det nån som har några tips!


Svara

Sv: Lösning

Postades av 2002-09-06 10:51:44 - Anders Moldin

Prövar du själv?

Mvh
Molle


Svara

Sv: Lösning

Postades av 2002-09-06 13:09:15 - Henrik Häggström

Ja, med Server.CreateObject("Scripting.Dictionary") funkar det utmärkt.
//HH


Svara

Nyligen

  • 08:28 Butiksskyltar: Hur upplever utbude
  • 22:31 Slappna av
  • 19:55 kick-off med fokus på hälsa?
  • 19:53 kick-off med fokus på hälsa?
  • 16:24 Föreslå en skönhetsklinik online
  • 16:23 Föreslå en skönhetsklinik online
  • 18:42 Hvor finder man håndlavede lamper
  • 18:41 Hvor finder man håndlavede lamper

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 570 817
27 960
271 761
7 708
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies