Avatar billede look4me Nybegynder
11. februar 2001 - 17:31 Der er 42 kommentarer og
1 løsning

Password på hjemmesider...!

Jeg er har oprettet en hjemmeside.
Nogle sider skal beskyttes med et password, da jeg kun er interesseret i en bestemt gruppe skal have adgang til disse sider.
Mit spørgsmål er om der er nogen der kan hjælpe mig med en HTML, JAVASCRIPT eller PHP - code hvor der et vist eksempel eller reference til en site?
Jeg har forsøgt flere gange at programmere mig ud af det men jeg kommer alligevel ind på siden!!!
Jeg forstår åbenbart ikke, hvordan det hænger sammen og hvordan jeg får \"SIDEN låst\".
Og selvom jeg har forsøgt med CoffeCup - programmet og kopieret \"css\" - filen over i det aktuelle bibliotek, så kommer jeg alligevel ind på SIDEN som burde være spærret med False Login!!!
Kan det ikke lade sig gøre at man skal indtaste sin e-mailadresse og derefter sende den som verification, for at kunne få et PSW fra web-adm?
Avatar billede repsac Nybegynder
11. februar 2001 - 17:43 #1
Kig lidt på [http://www.webcafe.dk]
- de har lidt toturials (på dansk) om password beskyttelse af hjemmesider ...
Avatar billede repsac Nybegynder
11. februar 2001 - 17:45 #2
Det kan forholdsvist nemt laves i php (og mysql) ...
Kan du bruge begge dele hos din udbyder?
Avatar billede repsac Nybegynder
11. februar 2001 - 17:48 #3
Hvad har du brugt hidtil?
Avatar billede look4me Nybegynder
11. februar 2001 - 17:51 #4
Jeg er nybegynder på 3 mdr, og det program jeg bruger til at lave mine sites i, er WebStones Homepage 3.5.2!
Avatar billede look4me Nybegynder
11. februar 2001 - 17:53 #5
Detté er også den første dag på Eksperten. Men jeg kan se at der er en del kompetente personer til at rådgive..!
Avatar billede look4me Nybegynder
11. februar 2001 - 17:55 #6
Jeg sidder lige og prøver at finde noget med PSW på den omtalte site..
Avatar billede repsac Nybegynder
11. februar 2001 - 17:59 #7
WebStones Homepage 3.5.2 - uha da ... du kender altså intet overhovedet til html?

Jeg har lige lavet et i php, men det er jo bedst hvis man ved hvad der sker på sine egne sider ...

Jeg har et par forholdsvis simple måder at lave det på liggende ... Er du interesseret?
Avatar billede burningice Nybegynder
11. februar 2001 - 18:01 #8
well.. hvis du har adgang til asp og access db kan jeg da hurtigt lave sådan et system til dig. Evt. med flere grader af rettigheder, f.eks admin, bruger, gæst m.m.
Avatar billede repsac Nybegynder
11. februar 2001 - 18:05 #9
Det\'r heller ikke det der er problemet, men hvis han ikke fatter et hak af hvad der sker er det jo ikke meget ved  ...

Du kan evt. prøve at bruge www.person.dk ... der kan du få en gratis hjemmeside hvor du også kan opsætte et login-bib.
Avatar billede repsac Nybegynder
11. februar 2001 - 18:06 #10
Forresten; asp og acces db NAAAAJ!!! --> PHP og MySQL JA!!! ;)
Avatar billede repsac Nybegynder
11. februar 2001 - 18:07 #11
acces --> access ... man er jo ikke språvli\' vel ... *LOL*
Avatar billede look4me Nybegynder
11. februar 2001 - 18:07 #12
Lidt kender jeg til det men ikke den konkrete opbygning...
Jeg sidder stadig og knokler med de muligheder der er når man bruger BODY og META KEYWORDS m.m. til en søgemaskine!!!

