Generering af tabel
Kære eksperter,Jeg skal starte med at side at jeg bestemt ikke er kendt i Asp-kodning. Sagen er den, at jeg er ved at lave en side til en mindre kunde som vil udstille produkter gennem et billede, en produktbeskrivelse, navnet på designeren og en beskrivelse.
Kunden ønsker til alles store overraskelse selv at kunne udskifte billeder og dertilhørende tekst relativt ofte.
Jeg har fundet det efterhånden velkendte komponentuafhængige ”Upload pure asp”-script som jeg ser som vældigt egnet til formålet.
Da jeg er en klovn til database ville jeg anvende nedenstående kode til at vise billederne. Den viser alle billedfiler i en respektiv mappe:
<%
ImageDir = \"/images/\" \' Mappen med filerne
Set objFS = CreateObject(\"Scripting.FileSystemObject\")
Set objFolder = objFS.GetFolder(Server.MapPath(ImageDir))
Set objFiles = objFolder.Files
intPage = Request.Querystring(\"page\")
If isNumeric(intPage) = False Or intPage < 1 Then
intPage = 1
End If
intPageSize = 3 \' Antal filer på hver side
intImgCount = objFiles.Count
intPageCount = -Int(-(intImgCount/intPageSize))
Response.Write \"<p><strong>\" & intImgCount & \" Billeder - \"
Response.Write \"viser side \" & intPage & \" af \" & intPageCount & \":</strong></p>\"
For Each Image In objFiles
intFile = intFile +1
If (intFile >= ((intPage-1)*intPageSize)+1) And (intFile =< (intPageSize*intPage)) Then
Response.Write \"<p><img src=\'\" & ImageDir & Image.Name & \"\' /></p>\"
End If
Next
strScriptName = Request.Servervariables(\"ScriptName\")
Response.Write \"<p>Gå til side \"
For i = 1 To intPageCount
Response.Write \"<a href=\" & strScriptName & \"?page=\" & i & \">\" & i & \"</a> \"
Next
Response.Write \"</p>\"
Set objFS = Nothing
%>
Det jeg vil spørge om er: 1) Hvordan (hvis muligt) viser jeg i stedet billederne i en genereret tabel frem for at der blot indsættes <p></p> efter hvert billede?
2) Hvordan (hvis muligt) viser jeg på samme måde en tekstfil; *.doc eller *.txt i samme tabel?
3) Hvordan kan jeg indflette javascriptet (<a href=\"java script:;\" onClick=\"window.open\".... bla,bla,bla), på hvert billed, så der samme tekst + billed vises i et vindue for sig når der klikkes på billedet?
Er der nogen, der kan hjælpe mig? :)
