11. juli 2005 - 21:34
Der er
8 kommentarer og 1 løsning
Form data skal gemmes i MySQL database hvordan.
Jeg har fire text felter og en submit knap. To af knapperne indeholder tekst, en skal indehode et tal. Det sidste skal vise et gennemsnit for de indtastede tal over en periode. Jeg er ikke lige den store kodehaj, er der nogen som kan give mig et eksempel på, hvordan jeg kunne lave det stykke kode, som tager værdierne fra html formen og indsætter og henter det ud igen?
Annonceindlæg tema
Offentlig digitalisering
Fra effektivisering til digital suverænitet. Hvordan skaber det offentlige en digital fremtid med AI, sikkerhed og kontrol i centrum?
>>fra html formen og indsætter og henter det ud igen? altså indsætter den i databasen og viser dem på skærmen med beregnet gennemsnit.
Indsæt data i tabel: <% 'INDSÆT DIN DBCONN HER If Request.Form("mode") = "create" Then Conn.Execute("INSERT INTO MinTabel (text1, text2, text3) VALUES (" & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text1")))) & "', " & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text2")))) & "', " & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text3")))) & & "')") End If %> <form name="frmText" action="/default.asp" method="post" style="margin: 0px;"> <input type="hidden" name="mode" value="create"> <input type="text" style="width: 200px;" name="text1"> <input type="text" style="width: 200px;" name="text2"> <input type="text" style="width: 200px;" name="text3"> <input type="submit" name="" value="Send"> </form>
Rettelse: <% 'INDSÆT DIN DBCONN HER If Request.Form("mode") = "create" Then Conn.Execute("INSERT INTO MinTabel (text1, text2, text3) VALUES (" & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text1")))) & "', " & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text2")))) & "', " & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text3")))) & & "')") End If %> <html> <head> <title>Min hjemmeside</title> </head> <body> <form name="frmText" action="/default.asp" method="post" style="margin: 0px;"> <input type="hidden" name="mode" value="create"> Text 1: <input type="text" style="width: 200px;" name="text1"><br> Text 2: <input type="text" style="width: 200px;" name="text2"><br> Text 3: <input type="text" style="width: 200px;" name="text3"><br> <input type="submit" name="" value="Send"> </form> </body> </html>
Der er 2 stk. & i linie 9. Det ene skal fjernes, sorry.
2 rettelser (nu skulle den være i orden: <% 'INDSÆT DIN DBCONN HER If Request.Form("mode") = "create" Then Conn.Execute("INSERT INTO MinTabel (text1, text2, text3) VALUES (" & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text1")))) & "', " & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text2")))) & "', " & _ "'" & LTrim(RTrim(SQLEncode(Request.Form("text3")))) & "')") Conn.Close End If %> <html> <head> <title>Min hjemmeside</title> </head> <body> <form name="frmText" action="/default.asp" method="post" style="margin: 0px;"> <input type="hidden" name="mode" value="create"> Text 1: <input type="text" style="width: 200px;" name="text1"><br> Text 2: <input type="text" style="width: 200px;" name="text2"><br> Text 3: <input type="text" style="width: 200px;" name="text3"><br> <input type="submit" name="" value="Send"> </form> </body> </html>
Udtræk data fra tabel: <% 'INDSÆT DIN DBCONN HER Dim RS Set RS = Conn.Execute("SELECT * FROM MinTabel WHERE username='" DineKriterier & "'") If RS.EOF Then RS.Close Conn.Close Response.Redirect "/default.asp?msg=Min+fejltekst." End If %> <html> <head> <title>Min hjemmeside</title> </head> <body> <% If Request.Querystring("msg") <> "" Then MinFejltekst = Request.Querystring("msg") %> <%=MinFejltekst%> <% Else %> Text 1: <%=RS("text1")%><br> Text 2: <%=RS("text2")%><br> Text 3: <%=RS("text3")%> <% End If %> </body> </html> <% SET Conn = Nothing %>
Det er løseligt, hvordan du kan indsætte i database/trække data ud fra database. Nu har jeg ikke kigget på dit gennemsnit over en given periode, men hvis du kan få 12/07-2005 06:50:58 og 12/07-2005 07:06:33, så kan vi prøve at få det andet til at virke bagefter :)
tak smid lige et svar ;-)
Kurser inden for grundlæggende programmering