06. september 2001 - 16:17Der er
12 kommentarer og 1 løsning
Stort problem - hjælp
Jeg har en dropdown menu
<%Set rs = Conn.Execute(\"select * from bruger order by brugernavn\") %> <select name=\"Category\"> <% Do While not rs.EOF %> <option value=\"<%=rs(\"brugerid\")%>\"> <%=rs(\"brugernavn\")%></option> <% rs.MoveNext Loop rs.Close set rs = Nothing %> Men nogle brugernavne !! - og nedenunder - et skema hvor disses brugernavnes data står - er det sådan at jeg kan få siden opdatteret når jeg har valgt et navn fra dropdown listen - så disses data bruges i nedenstående skema
Jeg har denne til at hente mine data - jeg ved godt at den henter de data JEG er logget ind med - men hvordan får jeg den til at bruge de data - tilhørende det navn valgt i dropdown menuen <%
Set rs = Server.CreateObject(\"ADODB.Recordset\") sql = \"select * from bruger where brugernavn = \'\" & Session(\"brugernavn\") & \"\'\" rs.open sql, conn, 1, 3
if Request.ServerVariables(\"REQUEST_METHOD\") = \"POST\" then
Line nu henter den jo bare de info der hører til (\"brugernavn\") dvs. det bruger navn jeg er logget ind med - men jeg skal have den til at hente de info der hører til det (\"brugernavn\") jeg vælger fra dropdown menuen ??
Du må lave en form, hvor du sunmitter, det i et input felt. Så kan du jo hente ud af request objectet. Ellers kan du loade dit skema, med dit brugernavn som querystring, og dermed hente via request objected igen. Jeg har desvære ikke tid til at lave det for, dig, men det er der nok en anden der har....Held og lykke
JA - det er sådan set lige meget hvilken måde jeg gør det på - jeg skal bare have et stykke kode - der henter - nogle data ud af en database - så de kan blive redigeret - og så gemmes igen
Du skriver <form name=\"form1\" action=\"<%=request.serverVariables(\"SCRIPT_NAME\")%>\" method=\"post\"> Hvad er script name !!! jeg er ikke så god til asp - så jeg vil gern have det penslet helt ud
[Drop-down] Når man vælger en person reloades siden.
Person Oplysninger: Navn [] Tlf[] (Disse felter vil blvier udfyldt når siden reloades)
For at udfylde skemat skal du bruge den valgte person ID fra Dropdown boksen. For at få står på hvilken ID der er valgt og få hendtet data er det nødvendigt at reloade siden. Når den reloades og en person er valgt laver man så en SQL sætning som hendter data omkring den valgte perosn.
Jeg vil gerne hjælpe med at lave hele scripet, men det kan først blive i morgen (lørdag) da jeg er på vej til firmaudflugt.
Jeg har lavet et eks. Jeg har lavet en database som hedder test.mdb. Den indeholder tabellen personer, Kolonnerne ID(autonummer),Navn(tekst),Telefon(Tekst),email(tekst),Antalbiler(tal). Når siden loader første gang er der kun en combo-box/dropdown hvor man kan vælge et navn. Så vil siden reloade, så vises combo-boksen med det valgte navn og et skema med personens oplysninger kommer frem. Her kan man rette i personens oplysninger og trykke på gem. Hvis man trykker på gem reloades siden op data gemmes, så vises combo-boksen med det valgte navn samt skema med personens oplysninger:
<html> <title>Bla</title> <body> <% strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"test.mdb\") Set myConn = Server.CreateObject(\"ADODB.Connection\") Set rs = Server.CreateObject(\"ADODB.RecordSet\") myConn.Open strDSN
\'Tjek om der er trykket på gem if Request.form(\"formdata\") = \"gemdata\" then strSQL = \"UPDATE personer SET \" strSQL = strSQL & \"Navn=\'\" & Request(\"navn\") & \"\', \" strSQL = strSQL & \"Telefon=\'\" & Request(\"Telefon\") & \"\', \" strSQL = strSQL & \"Email=\'\" & Request(\"Email\") & \"\', \" strSQL = strSQL & \"Antalbiler=\" & Request(\"Antalbiler\") & \" \" strSQL = strSQL & \"WHERE ID=\" & request(\"personvalgt_id\") strSQL = strSQL & \";\" Set rs = myConn.Execute(strSQL) end if
\'Hvis siden er blevet reloaded så vil personvalgt få ID på personen personvalgt_id = request(\"personvalgt_id\")
strSQL = \"SELECT * FROM personer;\" Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then %> <form method=\"post\" action=\"<%=request.serverVariables(\"SCRIPT_NAME\")%>\" id=\"velgform\" name=\"velgperson\"> <select onChange=\'document.velgperson.submit()\' name=\'personvalgt_id\'> <% Do While Not rs.EOF %> <option value=\'<%=rs(\"ID\")%>\' <%if Cint(personvalgt_id) = rs(\"ID\") then response.write \" selected\"%>> <%=rs(\"Navn\")%></option> <% rs.MoveNext loop %> </select> </form> <% end if
if (personvalgt_id<>\"\") then strSQL = \"SELECT * FROM personer WHERE ID=\" & personvalgt_id & \";\" Set rs = myConn.Execute(strSQL) If Not (rs.BOF Or rs.EOF) Then %> <form method=\"post\" name=\"retdata\" value=\"gemdata\" action=\'<%=request.serverVariables(\"SCRIPT_NAME\")%>\'> <table> <input type=\"hidden\" name=\"personvalgt_id\" value=\'<%=personvalgt_id%>\'> <input type=\"hidden\" name=\"formdata\" value=\'gemdata\'> <tr><td>Navn : </td><td><input name=\"navn\" value=\'<%=rs(\"Navn\")%>\'></td></tr> <tr><td>Telefon : </td><td><input name=\"Telefon\" value=\'<%=rs(\"Telefon\")%>\'></td></tr> <tr><td>Email : </td><td><input name=\"Email\" value=\'<%=rs(\"Email\")%>\'></td></tr> <tr><td>Antal biler : </td><td><input name=\"AntalBiler\" value=\'<%=rs(\"AntalBiler\")%>\'></td></tr> <tr><td><input type=\"submit\" value=\"Gem\" name=\"Action\"></td><td></td></tr> </table> </form> <% end if end if %> </body> </html>
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.