hjälp....

ASP

11 svar · 265 visningar · startad av tronez

Medlem sedan juli 2001728 inlägg
Trådstart#1

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 :)

Medlem sedan dec. 19996 522 inlägg
#2

Har du byggt databasen ?

Medlem sedan juli 2001728 inlägg
#3

klart jag har :)

Medlem sedan dec. 19996 522 inlägg
#4

hur ser den ut då?

Medlem sedan juli 2001728 inlägg
#5

ID - namn - alder - vikt - moder - com - nr - yrke - pos
-------------------|
det är pos som ska skrivas ut

Medlem sedan mars 2001309 inlägg
#6

Så vad är det du har problem med ....???
SQLsatsen eller ????

Medlem sedan juli 2001728 inlägg
#7

Jag vill veta hur man gör, har provat men har inte lyckats

Medlem sedan mars 2001309 inlägg
#8

Du har ingen kod. så vi kan får se lite...

Medlem sedan dec. 19996 522 inlägg
#9

posta koden du har gjort då, vad är pos för format ? tal ?

Medlem sedan juli 2001728 inlägg
#10

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>&nbsp;<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>&nbsp;</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>&Aring;lder: 
      </b> 
      <% Response.Write RecSet("alder") %>
      </font></td>
  </tr>
  <tr> 
    <td width="72%"><font face="Verdana, Arial, Helvetica, sans-serif" size="-3"> 
      <b>L&auml;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&auml;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

%>
Medlem sedan juli 2001728 inlägg
#11

pos , ska vara text.

Målvakt
Försvarare
Mittfältare
Forward

Medlem sedan dec. 19996 522 inlägg
#12

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.

253 ms totalt · 4 externa anrop · v20260731065814-full.d34c6d5a
117 ms — deklarationer (db)
0 ms — hämta statistik (cache)
133 ms — hämta tråd, inlägg och bilagor (db)
115 ms — ändringar (db)