Avatar billede thepcycho Nybegynder
01. januar 2002 - 01:30 Der er 19 kommentarer og
1 løsning

Side beskyttelse

Jeg har et lille kartotek hvor man på side 1 kan se alle brugerne når man så klikker på brugerens navn popper der et nyt vindue frem hvor brugerens data vises, der kan man se trykke \"ret post\", men før man får adgang til at rette skal der poppe et lille vindue op hvor den beder om adgangskode, som findes under brugerens id i databasen..!
(Ms access 2000 db), hvordan laver man det???

Skriv endelig vis jeg ikke ahr forklaeret det godtnok..!
Avatar billede virus Nybegynder
01. januar 2002 - 01:43 #1
Vil du ha et fuldt script for 60 points?
Avatar billede virus Nybegynder
01. januar 2002 - 01:45 #2
Eller en ide om hvordan du gør?
Avatar billede thepcycho Nybegynder
01. januar 2002 - 01:53 #3
Ja gerne et fuldt script, da det ikke er så langt ville jeg da mene 60 kunne gøre det..
Avatar billede virus Nybegynder
01. januar 2002 - 01:56 #4
hvad hedder de forskellige tabeller?
og er det autoid du hiver dem ud med?
Avatar billede thepcycho Nybegynder
01. januar 2002 - 02:02 #5
Ej det er sq for besværligt og skal til at skrive det hele, tror det er nemmere vis jeg selv brygger noet sammen..!
Avatar billede virus Nybegynder
01. januar 2002 - 02:03 #6
LOL du er da vidst kommert til det forkerte sted hvis du vil ha hjælp hva.....
Avatar billede thepcycho Nybegynder
01. januar 2002 - 02:04 #7
Ej sorry det er fordi jeg er rimelig nybegynder, og kan sq ikk helt forklare det..!
Avatar billede virus Nybegynder
01. januar 2002 - 02:05 #8
Du må da vide hvad din tabel og kolonner hedder
Avatar billede thepcycho Nybegynder
01. januar 2002 - 02:06 #9
Ja He vis det abre er det Min tabel hedder adresse

og mine kolonner hedder : navn, adresse, postnr, by, telefon, mtelefon, email, hp
Avatar billede thepcycho Nybegynder
01. januar 2002 - 02:07 #10
Er det nok elelr skal du have mere at vide??, vil gerne vis du kunen bruge sql sætninger da det er det jeg såen fatter lidt af, men det må du selv bestemme.!
Avatar billede virus Nybegynder
01. januar 2002 - 02:10 #11
Ahhm.....
Nåå men for at give dig en pointer så laver du et link som du selv beskriver som ret post
lille pointer

<%
\'DBCONN
SQL = \"Select * From adresse Where password = \'\" & Request.Form(\"DINFORMSNAVN\") & \"\' And navn = \'\" Session(\"user\") & \"\'\"
If RS.EOF Then
Response.Write \"Password er forkert\"
Else
\'RS.Update
End If
%>

Den stil skal du lege med
Avatar billede thepcycho Nybegynder
01. januar 2002 - 02:13 #12
Nå okay, jeg har lige set i mine downlaode script, har noet der kunne minde om det der så prøver lige om jeg kan få det flettet ind..!
Avatar billede virus Nybegynder
01. januar 2002 - 02:14 #13
:)
HUSK at replace din form det glemte jeg sorry :)
Avatar billede erikjacobsen Ekspert
01. januar 2002 - 09:12 #14
Hvorfor den extra popup? Hvorfor ikke bare have et felt med password, sammen
med de andre felter, der kan rettes hos brugeren. Så kan du egentlig bare klare
det i en UPDATE sætning, når han trykker på submit
Avatar billede thepcycho Nybegynder
01. januar 2002 - 12:53 #15
Hmm ja du siger noet, hvorfor egentlig det vindue *s*, tror bare jeg vil lave det i et vindue det hele..!
Avatar billede thepcycho Nybegynder
01. januar 2002 - 14:30 #16
Okay jeg kan simpelthen ikke få det til at virke her er alle mine script som er tilknyttet:!

