webForumDet fria alternativet

Två tabeller sida vid sida

HTML & CSS

21 svar · 319 visningar · startad av Ralle

Medlem sedan feb. 2003210 inlägg
Frågan#1

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
Medlem sedan sep. 20021 655 inlägg
#2

Om du ändrar till följande:

<table style="display: inline">

kommer tabellerna att visas flödande, och då också att hamna bredvid varandra.

Medlem sedan feb. 2003210 inlägg
#3

Istället för:<table cellpadding=0 cellspacing="0" border="0">

Eller?

Medlem sedan jan. 20032 285 inlägg
#4

Nej, du lägger bara till det.

<table cellpadding="0" cellspacing="0" border="0" style="display: inline;">
Medlem sedan mars 20023 561 inlägg
#5

Nej, men också:

<table cellpadding="0" cellspacing="0" border="0" style="display: inline">
Medlem sedan feb. 2003210 inlägg
#6

Nej!

Det fungerar inte.

Det ser ut så här nu:
http://member.webforum.nu/5070/tabell2.jpg

Medlem sedan okt. 20005 273 inlägg
#7

Visa HTML-koden istället så är det lättare att se vad som är fel

Mvh icaaq

Medlem sedan feb. 2003210 inlägg
#8

Den finns ju överst, första inlägget.

Medlem sedan okt. 20005 273 inlägg
#9

Den och lika mycket ASP.... ;)

Medlem sedan aug. 2002733 inlägg
#10

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>
Medlem sedan mars 20015 287 inlägg
#11

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.

Medlem sedan feb. 2003210 inlägg
#12

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.

Medlem sedan feb. 2003210 inlägg
#13

Hur ska jag göra?

Marcus förslag alltså.

Medlem sedan jan. 20011 140 inlägg
#14

Testa att sätta

style="float:left"

På den ena tabellen och

style="float:right"

på den andra

Medlem sedan feb. 2003210 inlägg
#15

Nej, samma sak fortfarande.

Medlem sedan juli 20013 378 inlägg
#16

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...

Medlem sedan feb. 2003210 inlägg
#17

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?

Medlem sedan juli 20013 378 inlägg
#18

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]
...
...
Medlem sedan feb. 2003210 inlägg
#19

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?

Medlem sedan jan. 20032 285 inlägg
#20

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>
273 ms totalt · 4 externa anrop · v20260731065814-full.2f471f9e
125 ms — deklarationer (db)
0 ms — hämta statistik (cache)
141 ms — hämta tråd, inlägg och bilagor (db)
130 ms — ändringar (db)