Om jeg er interesseret, det kan du b... på jeg er...:-)
Avatar billede look4me Nybegynder
11. februar 2001 - 18:12 #13
I køre sq\' stærkt på derude...!!! *SS*
ASP er jeg ikke bekendt med men lidt Access har jeg da kikket på + lidt Delphi 4, til noget layout og knapper meee...n det er lidt for langhåret til moi...=:-/
Avatar billede repsac Nybegynder
11. februar 2001 - 18:14 #14
Her er et eksempel ...

------------------------------------
access.htm skal indholde følgende
------------------------------------
<HTML>
<HEAD>
<TITLE>Login Page</TITLE>
</HEAD>
<Script language=\"JavaScript\" Src=\"pswd.js\"></Script>
<BODY BGCOLOR=\"#000000\" TEXT=\"#FFFFFF\">
<CENTER>
<table>
<FORM Name=\"lgform\">
<TR><TH COLSPAN=2>Password ...</TH></TR>
<TR><TD>Login Name: </TD><TD><INPUT NAME=\"user\" TYPE=\"text\" VALUE=\"\" SIZE=\"10\" ALIGN=middle></TD></TR>
<TR><TD>Password: </TD><TD><input name=\"passwd\" type=\"password\" value=\"\" size=\"10\" ALIGN=middle></TD></TR>
<TR><TD><INPUT NAME=\"Submit\" width=80 type=\"button\" VALUE=\"Login\" ALIGN=middle onclick=\"check()\">
<TD><INPUT NAME=\"reset\" type=\"button\" value=\"Cancel\" width=80 onClick=\"self.close()\" ALIGN=middle></TR>
</FORM>
</table>
</CENTER>
</BODY>
</HTML>



------------------------------------
add_user.htm skal indholde følgende
------------------------------------
<HTML>
<HEAD>
<TITLE>Login Page</TITLE>
</HEAD>
<Script language=\"JavaScript\" Src=\"Add_User.js\"></Script>
<BODY BGCOLOR=\"#000000\" TEXT=\"#FFFFFF\">
<CENTER>
<table>
<FORM Name=\"lgform\">
<TR><TD>New User\'s Login: </TD><TD><INPUT NAME=\"user\" TYPE=\"text\" VALUE=\"\" SIZE=\"10\" ALIGN=middle></TD></TR>
<TR><TD>New User\'s Password: </TD><TD><input name=\"passwd\" type=\"password\" value=\"\" size=\"10\" ALIGN=middle></TD></TR>
<TR><TD><INPUT NAME=\"Submit\" width=80 type=\"button\" VALUE=\"Add\" ALIGN=middle onclick=\"check()\">
<TD><INPUT NAME=\"reset\" type=\"button\" value=\"Cancel\" width=80 onClick=\"self.close()\" ALIGN=middle></TR>
<TEXTAREA NAME=\"log\" WRAP=Virtual ROWS=3 COLS=50></TEXTAREA>
</FORM>
</table>
</CENTER>
</BODY>
</HTML>