Jeg har 3 sider den første er Vis_data_alt.asp



<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"adresse.mdb\")

SQLstmt = \"SELECT * FROM adresse WHERE id = \" & Request(\"id\")

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)
  %>

<html>

<head>
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<meta name=\"GENERATOR\" content=\"Microsoft FrontPage 4.0\">
<meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">
<title>Navne oplysning : <%=rs(\"navn\")%></title>
</head>

<body>

<table border=\"0\" width=\"400\" bgcolor=\"#7D9BB9\" cellspacing=\"0\" cellpadding=\"0\" style=\"border: 1 solid #000000\">
  <tr>
    <td valign=\"middle\" bgcolor=\"#54789C\" colspan=\"3\" align=\"right\" height=\"18\" width=\"396\"><font color=\"#FFFFFF\" face=\"Arial\" size=\"1\">&nbsp;[ <a href=\"kode_godkend.asp?id=<%=rs(\"id\")%>\" style=\"color: #FFFFFF\">Ret
      i post</a> ] [<a href=\"adresser.asp\" style=\"color: #FFFFFF\">
      Indtast ny post</a> ] [ <a href=\"slet_data.asp?id=<%=rs(\"id\")%>\" style=\"color: #FFFFFF\">Slet
      post</a> ]</font></td>
  <tr>
    <td valign=\"top\" bgcolor=\"#FFFFFF\" colspan=\"3\" align=\"right\" height=\"1\" width=\"396\"><img border=\"0\" src=\"1x1.gif\" width=\"1\" height=\"1\"></td>
  <tr>
    <td valign=\"top\" bgcolor=\"#000000\" width=\"396\" colspan=\"3\" height=\"18\"><font color=\"#FFFFFF\" face=\"Arial\" size=\"2\"><b>&nbsp; <%=rs(\"navn\")%></b></font></td>
    <%
  \'DO WHILE NOT rs.EOF
    navn = rs(\"navn\")
    adresse = rs(\"adresse\")
    postnr = rs(\"postnr\")
    city = rs(\"city\")
    telefon = rs(\"telefon\")
    mtelefon = rs(\"mtelefon\")
    email = rs(\"email\")
    hp = rs(\"hp\")
    %>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\"><img border=\"0\" src=\"1x1-trans.gif\" width=\"1\" height=\"1\"></td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><b><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\">Navn</font></b></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><font face=\"Arial\" size=\"2\"><b><%=navn%></b></font></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\"><img border=\"0\" src=\"1x1-trans.gif\" width=\"1\" height=\"1\"></td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>Adresse</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><font face=\"Arial\" size=\"2\"><b><%=adresse%></b></font></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\"><img border=\"0\" src=\"1x1-trans.gif\" width=\"1\" height=\"1\"></td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>Postnr.</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><font face=\"Arial\" size=\"2\"><b><%=postnr%></b></font></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\">&nbsp;</td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>By</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><b><font face=\"Arial\" size=\"2\"><%=city%></font></b></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\">&nbsp;</td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>Telefon</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><b><font face=\"Arial\" size=\"2\"><%=telefon%></font></b></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\">&nbsp;</td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>Mobiltelefon</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><b><font face=\"Arial\" size=\"2\"><%=mtelefon%></font></b></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\">&nbsp;</td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>Email</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><b><font face=\"Arial\" size=\"2\"><%=email%></font></b></td>
  </tr>
  <tr>
    <td bgcolor=\"#7D9BB9\" width=\"9\">&nbsp;</td>
    <td valign=\"top\" align=\"left\" bgcolor=\"#7D9BB9\" width=\"128\"><font face=\"Arial\" size=\"2\" color=\"#FFFFFF\"><b>Hjemmeside</b></font></td>
    <td align=\"left\" valign=\"top\" bgcolor=\"#7D9BB9\" width=\"255\"><b><font face=\"Arial\" size=\"2\"><%=hp%></font></b></td>
  </tr>
  <tr>
    <%
    \'rs.MoveNext
  \'LOOP
  \'RS.Close
  Response.Write \"</TABLE>\"

conn.Close
Set conn = nothing
Set SQLstmt = nothing
    %>
  </tr>
</table>

</body>


Hvor man så kan klikke \"ret_i_post\" som stiller om til en ny side:






<%
Response.buffer = true
SET rs = Server.CreateObject(\"ADODB.Connection\")
rs.Open \"Driver={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath(\"adresse.mdb\")

If Request(\"mode\") = \"Check\" then

Sqlstmt = \"Select Count(*) as Found from adresse where (navn = \'\" & Request(\"navn\") & \"\') and (kode =\'\" & Request(\"kode\") & \"\')\"
Set Login = Rs.Execute(Sqlstmt)
if Login(\"Found\") = 0 then
Session(\"login\") = 0
error1 = \"Der opstod en fejl:\"
error2 = \"Adgangskoden elelr brugernavnet blev ikek godkendt, prøv igen\"
else
Session(\"Login\") = 1
Session(\"password-session\") = Request(\"navn\")
Response.Redirect \"ret_i_data.asp\"

end if
else
end if

%>

<p align=\"center\">&nbsp;</p>

<center>

<table border=\"1\" width=\"468\" bordercolor=\"#000000\" cellspacing=\"0\" cellpadding=\"8\" bordercolorlight=\"#000000\" bordercolordark=\"#006699\">
  <tr>
    <td>
    </center><br>
<form method=\"POST\" action=\"kode_godkend.asp\">
<input type=\"hidden\" name=\"mode\" VALUE=\"Check\"
<p>
<table border=\"0\" width=\"100%\" cellspacing=\"0\" cellpadding=\"0\">
  <tr>
    <td width=\"100%\"><center>
    <font face=\"Verdana\" color=\"#000000\" size=\"1\"><br>
    <input maxlength=\"16\" name=\"navn\" size=\"30\"></font></center></td>
</tr>
<font face=\"Verdana\" color=\"#000000\" size=\"1\">
<tr>
  <td width=\"100%\"><center><font face=\"Verdana\" color=\"#000000\" size=\"1\"><br>
    <input maxlength=\"16\" name=\"kode\" size=\"30\"></font></center>
  </td>
</tr>
<tr>
  <td width=\"100%\"><Font face=\"verdena\" size=\"1\" color=\"#FF0000\"><b><br><u><%=error1%></u><br><%=error2%></td></b></font>
</tr>
</table><center>
<p><input type=\"submit\" value=\"Login\" name=\"Login\"></p>
</form>

</table>


Og den side stiller så om til \"ret_i_data\" vis adgangskoden og brugernavnet stemmer overens.Siden som der stilles om til ser såen ud:




<% Response.buffer = true %>
<html>

<head>
<meta http-equiv=\"Content-Language\" content=\"da\">
<meta http-equiv=\"Content-Type\" content=\"text/html; charset=windows-1252\">
<meta name=\"GENERATOR\" content=\"Microsoft FrontPage 4.0\">
<meta name=\"ProgId\" content=\"FrontPage.Editor.Document\">
<title>Adresser</title>
</head>

<body>

<%

Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & server.MapPath(\"adresse.mdb\")

SQLstmt = \"SELECT * FROM adresse WHERE id = \" & Request(\"id\")

Conn.Execute (SQLstmt)

Set rs = conn.Execute(SQLstmt)
  %>
<form method=\"POST\" action=\"gem_ret_data.asp?id=<%=rs(\"id\")%>\">
  <table border=\"0\" width=\"400\" bgcolor=\"#000000\" cellspacing=\"0\" cellpadding=\"0\" style=\"border: 1 solid #000000\" height=\"183\">
    <tr>
      <td valign=\"middle\" bgcolor=\"#54789C\" colspan=\"2\" align=\"right\" height=\"18\" width=\"400\"><font color=\"#FFFFFF\" face=\"Arial\" size=\"1\">[<a href=\"default.asp\" style=\"color: #FFFFFF\">Til
        forsiden</a> ]</font></td>
    </tr>
    <tr>
      <td width=\"283\" colspan=\"2\" valign=\"top\" bgcolor=\"#000000\" bordercolor=\"#000000\" height=\"18\"><b><font size=\"2\" face=\"Arial\" color=\"#000000\">_</font><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\">Ret
        :&nbsp;[<%=rs(\"navn\")%>]</font></b></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#FFFFFF\" height=\"1\"><img border=\"0\" src=\"images/1x1.gif\" width=\"1\" height=\"1\"></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#FFFFFF\" height=\"1\"><img border=\"0\" src=\"images/1x1.gif\" width=\"1\" height=\"1\"></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Navn</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"navn\" size=\"25\" value=\"<%=rs(\"navn\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Adresse</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"adresse\" size=\"25\" value=\"<%=rs(\"adresse\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Postnr</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"postnr\" size=\"4\" value=\"<%=rs(\"postnr\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>By</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"city\" size=\"25\" value=\"<%=rs(\"city\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Telefon</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"telefon\" size=\"25\" value=\"<%=rs(\"telefon\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Mobiltelefon</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"mtelefon\" size=\"25\" value=\"<%=rs(\"mtelefon\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Email</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"email\" size=\"25\" value=\"<%=rs(\"email\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"67\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><b><font size=\"2\" face=\"Arial\" color=\"#7D9BB9\">_</font></b><font size=\"2\" face=\"Arial\" color=\"#FFFFFF\"><b>Hjemmeside</b></font></td>
      <td width=\"221\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\"><font size=\"2\" face=\"Arial\" color=\"#000000\"><b><input type=\"text\" name=\"hp\" size=\"25\" value=\"<%=rs(\"hp\")%>\"></b></font></td>
    </tr>
    <tr>
      <td width=\"288\" valign=\"top\" bgcolor=\"#7D9BB9\" height=\"25\" colspan=\"2\">&nbsp;
        <p>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; <input type=\"submit\" value=\"Gem oplysninger\" name=\"B1\"></p>
      </td>
    </tr>
  </table>

  <p>&nbsp;</p>
</form>
    <%
conn.Close
Set conn = nothing
Set SQLstmt = nothing
    %>

</body>

</html>



Men jeg får denne fejl på ret siden...!!!!!

Microsoft OLE DB Provider for ODBC Drivers fejl \'80040e14\'

[Microsoft][ODBC Microsoft Access-driver] Der er en syntaksfejl, fordi der mangler en operator. i forespørgselsudtrykket \"id =\".

/Kartotek/ret_i_data.asp, linje 21


Hvordan løser man dette problem????, jeg går udfra det er noet på den sidste side som ikke virker som det skal..!!!!
Avatar billede erikjacobsen Ekspert
01. januar 2002 - 16:45 #17
Det er fordi din Request(\"id\") er tom.
Avatar billede thepcycho Nybegynder
01. januar 2002 - 22:17 #18
Ja men hvordan for jeg den så til at hente det id?
Avatar billede erikjacobsen Ekspert
01. januar 2002 - 22:19 #19
Den side hvor du kommer fra, skal have et felt med navnet id. Jeg
gider ikke læse din kode igennem for at se hvordan :)
Avatar billede thepcycho Nybegynder
02. januar 2002 - 16:17 #20
Ok kan ikke finde ud af det lukker spørgsmålet, og opretter et andet hvor jeg har en anden evt måde..
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