Har du byggt databasen ?
------------------
Real mad hiphop flavaz kickin' it right from tha street without no FEAR, Yo !
11 svar · 233 visningar · startad av tronez
I mitt formulär till att lägga till ny post i en databas, finns en rull lista, där amn kan välja: Målvakt , försvarare Mittält , Forward. nu e det så att jag vill spara det i data basen, och sen lista alla målvakter under en rubrik, sen ett mellanrum, försvarare sen listas försv.
kanske lite svårt att beskriva.
Målvakt:
tronez <--- här ska alla som valt målvakt i formuläret hamna... jaja
hoppas nån förstog, läste igenom det själv o inte skulle jag fatta vad jag snacka om :)
------------------
aka Lexmarc
Har du byggt databasen ?
------------------
Real mad hiphop flavaz kickin' it right from tha street without no FEAR, Yo !
hur ser den ut då?
------------------
Real mad hiphop flavaz kickin' it right from tha street without no FEAR, Yo !
ID - namn - alder - vikt - moder - com - nr - yrke - pos
-------------------|
det är pos som ska skrivas ut
------------------
aka Lexmarc
Så vad är det du har problem med ....???
SQLsatsen eller ????
------------------
Är man medlem på WF så behöver man inga vänner !
Du har ingen kod. så vi kan får se lite...
------------------
Är man medlem på WF så behöver man inga vänner !
posta koden du har gjort då, vad är pos för format ? tal ?
------------------
Real mad hiphop flavaz kickin' it right from tha street without no FEAR, Yo !
default.asp
<html>
<head>
<title>Spelare</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<style type="text/css">
table { a: none; color: black }
a:visited { text-decoration: none; color: #000090 }
a:link { text-decoration: none; color: #000095 }
a:hover { text-decoration: underline; color: #5E61CC }
</style>
<body bgcolor="#FFFFFF" text="#000000">
<table width="45%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td> <table width="45%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr>
<td><font face="Verdana, Arial, Helvetica, sans-serif" size="-3">
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("spel.mdb")&";"
SQL = "SELECT TOP 20 * FROM tabell ORDER BY ID DESC"
Set RecSet = Connect.Execute(SQL)
If RecSet.EOF Then
Response.Write "Databasen är tom"
Else
Do Until RecSet.EOF
Response.Write "<a href=spelare.asp?ID="& RecSet("ID") &"> "& RecSet ("nr")&" - "& RecSet("namn") &"</a><br><br>"
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet = Nothing
Set Connect = Nothing
END IF
%></font></td>
</tr>
</table>
</td>
</tr>
</table>
</body>
</html>
spelare.asp
<table width="45%" border="0" cellspacing="0" cellpadding="0" align="center">
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("spel.mdb")&";"
SQL = "SELECT * FROM tabell WHERE ID = "& Request.Querystring("ID")
Set RecSet = Connect.Execute(SQL)
%>
<tr>
<td rowspan="8" width="26%">
<table width="100%" border="1" cellspacing="0" cellpadding="0" height="101" bordercolor="#333333">
<tr>
<td> </td>
</tr>
</table>
<font face="Verdana, Arial, Helvetica, sans-serif" size="-3"></font></td>
<td rowspan="9" width="2%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"></font></td>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Namn:
</b>
<% Response.Write RecSet("namn") %>
</font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Ålder:
</b>
<% Response.Write RecSet("alder") %>
</font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3">
<b>Längd: </b>
<% Response.Write RecSet("langd") %>
cm</font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Vikt:
</b>
<% Response.Write RecSet("vikt") %>
kg </font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3" color="#000000"><b>Position:
</b><% Response.Write RecSet("pos")%></font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Yrke:
</b>
<% Response.Write RecSet("yrke") %>
</font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Moderklubb:
</b>
<% Response.Write RecSet("moder") %>
</font></td>
</tr>
<tr>
<td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Idol:
</b>
<% Response.Write RecSet("idol") %>
</font></td>
</tr>
<tr>
<td width="26%">
<div align="center"><font face="Verdana, Arial, Helvetica, sans-serif" size="+6">#
<% Response.Write RecSet("nr") %>
</font></div>
</td>
<td width="72%" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"><b>Tycker
bäst om:</b>
<% Response.Write RecSet("com") %>
</font></td>
<%
RecSet.Close
Connect.Close
%>
add.asp
<!-- #include file="adovbs.inc" -->
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("spel.mdb")&";"
Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From tabell"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic
%>
<%
RecSet.AddNew
RecSet("namn") = Request.Form("namn")
RecSet("alder") = Request.Form("alder")
RecSet("langd") = Request.Form("langd")
RecSet("moder") = Request.Form("moder")
Recset("vikt") = Request.Form("vikt")
RecSet("pos") = Request.Form("pos")
RecSet("idol") = Request.Form("idol")
RecSet("com") = Request.Form("com")
RecSet("nr") = Request.Form("nr")
RecSet("yrke") = Request.Form("yrke")
RecSet.Update
RecSet.Close
Connect.Close
%>
------------------
aka Lexmarc
jag hade gjort en tabell till.
PosId (tal)
Namn (text)
1 Målvakt
2 Försvarare
3 Mittfältare
4 Forward
Sen får du göra en loop och kolla när PosId ändrar sig och kolla värdet med en räknare typ och skriva ut målvakt eller vad som ska skrivas ut till rätt tal.
------------------
Real mad hiphop flavaz kickin' it right from tha street without no FEAR, Yo !