------------------------------------
add_user.js skal indholde følgende
------------------------------------
<!-- Hiding
/*
This is an modification of the original Password Pro which was created by Lefteris Haritou
http://www.geocities.com/~lef
Please notice that this script among with others is copyrighted under the Greek copyright office which
make it valid worldwide except USA.
Some of my latest Script are also copyrighted under the US copyright office too
(http://www.loc.gov/copyright/)

    Edited by Howard Chen
    http://start.at/javascripts/
    hchen007@geocities.com
*/
var base= new Array(\"0\", \"1\", \"2\", \"3\", \"4\", \"5\", \"6\", \"7\", \"8\", \"9\",\"A\", \"B\", \"C\", \"D\", \"E\", \"F\", \"G\", \"H\", \"I\", \"J\", \"K\", \"L\", \"M\", \"N\", \"O\", \"P\", \"Q\", \"R\", \"S\", \"T\", \"U\", \"V\", \"W\", \"X\", \"Y\", \"Z\",\"a\", \"b\", \"c\", \"d\", \"e\", \"f\", \"g\", \"h\", \"i\", \"j\", \"k\", \"l\", \"m\", \"n\", \"o\", \"p\", \"q\", \"r\", \"s\", \"t\", \"u\", \"v\", \"w\", \"x\", \"y\", \"z\")

var z=23;
var y=28;
var f= new Array();
var K= new Array();
var login=new Array();
var lgnum=0;
for (x=0; x<10; x++){
f[x]=x<<9
f[x]+=23
}
for (x=10; x<36; x++){
y=y<<1
v= Math.sqrt(y)
v = parseInt(v,16)
v+=5
f[x]=v
y++
}
for (x=36; x<62; x++){
z=z<<1
v= Math.sqrt(z)
v = parseInt(v,16)
v+=74
f[x]=v
z++
}

function inc(){
iCounter--
if (iCounter > 0){
alert(\'Login / Password Incorrect\\n\\nPlease try again\')
document.lgform.user.value=\"\"
document.lgform.passwd.value=\"\"
lgnum=0
}
else
location.href=\'denied.html\'
}

function check(){
pwdchk()
}


function pwdchk(){
var pass=document.lgform.passwd.value
var lpass=pass.length
for (l=0; l<lpass; l++){
K[l]=pass.charAt(l)
}
var code=0;
for (y=0; y<lpass; y++){
for(x=0; x<62; x++){
if (K[y]==base[x])
code+=(y+1)*f[x]
}
}
if (navigator.appName == \"Netscape\")
{
document.lgform.log.value = \'login[x]=new id(\"\' + document.lgform.user.value + \'\",\' + code + \')\\n\' +
\'Copy and paste the above line in the very bottom of pswd.js\\nNotice that the x in login[x] needs to be current number of users.\\nYou should see a help at bottom of pswd.js.\'
}
else {
document.lgform.log.value = \'login[x]=new id(\"\' + document.lgform.user.value + \'\",\' + code + \')\\r\\n\' +
\'Copy and paste the above line in the very bottom of pswd.js\\nNotice that the x in login[x] needs to be current number of users.\\r\\nYou should see a help at bottom of pswd.js.\'
}
}


function id(usid,pwd){
this.usid=usid;
this.pwd=pwd;
}

//Done Hiding -->

------------------------------------
denied.htm skal indholde følgende
------------------------------------
<HTML>
<HEAD>
<TITLE>Authentication Failure</TITLE>
</HEAD>
<BODY BGCOLOR=\"#000000\" TEXT=\"#FF0000\">
<BR><BR><BR><CENTER><H1>Access Denied</H1><BR><H2>Password Incorrect<BR><BR>Your access to these password protected pages is denied.</H2></CENTER>
</FONT>
</BODY>
</HTML>

------------------------------------
pswd.js skal indholde følgende
------------------------------------
<!-- Hiding
/*
This is an modification of the original Password Pro which was created by Lefteris Haritou
http://www.geocities.com/~lef
Please notice that this script among with others is copyrighted under the Greek copyright office which
make it valid worldwide except USA.
Some of my latest Script are also copyrighted under the US copyright office too
(http://www.loc.gov/copyright/)

    Edited by Howard Chen
    http://start.at/javascripts/
    hchen007@geocities.com
*/

var base= new Array(\"0\", \"1\", \"2\", \"3\", \"4\", \"5\", \"6\", \"7\", \"8\", \"9\",\"A\", \"B\", \"C\", \"D\", \"E\", \"F\", \"G\", \"H\", \"I\", \"J\", \"K\", \"L\", \"M\", \"N\", \"O\", \"P\", \"Q\", \"R\", \"S\", \"T\", \"U\", \"V\", \"W\", \"X\", \"Y\", \"Z\",\"a\", \"b\", \"c\", \"d\", \"e\", \"f\", \"g\", \"h\", \"i\", \"j\", \"k\", \"l\", \"m\", \"n\", \"o\", \"p\", \"q\", \"r\", \"s\", \"t\", \"u\", \"v\", \"w\", \"x\", \"y\", \"z\")
var alphabet= \"ABCDEFGHIJKLMNOPQRSTUVWXYZ1234567890_\"

var z=23;
var y=28;
var f= new Array();
var K= new Array();
var login=new Array();
var lgnum=0;
for (x=0; x<10; x++){
f[x]=x<<9
f[x]+=23
}
for (x=10; x<36; x++){
y=y<<1
v= Math.sqrt(y)
v = parseInt(v,16)
v+=5
f[x]=v
y++
}
for (x=36; x<62; x++){
z=z<<1
v= Math.sqrt(z)
v = parseInt(v,16)
v+=74
f[x]=v
z++
}

function encode (OrigString, CipherVal) {
        Ref=\"0123456789abcdefghijklmnopqrstuvwxyz._~\"
        Ref=Ref+\"ABCDEFGHIJKLMNOPQRSTUVWXYZ\"
        CipherVal = parseInt(CipherVal)
        var Temp=\"\"
        for (Count=0; Count < OrigString.length; Count++) {
                var TempChar = OrigString.substring (Count, Count+1)
                var Conv = cton(TempChar)
                var Cipher=Conv^CipherVal
                Cipher=ntoc(Cipher)
                Temp += Cipher
        }
        return (Temp)
}

function cton (Char) {
        return (Ref.indexOf(Char));
}

function ntoc (Val) {
        return (Ref.substring(Val, Val+1))
}

function inc(){
iCounter--
if (iCounter > 0){
alert(\'Login / Password Incorrect\\n\\nPlease try again\')
document.lgform.user.value=\"\"
document.lgform.passwd.value=\"\"
lgnum=0
}
else
location.href=\'denied.htm\'
}

function check(){
if (lgnum<login.length){
if (document.lgform.user.value==login[lgnum].usid)
pwdchk()
else{
lgnum++
check()
}
}
else
inc()
}


function pwdchk(){
var pass=document.lgform.passwd.value
var lpass=pass.length
for (l=0; l<lpass; l++){
K[l]=pass.charAt(l)
}
var code=0;
for (y=0; y<lpass; y++){
for(x=0; x<62; x++){
if (K[y]==base[x])
code+=(y+1)*f[x]
}
}
if (code==login[lgnum].pwd)
go(encode(document.lgform.passwd.value, lpass))
else
inc()
}


function go(site){
location.href= site + \'.htm\'
}

function id(usid,pwd){
this.usid=usid;
this.pwd=pwd;
}

var iCounter=3


//---------------------------------------------------------------------------
/*  Paste your user name below this line and the logins you had pasted,
    the number that should take place of \"x\" in login[x] is the number
    of current users not including the one you are adding.  For example,
    if there is only 1 user login below, then there is 1 current user,
    so you use 1 instead of x such as  login[1](\"Username\",12345). 
    REMANBER, YOU DON\'T CHANGE THE NUMBER AFTER YOU PUT THEM DOWN, so the
    numbers should be ascending, for instance, if you have three users,
    their x should be login[0], login[1], and login[2].              */
//---------------------------------------------------------------------------
login[0]=new id(\"Casper\",371796)


//Done Hiding -->

Ikke så lidt kode, men det burde virker ... det er evigheder siden jeg har kigget på det sidst ...
Avatar billede burningice Nybegynder
11. februar 2001 - 18:16 #15
repsac> skal vi lave en lille religionskrig her ?? *LOL*

ok, som jeg ser det er der to måder at få løst der her på. Enten sætter du dig ind i php eller asp, eller også lader du en af os (læs: mig) lave et fuldt ud funktionelt loginsystem til dig, med et admin modul hvorved du kan oprette, slette og redigere bruger via en webside.
Avatar billede repsac Nybegynder
11. februar 2001 - 18:18 #16
Religionskrig ... den er begyndt ... ;o) PHP STYRER!!!
Avatar billede burningice Nybegynder
11. februar 2001 - 18:19 #17
hmm... det var ellers ikke så lidt... ;)
Avatar billede repsac Nybegynder
11. februar 2001 - 18:19 #18
PHP er (relativt) nemt, gratis og der findes tonsvis af toturials her på nettet ...
Avatar billede burningice Nybegynder
11. februar 2001 - 18:20 #19
ASP+ACCESS(SQL)+IIS, mums... det er for godt.
Avatar billede repsac Nybegynder
11. februar 2001 - 18:21 #20
Nej ... lad os nu høre lidt på look4me i stedet for at hævde \"vores\" prog.sprog ...
Avatar billede repsac Nybegynder
11. februar 2001 - 18:22 #21
Access sutter!!!
MySQL styrer! - det må du sq da indrømme ...
Avatar billede repsac Nybegynder
11. februar 2001 - 18:23 #22
Rrrrrrr ... sig php og jeg smyger mig om dine knæhaser ... *LOVVVL*
Avatar billede look4me Nybegynder
11. februar 2001 - 18:31 #23
Tjahh... jeg må sige timeout...*GG*
Jeg er sq\' kommet op i mod 2 hardcore programmører... og det er ikke lige til at gennemskue alle jeres hurtige svar...! OG DOG!!! ;-)
Jeg må tilstå, at jeg lige har købt et hæfte vedr. PHP men det ligner til forveksling ganske alm. HTML... og lidt gammel DOS *SS*
Tro nu ikke at jeg er hardcore i alt det her... DET ER JEG IKKE! *SM*
Hvad gør ASP større end PHP?
Avatar billede repsac Nybegynder
11. februar 2001 - 18:33 #24
Lige mine ord ... ;)
Avatar billede look4me Nybegynder
11. februar 2001 - 18:33 #25
Eller hvad gør PHP størrer end ASP (PHP>ASP)...!;-)
Avatar billede repsac Nybegynder
11. februar 2001 - 18:37 #26
Ehh ...
PHP er nemt at forstå når du kender lidt til HTML - som er dét man starter med når man vil lave hjemmesider!
PHP er gratis!
Næsten alle verdens webservere har php (og oftest php4) installeret (det samme gælder ca. for asp)!
Der findes et utal af tutorials på nettet om PHP!
Avatar billede look4me Nybegynder
11. februar 2001 - 18:40 #27
repasac...
Jeg sidder lige og læser på din kode og hvis det er i orden med dig, så \"napper\" jeg en kopi og tester på min egene sider...!

cyberfessor...
Har du et godt programmerbart eksempel på din styrke...! *LOL*
Avatar billede repsac Nybegynder
11. februar 2001 - 18:40 #28
PHP spiller meget godt sammen med MySQL som nok er det førende databasesystem ... det bedste som flerbrugerdatabase ...
Man skal ikke som ved Access hente hele tabellen for at se hvad der står et enkelt sted. Det beder man MySQL-serveren om og så får du smidt i hovedet hvad du ønsker ... hurtigere og mere sikkert!
  - forestil dig en DB på 15mb ... øv hvis det er Access ... ligegyldigt hvis det er MySQL!
Avatar billede repsac Nybegynder
11. februar 2001 - 18:41 #29
Eksemplet herover har intet med php at gøre ... det er \"ren\" DHTML ...
Avatar billede burningice Nybegynder
11. februar 2001 - 18:42 #30
php... er du glad nu?? og nej, jeg er faktisk overhovedet ikke hardcore programmør. Jeg er faktisk først startet med asp for ca. 2 måneder siden, men jeg vil nu sige at det er ret nemt, eller også er jeg bare lærenem :)
Jeg skal ikke kunne sige hvad der er det bedste, det er vel en temperement-sag. Eller hvad ;)

