Avatar billede david_dollas Nybegynder
14. marts 2001 - 10:18 Der er 7 kommentarer og
1 løsning

dinamisk variabel...

Hvordan laver noget alla det her:

while not rs.eof
antal=antal + 1

ost(antal) = array(rs(\"artid\"),rs(\"temaid\"),rs(\"subid1\"),rs(\"subid2\"),rs(\"janej\"),rs(\"svar\"),rs(\"tekst\"))



response.write ost2

rs.movenext
wend


Avatar billede nute Nybegynder
14. marts 2001 - 10:31 #1
som jeg kan forstå, så skal du bruke en todimensjonell tabell:

<%
Dim ost
Dim antal

while not rs.eof
  Dim array(7)
  array(0) = rs(\"artid\")
  array(1) = rs(\"temaid\")
  array(2) = rs(\"subid1\")
  array(3) = rs(\"subid2\")
  array(4) = rs(\"janej\")
  array(5) = rs(\"svar\")
  array(6) = rs(\"tekst\")
  ost(antal) = array
  antal = antal + 1
  rs.MoveNext
wend
%>

/nute
Avatar billede david_dollas Nybegynder
14. marts 2001 - 10:34 #2
Sådan kunne man godt gøre.

Hvis jeg nu skal ned og checke om array4 i ost3 = 5 hvordan skal det så se ud?
Avatar billede nute Nybegynder
14. marts 2001 - 10:43 #3
jeg har faktisk aldri gjort dette før selv, men du kan kanskje gjøre sånn:

<%
Dim newArray
newArray = ost(3)
if( newArray(4) == 5 ) then
  response.write \":-D\"
else
  response.write \":-(\"
end if
%>

/nute
Avatar billede david_dollas Nybegynder
14. marts 2001 - 10:46 #4
Hmmm, næææ, jeg for en : Microsoft VBScript runtime error \'800a000d\' fejl.

Hvordan kunne man ellers gøre...
Avatar billede david_dollas Nybegynder
14. marts 2001 - 10:56 #5
Hvorfor virker dette ikke



while not rs.eof
antal=antal + 1

box(antal) = array(rs(\"artid\"),rs(\"temaid\"),rs(\"subid1\"),rs(\"subid2\"),rs(\"janej\"),rs(\"svar\"),rs(\"tekst\"))


rs.movenext
wend

response.write box(1)(6)&\"<br>\"
Avatar billede nute Nybegynder
14. marts 2001 - 11:16 #6
jeg kjenner desverre ikke så mye til Arrays i ASP...mitt tips er å lese dokumentasjonen:

http://www.activeserverpages.dk/iishelp/vbscript/htm/vsfctArray.htm

dette her oppretter iallefall dine arrays (skulle jeg tro)...

Dim ost()
Dim innerArray()
antal = 0

while not rs.EOF
    ReDim preserve ost(i+1)
  ReDim innerArray(7)
  innerArray(0) = \"1\"
  innerArray(1) = \"2\"
  innerArray(2) = \"3\"
  innerArray(3) = \"4\"
  innerArray(4) = \"5\"
  innerArray(5) = \"6\"
  innerArray(6) = \"7\"
  ost(i) = innerArray
wend

men du må leke deg litt med arrays...jeg har desverre ikke tid til å se mer på det...

/nute
Avatar billede david_dollas Nybegynder
14. marts 2001 - 11:17 #7
okay, takker, og du for dine point
Avatar billede nute Nybegynder
14. marts 2001 - 11:19 #8
takk for det....
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