Några ideér hur jag sak lösa detta?

4 svar · 318 visningar · startad av cyeclone 29 juli 2005

cyecloneMedlem sedan dec. 2004143 inlägg

Frågan29 juli 2005 12:31#1

Hejsan!
Jag sitter och håller på med en cup hemsida, nu har jag kommit till schemat. Schemat kommer att se ut så här: http://www.bjerkenius.se/cup/bilder/schema8.gif
Jag skulle behöva lite hjälp med att lista ut alla lagen som ska vara med. Tänkte mig något sånt här:

    i=0
	Do Until RecSet.EOF 
	
	i=i+1
	
	team+i=RecSet("irckanal")
	teampoints+i=RecSet("points1")
	
	RecSet.MoveNext
	Loop
	RecSet.Close

Sedan bara skriva ut de oilka variablerna i rutorna..
Någon som har något bättre förslag, eller har lust att hjälpa mig så att allt blir rätt? Får just nu felmeddelandet:

Microsoft VBScript runtime error '800a000d' 

Type mismatch: 'team'

Mvh,
Rickard

GuffaMedlem sedan juni 2004533 inlägg

29 juli 2005 12:50#2

Jag tror att du är ute efter en array:

Dim team(41) '42 poster
Dim teampoints(41)

i=0
Do Until RecSet.EOF 
	
	team(i)=RecSet("irckanal")
	teampoints(i)=RecSet("points1")

	i=i+1
	
	RecSet.MoveNext
Loop
RecSet.Close

cyecloneMedlem sedan dec. 2004143 inlägg

29 juli 2005 12:58#3

Jo det kan ha varit det jag är ute efter :)
Men din kod fungerar inte, nu kommer det inget felmeddelande men det visas heller ingen information. Det skrivs inte ut nått, har koden <%Response.Write team1 %>. PS ändrade i=0 TILL i=1.

HELA KODEN:

Dim team(7) '8 poster
Dim teampoints(7)

i=1
Do Until RecSet.EOF 
	
	team(i)=RecSet("irckanal")
	teampoints(i)=RecSet("points1")

	i=i+1
	
	RecSet.MoveNext
Loop
RecSet.Close

Antar att jag gjorde rätt med dim team(7) där?

Någon som vet vad felet är nu?

flexishMedlem sedan jan. 200548 inlägg

29 juli 2005 13:17#4

När du skriver ut en specifik array skall numret vara inom parentes

<%= team(1) %>

GuffaMedlem sedan juni 2004533 inlägg

29 juli 2005 17:08#5

cyeclone skrev:

ändrade i=0 TILL i=1.

Ändra tillbaka. Index för en array börjar alltid på noll i VBScript. Dina åtta poster är alltså numrerade ifrån noll till sju.