Om du ändrar till följande:
<table style="display: inline">
kommer tabellerna att visas flödande, och då också att hamna bredvid varandra.
21 svar · 319 visningar · startad av Ralle
Jag behöver hjälp med att få matcherna till vänster, som dom är nu, tabellen vill jag ha till höger om matcherna.
Så här ser det ut nu:
http://member.webforum.nu/5070/tabell1.jpg
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">förl.</td>
</tr></table>
<%ElseIf rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">str</td></tr></table><%
Else%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td></tr></table><%
End If%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td>(</td>
<td width="1"><%=rstResultat("HemmaPeriod1Mal")%></td>
<td> - </td>
<td width="1"><%=rstResultat("BortaPeriod1Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod2Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod2Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod3Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod3Mal")%></td><%
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%><td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<%
End If
If rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod5Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod5Mal")%></td><%
End If%>
<td>)</td>
<td>
</tr></table><%
Else
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">förl.</td>
</tr></table>
<%ElseIf rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">str</td></tr></table><%
Else%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
</tr></table><%
End If%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td>(</td>
<td width="1"><%=rstResultat("HemmaPeriod1Mal")%></td>
<td> - </td>
<td width="1"><%=rstResultat("BortaPeriod1Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod2Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod2Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod3Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod3Mal")%></td><%
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%><td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<%
End If
If rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod5Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod5Mal")%></td><%
End If%>
<td>)</td>
<td>
</tr></table><%
End If
rstResultat.MoveNext
Loop
End If
If Tabell.EOF Then
Response.Write "Fel"
Else
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="105"></td>
<td width="30"></td>
<td width="50">Vunna</td>
<td width="50">Oavgj.</td>
<td width="55">Förl/Str</td>
<td width="60">Förluster</td>
<td width="50">Gjorda</td>
<td width="35">Insl.</td>
<td width="55">Målsk.</td>
<td width="40">Poäng</td>
</tr></td></table><%
Do Until Tabell.EOF%>
<table cellpadding=0 cellspacing="0" border="0">
<tr><td width="105"><%=Tabell("Lag")%></td>
<td width="30"><p align='right'><%=Tabell("Matcher")%></td>
<td width="40"><p align='right'><%=Tabell("Vinster")%></td>
<td width="40"><p align='right'><%=Tabell("Oavgjorda")%></td>
<td width="45"><p align='right'><%=Tabell("ForlStr")%></td>
<td width="60"><p align='right'><%=Tabell("Forluster")%></td>
<td width="60"><p align='right'><%=Tabell("Gjorda")%></td>
<td> - </td>
<td width="30"><p align='right'><%=Tabell("Inslappta")%></td><%
IF Tabell("Malskillnad") < 0 Then%>
<td width="50"><p align='right'><font color=Red><%=Tabell("Malskillnad")%></p></td><%
Else%>
<td width="50"><p align='right'><%=Tabell("Malskillnad")%></p></td><%
End If%>
<td width="55"><p align='right'><%=Tabell("Poang")%></td>
</tr></td></table><%
Tabell.MoveNext
Loop
End If
Om du ändrar till följande:
<table style="display: inline">
kommer tabellerna att visas flödande, och då också att hamna bredvid varandra.
Nej, du lägger bara till det.
<table cellpadding="0" cellspacing="0" border="0" style="display: inline;">
Den finns ju överst, första inlägget.
Den och lika mycket ASP.... ;)
Kan du inte lägga resultaten i en kolum och tabellen i en annan?
<table cellpadding="0" cellspacing="0">
<tr>
<td>Resultat</td>
<td>Serietabell</td>
</tr>
</table>
Hujedamej vilket kodschabrak. Du har inte funderat på att rensa lite i den där härligheten?
Spontant ser det ut som om det är mycket upprepningar i koden.
Jo, jag tycker det också.
Jag försökte rensa den delen som skriver matcherna, men då kommer bara första matchen upp för varje omgång. Det är säkert jag som gjort något galet, men det fungerar o då orkade jag inte ta tag i det, eftersom jag inte förstår hur jag ska göra.
Nej, samma sak fortfarande.
Hmm...
Om du lägger ihop din kod från ursprungsfrågan med asps förslag får du någonting i den här stilen:
<table cellpadding="0" cellspacing="0" border="1">
<tr>
<td>
<!-- Resultat -->
<%
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">förl.</td>
</tr></table>
<%ElseIf rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">str</td></tr></table><%
Else%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td></tr></table><%
End If%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td>(</td>
<td width="1"><%=rstResultat("HemmaPeriod1Mal")%></td>
<td> - </td>
<td width="1"><%=rstResultat("BortaPeriod1Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod2Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod2Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod3Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod3Mal")%></td><%
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%><td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<%
End If
If rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod5Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod5Mal")%></td><%
End If%>
<td> )</td>
<td>
</tr></table><%
Else
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">förl.</td>
</tr></table>
<%ElseIf rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
<td width="2"></td>
<td width="1">str</td></tr></table><%
Else%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="100"><%=rstResultat("hemma")%></td>
<td> - </td>
<td width="100"><%=rstResultat("borta")%></td>
<td><%=HemmaTotal%></td>
<td> - </td>
<td><%=BortaTotal%></td>
</tr></table><%
End If%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td>(</td>
<td width="1"><%=rstResultat("HemmaPeriod1Mal")%></td>
<td> - </td>
<td width="1"><%=rstResultat("BortaPeriod1Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod2Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod2Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod3Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod3Mal")%></td><%
If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then
%><td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<%
End If
If rstResultat("HemmaPeriod5Mal") > 0 OR rstResultat("BortaPeriod5Mal") > 0 Then
%>
<td>, </td>
<td><%=rstResultat("HemmaPeriod4Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod4Mal")%></td>
<td>, </td>
<td><%=rstResultat("HemmaPeriod5Mal")%></td>
<td> - </td>
<td><%=rstResultat("BortaPeriod5Mal")%></td><%
End If%>
<td> )</td>
<td>
</tr></table><%
End If
rstResultat.MoveNext
Loop
End If
%>
<!-- Slut Resultat-->
</td>
<td>
<!-- Tabellställning -->
<%
If Tabell.EOF Then
Response.Write "Fel"
Else
%>
<table cellpadding=0 cellspacing="0" border="0">
<tr>
<td width="105"></td>
<td width="30"></td>
<td width="50">Vunna</td>
<td width="50">Oavgj.</td>
<td width="55">Förl/Str</td>
<td width="60">Förluster</td>
<td width="50">Gjorda</td>
<td width="35">Insl.</td>
<td width="55">Målsk.</td>
<td width="40">Poäng</td>
</tr></td></table><%
Do Until Tabell.EOF%>
<table cellpadding=0 cellspacing="0" border="0">
<tr><td width="105"><%=Tabell("Lag")%></td>
<td width="30"><p align='right'><%=Tabell("Matcher")%></td>
<td width="40"><p align='right'><%=Tabell("Vinster")%></td>
<td width="40"><p align='right'><%=Tabell("Oavgjorda")%></td>
<td width="45"><p align='right'><%=Tabell("ForlStr")%></td>
<td width="60"><p align='right'><%=Tabell("Forluster")%></td>
<td width="60"><p align='right'><%=Tabell("Gjorda")%></td>
<td> - </td>
<td width="30"><p align='right'><%=Tabell("Inslappta")%></td><%
IF Tabell("Malskillnad") < 0 Then%>
<td width="50"><p align='right'><font color=Red><%=Tabell("Malskillnad")%></p></td><%
Else%>
<td width="50"><p align='right'><%=Tabell("Malskillnad")%></p></td><%
End If%>
<td width="55"><p align='right'><%=Tabell("Poang")%></td>
</tr></td></table><%
Tabell.MoveNext
Loop
End If
%>
<!-- slut tabellställning -->
</td>
</tr>
</table>
Blir inte det något i stil med det du tänkt dig?
Om inte - kan du lägga ut sidan på nätet nånstans och länka till den så att vi kan få se hela koden och på så sätt få möjlighet att komma med mer handfasta förslag - det är svårt att "köra med skygglappar" när det är såpass mycket ASP inblandat...
Tjusigt, nu ser det ut så här:
http://member.webforum.nu/5070/tabell3.jpg
Problemet blir när det finns flera datum, som du ser.
Koden ovanför ser ut så här:
If rstResultat.EOF Then
Response.Write "Databasen är tom"
Else%>
<p align='center'><font size='6'><u>Elitserietabell o matcher <%=Sasong2%> omgång <%=Omgang1%></u></font></p>
<%Do Until rstResultat.EOF
HemmaTotal = rstResultat("HemmaPeriod1Mal") + rstResultat("HemmaPeriod2Mal") + rstResultat("HemmaPeriod3Mal") + rstResultat("HemmaPeriod4Mal") + rstResultat("HemmaPeriod5Mal")
BortaTotal = rstResultat("BortaPeriod1Mal") + rstResultat("BortaPeriod2Mal") + rstResultat("BortaPeriod3Mal") + rstResultat("BortaPeriod4Mal") + rstResultat("BortaPeriod5Mal")
dag = Weekday(rstResultat("Datum"))
select case dag
case 1: dag = "Söndag"
case 2: dag = "Måndag"
case 3: dag = "Tisdag"
case 4: dag = "Onsdag"
case 5: dag = "Torsdag"
case 6: dag = "Fredag"
case 7: dag = "Lördag"
end select
If rstResultat("Datum") < Datum2 OR rstResultat("Datum") > Datum2 Then
Datum2 = rstResultat("Datum")
Datum1 = DatePart("d",Datum2)
Datum3 = DatePart("m",Datum2)
Response.Write "<BR>"
Response.Write dag &" "
Response.Write Datum1
Response.write "/"
Response.write Datum3
%>
<table cellpadding=0 cellspacing="0" border="1">
<tr>
<td><%
Jag provade att flytta upp koden ovanför, men fick bara felmeddelande.
Något tips kanske?
Hmm...
Om jag fattar dig rätt... (Svårt när man inte ser hela koden - samtidigt som jag är lite ringrostig på VBScript ;) )
Om du lägger in första delen av loopen "Do Until rstResultat.EOF"
som verkar generera resultatlistan nånting såhär i förra exemplet då?
...
...
[b]<!-- Resultat -->[/b]
<%Do Until rstResultat.EOF
HemmaTotal = rstResultat("HemmaPeriod1Mal") + rstResultat("HemmaPeriod2Mal") + rstResultat("HemmaPeriod3Mal") + rstResultat("HemmaPeriod4Mal") + rstResultat("HemmaPeriod5Mal")
BortaTotal = rstResultat("BortaPeriod1Mal") + rstResultat("BortaPeriod2Mal") + rstResultat("BortaPeriod3Mal") + rstResultat("BortaPeriod4Mal") + rstResultat("BortaPeriod5Mal")
dag = Weekday(rstResultat("Datum"))
select case dag
case 1: dag = "Söndag"
case 2: dag = "Måndag"
case 3: dag = "Tisdag"
case 4: dag = "Onsdag"
case 5: dag = "Torsdag"
case 6: dag = "Fredag"
case 7: dag = "Lördag"
end select
If rstResultat("Datum") < Datum2 OR rstResultat("Datum") > Datum2 Then
Datum2 = rstResultat("Datum")
Datum1 = DatePart("d",Datum2)
Datum3 = DatePart("m",Datum2)
Response.Write "<BR>"
Response.Write dag &" "
Response.Write Datum1
Response.write "/"
Response.write Datum3
[b]If rstResultat("HemmaPeriod4Mal") > 0 OR rstResultat("BortaPeriod4Mal") > 0 Then[/b]
...
...
Stort Tack. Nu fungerar det precis som jag vill ha det.
Men, (Jag vet ett himla tjatande) jag skulle vilja få ett streck under åttonde o tionde laget.
Hur ska jag fixa det?
Kanske något sånt här?
Do Until Tabell.EOF
intCount = intCount + 1%>
<table cellpadding=0 cellspacing="0" border="0">
<tr><td width="105"><%=Tabell("Lag")%></td>
<td width="30"><p align='right'><%=Tabell("Matcher")%></td>
<td width="40"><p align='right'><%=Tabell("Vinster")%></td>
<td width="40"><p align='right'><%=Tabell("Oavgjorda")%></td>
<td width="45"><p align='right'><%=Tabell("ForlStr")%></td>
<td width="60"><p align='right'><%=Tabell("Forluster")%></td>
<td width="60"><p align='right'><%=Tabell("Gjorda")%></td>
<td> - </td>
<td width="30"><p align='right'><%=Tabell("Inslappta")%></td><%
IF Tabell("Malskillnad") < 0 Then%>
<td width="50"><p align='right'><font color=Red><%=Tabell("Malskillnad")%></p></td><%
Else%>
<td width="50"><p align='right'><%=Tabell("Malskillnad")%></p></td><%
End If%>
<td width="55"><p align='right'><%=Tabell("Poang")%></td>
</tr><% If intCount = 8 OR intCount = 10 Then Response.Write("<hr>") %></td></table><%
Tabell.MoveNext
Loop
End If
%>
<!-- slut tabellställning -->
</td>
</tr>
</table>