Avatar billede no_doubt Nybegynder
10. januar 2003 - 00:32 Der er 11 kommentarer og
1 løsning

Valgt fra dropdown skal smide ud = 0

der skal være en dropdownboks
den skal liste alle i databasen hvor loggetind = 1 eller 2 i tabellen brugerliste

Man kan så finde den man ønsker, den valgte skal ved et tryk på en submitknap have ændret 1 eller 2 til 0
Avatar billede avlund Nybegynder
10. januar 2003 - 00:36 #1
Har du noget kode eller noget allerede?
Avatar billede no_doubt Nybegynder
10. januar 2003 - 00:38 #2
hvad skal du bruge ?
Avatar billede avlund Nybegynder
10. januar 2003 - 00:43 #3
Din dropdown og det ASP du allerede har lavet - så kan jeg bygge videre på det.
Avatar billede no_doubt Nybegynder
10. januar 2003 - 00:45 #4
<select name="D2" size="1">
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source="& Server.MapPath("db.mdb")
Set rs = Conn.Execute("select * from Brugerliste Where loggetind = 1 or loggetind =  2"
Do until rs.eof
if rs("Brugernavn") <> Session("login") then
  IF RS("Brugernavn") = Session("dropnavn") THEN
%>  <option value="<%=rs("Brugernavn")%>" Selected><%=rs("Brugernavn")%></option>
<%
  ELSE
%>  <option value="<%=rs("Brugernavn")%>"><%=rs("Brugernavn")%></option>
<%
  END IF
end if
rs.movenext
loop
rs.close
set rs = nothing
conn.close
set conn = nothing
end if
%></select>
Avatar billede avlund Nybegynder
10. januar 2003 - 00:53 #5
Tilføj flg. lige efter din connection defineres:

if Request("D2") <> "" then
  Conn.Execute("UPDATE Brugerliste SET loggetind = 0 WHERE Brugernavn = '" & Request("D2") & "'")
end if
Avatar billede no_doubt Nybegynder
10. januar 2003 - 01:07 #6
nu ser den sådan ud og dropper ikke alle dem fra databasen med 1 eller 2 i loggetind
<select name="D2" size="1">
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & "Data Source="& Server.MapPath("db.mdb")
if Request("D2") <> "" then
Conn.Execute("UPDATE Brugerliste SET loggetind = 0 WHERE Brugernavn = '" & Request("D2") & "'")
Set rs = Conn.Execute("select * from Brugerliste Where loggetind = 1 or loggetind =  2")
Do until rs.eof
if rs("Brugernavn") <> Session("login") then
%>  <option value="<%=rs("Brugernavn")%>"><%=rs("Brugernavn")%></option>
<%
  END IF
rs.movenext
loop
rs.close
set rs = nothing
conn.close
set conn = nothing
end if
%></select>
Avatar billede avlund Nybegynder
10. januar 2003 - 01:30 #7
Du har glemt et end if - på linien mellem Conn.Execute (...) og Set rs (...)
Avatar billede no_doubt Nybegynder
10. januar 2003 - 15:10 #8
så mangler den en else
Avatar billede no_doubt Nybegynder
10. januar 2003 - 15:36 #9
ja så skal jeg vel bruge noget submit...
Avatar billede no_doubt Nybegynder
17. januar 2003 - 12:06 #10
hallo
Avatar billede no_doubt Nybegynder
23. januar 2003 - 15:30 #11
Lukker
Avatar billede avlund Nybegynder
23. januar 2003 - 17:30 #12
Æhm, du kunne vel lave en submit selv går jeg ud fra? Det burde da være det mindste af det...
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester