webForumDet fria alternativet

Slumpgenerator

0 svar · 603 visningar · startad av saw

sawMedlem sedan mars 20011 880 inlägg
#1

Jag är osäker på vilket forum som är rätt, men jag chansar här.
Jag har en slumpgenerator, som slumpar ut 10 st unika bilder.
Det jag ville ha hjälp med är:
1 Ser mitt script effektivt ut?
2 Som jag nu har det, så har jag på flera stället skrivit in 10 som
max antal bilder. Hur gör jag så att jag ändra till en variabel, och
bara skriver in antalet på ett ställe ( Jag har försökt med dom
iAntal = 10, men då blir det fel med Dim Urval(iAntal)

Så här ser en del av scriptet ut:

'jag skriver inte ut SQL:en, den är för stor och fungerar bra
Dim arrData ' All data
Dim minArr  ' minsta id
Dim maxArr  ' störrsta id

arrData = RS.GetRows
RS.close
Set RS = Nothing

minArr = int(Lbound(arrData, 2))
maxArr = int(Ubound(arrData, 2))

Randomize
Dim Urval(10)  ' Antal hittills utvalda
Antal_valda = 0  ' Håll på tills vi valt 10 stycken
 While Antal_valda < 10          ' Välj ett tal
 ' Slumptal = Int(Rnd * 100) + 1
   Slumptal = Int(Rnd * maxArr) + 1
 ' Finns talet redan?
Finns_redan = false
For i = 1 to Antal_valda
If Slumptal = Urval(i) Then
' Talet fanns redan
  Finns_redan = true
  Exit For
  End If
  Next

' Om talet inte fanns, lägg det i Urval'
  If Not Finns_redan Then
  Antal_valda = Antal_valda + 1
  Urval(Antal_valda) = Slumptal
  End If
  Wend
Session("Urval") =	Urval(10)
%>
<script language="JavaScript1.2">

var variableslide=new Array()

//variableslide[x]=["path to image", "OPTIONAL link for 
image", "OPTIONAL text description (supports HTML tags)"]

variableslide[0]=['img/<%=arrData(3,Urval(0))%>', '', 
'<DIV style="position:absolute;bottom: -10%;
left: 0%; width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[1/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(0))%></B> &#34;
<%=arrData(4,Urval(0))%>&#34; - <%=arrData(6,Urval(0))%>&nbsp; 
<%=arrData(5,Urval(0))%></DIV>']

variableslide[1]=['img/<%=arrData(3,Urval(1))%>', '',
 '<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[2/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(1))%></B> &#34;
<%=arrData(4,Urval(1))%>&#34; - <%=arrData(6,Urval(1))%>&nbsp;
 <%=arrData(5,Urval(1))%></DIV>']

variableslide[2]=['img/<%=arrData(3,Urval(2))%>', '',
 '<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[3/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(2))%></B> &#34;<%=arrData(4,Urval(2))%>&#34; - 
<%=arrData(6,Urval(2))%>&nbsp; <%=arrData(5,Urval(2))%></DIV>']

variableslide[3]=['img/<%=arrData(3,Urval(3))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[4/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(3))%></B> &#34;<%=arrData(4,Urval(3))%>&#34; - 
<%=arrData(6,Urval(3))%>&nbsp; <%=arrData(5,Urval(3))%></DIV>']

variableslide[4]=['img/<%=arrData(3,Urval(4))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[5/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(4))%></B> &#34;<%=arrData(4,Urval(4))%>&#34; - 
<%=arrData(6,Urval(4))%>&nbsp; <%=arrData(5,Urval(4))%></DIV>']

variableslide[5]=['img/<%=arrData(3,Urval(5))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[6/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(5))%></B> &#34;<%=arrData(4,Urval(5))%>&#34; - 
<%=arrData(6,Urval(5))%>&nbsp; <%=arrData(5,Urval(5))%></DIV>']

variableslide[6]=['img/<%=arrData(3,Urval(6))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[7/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(6))%></B> &#34;<%=arrData(4,Urval(6))%>&#34; - 
<%=arrData(6,Urval(6))%>&nbsp; <%=arrData(5,Urval(6))%></DIV>']

variableslide[7]=['img/<%=arrData(3,Urval(7))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[8/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(7))%></B> &#34;<%=arrData(4,Urval(7))%>&#34; -
 <%=arrData(6,Urval(7))%>&nbsp; <%=arrData(5,Urval(7))%></DIV>']

variableslide[8]=['img/<%=arrData(3,Urval(8))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[9/10] </FONT> Konstnär: <B>
<%=arrData(1,Urval(8))%></B> &#34;<%=arrData(4,Urval(8))%>&#34; - 
<%=arrData(6,Urval(8))%>&nbsp; <%=arrData(5,Urval(8))%></DIV>']

variableslide[9]=['img/<%=arrData(3,Urval(9))%>', '', 
'<DIV style="position:absolute;bottom: -10%;left: 0%;
width=600px;" Class="bildTitel"><BR>
<FONT COLOR="#0000FF">[10/10]</FONT> Konstnär: <B>
<%=arrData(1,Urval(9))%></B> &#34;<%=arrData(4,Urval(9))%>&#34; - 
<%=arrData(6,Urval(9))%>&nbsp; <%=arrData(5,Urval(9))%></DIV>']

Som ni ser så återkommer variableslide[9] tio gånger hur gör jag en for-slinga (i javascript) för att få ner kodmängden?

Tacksam för all hjälp och förslag:OO

130 ms totalt · 3 externa anrop · v20260731065814-full.30151723
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
128 ms — hämta tråd, inlägg och bilagor (db)