Update flera fält

3 svar · 202 visningar · startad av Gimbo 4 apr. 2004

GimboMedlem sedan dec. 20001 626 inlägg

Trådstart4 apr. 2004 14:16#1

hejsan har en databas som ser ut på följande sätt

skytteligan[ID, Namn, Mal]

nu är det så att jag listar samtliga skyttar med deras poang på följande sätt:

    <%
 Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open = "Driver=mySQL;server=xxx;uid=xxx;pwd=xxx;database=xxx" 

SQL = "Select * FROM Skytteligan"
set rs = connect.execute(SQL)
do until rs.eof

%>
   Målskytt&nbsp;&nbsp; <input type="text" name="Malskytt<%=rs("ID")%>" class="falt" value="<%=rs("Namn")%>"> Antal Mål: <input type="text" name="Mal<%=rs("ID")%>" class="falt" value="<%=rs("Mal")%>" size="2"><br> 
<%
rs.MoveNext
Loop   
connect.close
set connect = nothing
%>

som ni ser så kommer allt i databasen att listas i fält under varandra, men hur gör jag för att uppdatera enbart antal mål man gör? eller om man vill ändra namnet bara?

hoppas ni förstår vad jag menar

Mika3lMedlem sedan nov. 20018 492 inlägg

4 apr. 2004 14:44#2

För namn:

SQL = "UPDATE Skytteligan SET Namn = '" & Trim(Request.Form("namn")) & "' WHERE ID = " & Request.Form("ID") & ""

För mål:

SQL = "UPDATE Skytteligan SET Mal = '" & Trim(Request.Form("mal")) & "' WHERE ID = " & Request.Form("ID") & ""

GimboMedlem sedan dec. 20001 626 inlägg

4 apr. 2004 14:47#3

men hur skall den veta vilket ID som behandlas?? för du ser ju på min html kod hur jag listar de...

Mika3lMedlem sedan nov. 20018 492 inlägg

4 apr. 2004 14:55#4

Så här kan du göra.

<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open = "Driver=mySQL;server=xxx;uid=xxx;pwd=xxx;database=xxx" 

SQL = "Select * FROM Skytteligan"
set rs = connect.execute(SQL)
do until rs.eof

Response.Write("<form method=""post"" action=""sida.asp"" style=""margin: 0px;"">")
Response.Write("Målskytt: <input type=""text"" name=""namn"" class=""falt"" value=""" & rs("Namn") & """>")
Response.Write(" Antal mål: <input type=""text"" name=""Mal"" class=""falt"" value=""" & rs("Mal") & """ size=""2"">")
Response.Write("<input type=""hidden"" name=""ID"" value=""" & rs("ID") & """></form><br>")

rs.MoveNext
Loop   
connect.close
set connect = nothing
%>