Men jeg kunne egentlig også godt tænke mig at vide hvad der er så godt ved php fremfor asp. altså, bortset fra at asp er MS\'s opfindelse.
Avatar billede repsac Nybegynder
11. februar 2001 - 18:49 #31
Tjaehh jeg er heller ikke hardcore!
Er begyndt på php lidt inden jul ...
M$ ... pengepungen frem ...
PHP+Apache+Mysql = gratis (\"skabt\" til linux/unix ...)

Nu kender jeg faktisk ikke ret meget til asp så jeg burde måske ikke være så afvisende, men jeg har bare oplevet så stor succes med php så jeg kan ikke andet end at anbefale det ...
Avatar billede repsac Nybegynder
11. februar 2001 - 18:52 #32
Min den gamle linux-mand og kender meget til apache ... derfor php for mit vedkommende ...

=>cyberfe...: \"en temperement-sag\" - yeps!
Avatar billede repsac Nybegynder
11. februar 2001 - 18:55 #33
[http://www.webcafe.dk] har nogle herre gode toturials (\"artikler\") om alt muligt vedrørende webbaseret programmering ...
HTML, PHP, forskellige DB\'er, Java, Perl etc.
Hvis du har lyst til at begive dig ud i den rigtige web-verden bør du nok starte med HTML i stedet for at bruge et program til at lave siderne med! - er vi enige cyberfessor?
Avatar billede look4me Nybegynder
11. februar 2001 - 18:56 #34
Tjahhh...!!!
Jeg tror sq\' jeg trækker en vinder næste uge samme tid samme stede *GMH*
Nåh.. nej det går sikkert ikke... vinderen bliver denne gang ... resac... - så desværre cyberfessor men du kom med nogle interessante oplysninger til et andet projekt jeg sikkert kommer til at sidde med. :-)
Alt i alt så har I begge givet mig et par idéer og links til nogle interssante sites og hvem ved så vil det måske være moi der skal spille med \"musklerne\" hehe!

Hvis der dukker noget op en dag, så er min email <A HREF=\"mailto:cookie_1@get2net.dk\"></A>...!
Avatar billede look4me Nybegynder
11. februar 2001 - 18:57 #35
tjah der kan man se... det er ikke al HTML man skal bruge...!
Avatar billede repsac Nybegynder
11. februar 2001 - 18:57 #36
Arrh ... du ka\' da lidt HTML ...
Avatar billede burningice Nybegynder
11. februar 2001 - 18:57 #37
look4me> Tjaa... du kan da godt få smidt koden i hovedet... hvis du vil se, jeg ved bare ikke hvor meget det siger dig

------------------
main.asp < der hvor man logger ind
------------------

<html>
<head>
<title>login</title>
</head>
<body bgcolor=\"#008000\" marginwidth=\"0\" marginheight=\"0\" topmargin=\"0\" leftmargin=\"0\">

<div align=\"left\">
  <table border=\"0\" width=\"763\" height=\"436\" cellspacing=\"0\" cellpadding=\"0\">
    <tr>
      <td width=\"127\" height=\"220\" rowspan=\"3\" bgcolor=\"#D8CD58\"></td>
      <td width=\"10\" height=\"415\" rowspan=\"5\"></td>
      <td width=\"613\" height=\"10\"></td>
    </tr>
    <tr>
      <td width=\"613\" height=\"18\"><p class=\"overskrift\">Forhandler Login</td>
    </tr>
    <tr>
      <td width=\"613\" height=\"109\">

<form method=\"POST\" action=\"kontrol.asp\" name=\"loginform\">
  <div align=\"left\">
    <table border=\"0\" width=\"337\" height=\"77\" cellspacing=\"1\">
      <tr>
        <td width=\"104\" height=\"28\"><b>Brugernavn:</b></td>
        <td width=\"217\" height=\"28\"><input type=\"text\" name=\"login\" value=\"<%= Request.Cookies(\"Login\")(\"Username\")%>\"></td>
      </tr>
      <tr>
        <td width=\"104\" height=\"37\"><b>Adgangskode :</b></td>
        <td width=\"217\" height=\"37\"><input type=\"password\" name=\"pw\" value=\"<%= Request.Cookies(\"Login\")(\"Password\")%>\"></td>
      </tr>
    </table>
  </div>
  <p><input type=\"submit\" value=\"Login\"></p>
</form>
<p>

    </td>
    </tr>
    <tr>
      <td width=\"127\" height=\"270\" rowspan=\"2\" bgcolor=\"#D8CD58\">&nbsp;</td>
      <td width=\"613\" height=\"50\">
     
   
      </td>
    </tr>
    <tr>
      <td width=\"613\" height=\"139\">
     
      </td>
    </tr>
  </table>
</div>

</body>
</html>

-----------
kontrol.asp < her tjekkes login med db
-----------

<%
Function GenSessionID
    rem === GET REMOTE IP ADDRESS ===
    RemoteAddr = Request.ServerVariables(\"REMOTE_ADDR\")
    RemoteAddr = Replace(RemoteAddr,\".\",\"\")

    rem === APPEND CURRENT TIME ====
    CurrentDateTime = CStr(Month(Now()) & Year(Now()) & Day(Now()) & Minute(Now()) & Hour(Now()) & Second(Now()))

    rem === GENERATE RANDOM FILLERS ====
      \' Generate string 30 characters long
      \' from ascii 48 to 95 (0-9,A-Z)
      Randomize
      GenSessionID = \"\"
      y = \"\"
      For i = 1 To 30
        \' j decides if character is number or letter
          j = Int((2)* Rnd + 1)
          Select Case j
            Case 1
                \' k uses Rnd to get random Integer
                k = Int((57 - 48 + 1) * Rnd + 48)
                y = y & Chr(k)
            Case 2
                \' k uses Rnd to get random letter
                  k = Int((90 - 65 + 1) * Rnd + 65)
                y = y & Chr(k)
          End Select
    Next
      GenSessionID = RemoteAddr & CurrentDateTime & y
   
    rem === retain only 40 characters ====
      GenSessionID = Left(GenSessionID,40)
End Function
%>

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

Const adOpenKeyset = 1
Const adLockOptimistic = 3

strSQL = \"SELECT * FROM Login WHERE (Password=\'\" & Request.Form(\"pw\") & \"\') AND (Username = \'\" & Request.Form(\"login\") & \"\')\"
set rs = conn.execute(strSQL)
   
If RS.EOF Then
Response.Redirect(\"fejl.asp?page=main&code=718\")

RS.Close
Set RS = Nothing

Else   
%>

<% Session(\"adgang\") = GenSessionID %>

<%
Set rs1 = Server.CreateObject(\"ADODB.RecordSet\")
strSQL1 = \"SELECT * FROM session\"
rs1.Open strSQL1, Conn, adOpenKeyset, adLockOptimistic

RS1.addnew
rs1(\"session\") = Session(\"adgang\")
rs1(\"navn\") = rs(\"RealName\")
rs1(\"type\") = rs(\"type\")
rs1(\"tid\") = (now)
rs1(\"ip\") = Request.ServerVariables(\"REMOTE_ADDR\")
rs1.update

rs1.close
set rs1 = nothing
%>

<%Response.Redirect(\"inside.asp?session=\"& Session(\"adgang\") &\"\")%>

<% End If

Conn.close
Set conn = nothing
%>

----------
fejl.asp < side med forskellige fejlkmeddelelser
----------
<% page = request(\"page\") %>
<% if page = \"main\" then %>
<HTML>
<HEAD>

<base target=\"_blank\">
</head>

<body bgcolor=\"#008000\">

<% Select Case Request.Querystring(\"code\")%>

<% Case \"517\" %>

<p class=\"menu\"><span style=\"background-color: #FF0000\">Fatal error<br>
Error code <%=Request.QueryString(\"code\")%></span><p>

<p class=\"menu\">You don\'t have rights to view this page<p>
<p class=\"menu\">Solution: You need to log in<p>
<a href=\"main.asp\">Log in</a>

<% Case \"718\" %>

<p class=\"menu\"><span style=\"background-color: #FF0000\">Fatal error<br>
Error code <%=Request.QueryString(\"code\")%></span><p>

<p class=\"menu\">There was an error in either your username or password<p>
<p class=\"menu\">Solution: Try again<p>
<a href=\"main.asp\" target=\"_self\">Log in</a>

<% case \"1983\" %>

<p class=\"menu\"><span style=\"background-color: #FF0000\">Fatal error<br>
Error code <%=Request.QueryString(\"code\")%></span><p>

<p class=\"menu\">There was an fatal error in your sessionID.<p>
<p class=\"menu\">Solution: Log in to get a new sessionID<p>
<a href=\"main.asp\" target=\"_self\">Log in</a>

<% end select %>

</BODY>
</HTML>
<% end if %>

----------
inside.asp < siden som er password protected
----------
<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"db/dbtemp.mdb\")

Const adOpenKeyset = 1
Const adLockOptimistic = 3

%>


<html>
<head>

</head>
<body bgcolor=\"#008000\">

<%
strSQLsession = \"SELECT * FROM session WHERE (session =\'\"& request.querystring(\"session\") &\"\')\"
set rssession = conn.execute(strSQLsession)
%>

<% if rssession.eof then %>
hmmm... dit sessionID stemmer ikke overens med de oplysninger som er gemt i databasen. Prøv at log ind igen.
<% end if %>

<p class=\"overskrift\">Hej <%=rssession(\"navn\")%></p>

<% if rssession(\"type\") = \"Admin\" then %>

<%
\'Undersøger om session(\"Adgang\") er sat til Godkendt, er den ikke det bliver man sendt tilbage til adgangskontrol.asp
    If Not Session(\"Adgang\") = request.querystring(\"session\") Then
        Response.Redirect(\"login/fejl.asp?page=main&code=517\")
    End If
%>

<% end if %>

</body>
</html>
Avatar billede repsac Nybegynder
11. februar 2001 - 18:59 #38
Der er jo taget højde for mailadresser og webadresser ... det\'r jo php eksperten er lavet i ... ;o)
Avatar billede look4me Nybegynder
11. februar 2001 - 19:00 #39
oki! *SS*
Avatar billede burningice Nybegynder
11. februar 2001 - 19:03 #40
gosh, guess im too slow :(

hehe

ja, vi er enige repsac. ved at kode siderne i hånden har man den bedste kontrol med sine sider. Det giver også den forståelse for tingene.

look4me> det er okay... like i said, guess im just too slow ;)
Avatar billede look4me Nybegynder
11. februar 2001 - 19:08 #41
cyberfessor...
Bukker og tager hatten af... - det ser ret godt ud - og det skal jeg jo sige for ikke at krænke din ære...ups ups...!
Men jeg lover dig, at jeg også laver test på denne og eventuelle kommentar...!
Jeg vil vende tilbage til dig med nogle kodeproblemer i mellem emailprogrammet outlook versus MS-offices\' faxprogram og deres faste \"blokke\" i faxens opbygning samt link til emaildatabasen. Det er ganske enkelt irreterende at skulle kopiere adresser over i faxen! :-/
Avatar billede burningice Nybegynder
11. februar 2001 - 19:12 #42
look4me> den kode som jeg smed her på siden er sikkert fyldt med fejl, da jeg hurtigt skulle finde noget frem til dig, og alligevel var det for langsomt :)
Hvis du vil bruge ovenstående kode så sig lige til da jeg så også evt. kan sende dig en tom db som indeholder de tabeller og felter som er nødvendige for at det hele funker.
Avatar billede look4me Nybegynder
11. februar 2001 - 19:12 #43
Nå men \"bestyrelsen\" vil have jeg skal komme ud og spise men jeg vender frygteligt tilbage...hmmm!!! =(;-o)
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