Har kört fast när det gäller att uppdatera flera spelare på en o samma gång.
Har haft en tabell med presentation av spelare som jag nu tänkte utöka med lite statistik. Gjorde följande formulär, som funkar om man tar spelarna en och en men jag vill för enkelhetens skull kunna rada upp allesammans och fylla i antalet varningar, mål osv på en och samma gång efter varje match.
Men hur tusan skall man gå tillväga för att detta skall funka så rätt antal mål osv kommer på rätt spelare?
TABELLEN "Spelare"
SpelarID (Räknare)
SpelarNummer( Tal)
SpelarNamn (Text)
.
.
.
SpelarStatistikMatcher (Text)
SpelarStatistikMal (Text)
SpelarStatistikVarningar (Text)
SpelarStatistikUtvisningar (Text)
1.asp
<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
Visa = "SELECT * FROM spelare ORDER BY Spelarnummer"
RecSet.Open Visa, Connect, adOpenStatic, adLockOptimistic
Do Until RecSet.EOF %>
<form method="POST" action="2.asp">
<font size="1" face="verdana, arial">
<input type="text" size="3" name="SpelarID" value="<%=RecSet("SpelarID")%>""> - <%=RecSet("Spelarnummer")%> - <%=RecSet("Spelarnamn")%>
<input type="text" size="3" name="spelarstatistikmatcher">Matcher
<input type="text" size="3" name="spelarstatistikmal">Mål
<input type="text" size="3" name="spelarstatistikvarningar">Varningar
<input type="text" size="3" name="spelarstatistikutvisningar">Utvisningar
<br>
</font>
<%
RecSet.MoveNext
Loop
RecSet.Close
Connect.Close
Set RecSet=Nothing
Set Connect=Nothing
%>
<input type="submit" value="Uppdatera"></form>
2.asp
<%
Set RecSet = Server.CreateObject("ADODB.Recordset")
UppdateraSpelarStatistik = "SELECT * FROM Spelare"
RecSet.Open UppdateraSpelarStatistik, Connect, adOpenStatic, adLockOptimistic
RecSet("SpelarStatistikMatcher") = RecSet("SpelarStatistikMatcher") -- Request.Form("spelarstatistikmatcher")
RecSet("SpelarStatistikMal") = RecSet("SpelarStatistikMal") -- Request.Form("spelarstatistikmal")
RecSet("SpelarStatistikVarningar") = RecSet("SpelarStatistikVarningar") -- Request.Form("spelarstatistikvarningar")
RecSet("SpelarStatistikUtvisningar") = RecSet("SpelarStatistikUtvisningar") -- Request.Form("spelarstatistikutvisningar")
RecSet.Update
RecSet.Close
Connect.Close
Set RecSet=Nothing
Set Connect=Nothing
%>