Avatar billede Slettet bruger
16. juli 2001 - 14:41 Der er 7 kommentarer og
1 løsning

Hjælp med sousekode

Hej jeg har en kode her som jeg gerne vil har lave lidt om på da jeg geren vil have den til at hente oplysninger fra en database. jeg fandt selv en gang en kode som jeg kunde lave om på så jeg ved det kan lade sig gøre men desvære har jeg ikke denne kode så der for søger jeg hjælp..

Sousekode..
<%
\' 1 = Basic, 2 = NTLM
CONST AuthType = 1

strUser = Trim(Request.ServerVariables(\"AUTH_USER\"))
If strUser = \"\" Then
    Response.Status = \"401 Not Authorized\"
    If AuthType = 1 Then
        Response.AddHeader \"WWW-Authenticate\", \"Basic Realm=\"\"ActiveServerPages.DK\"\"\"
    Else
        Response.AddHeader \"WWW-Authenticate\", \"NTLM\"
    End If
    Response.End
End If
%>
<html><head>
<title>Beskyt med authentication</title>
</head><body>

<p>Velkommen <b><%=strUser%></b> - denne side er beskyttet med password.</p>

</body></html>
Avatar billede nordclc Nybegynder
16. juli 2001 - 14:45 #1
Det sjoveste er jo altid at løse problemet selv, men sjældent det hurtigste :o)

Disse sider gør det muligt for dig, at løse dit problem inden kl. 06:30 i morgen tidlig (hvis du altså bliver oppe i nat!):
http://www.html.dk/tutorials/asp/

//Claus
Avatar billede Slettet bruger
16. juli 2001 - 15:26 #2
Har funde nåde kode..

<%
Response.Expires = -1
Response.Buffer = True
Session.Timeout = 5
%>

<!--#include virtual=\"include/connstring.asp\" -->
<%
if Request.ServerVariables(\"AUTH_USER\")=\"\" and Request.ServerVariables(\"AUTH_PASSWORD\")=\"\" then
IsAdmin=false
IsUser=false
end if

if not (IsUser and IsAdmin) then
Set conn = Server.CreateObject(\"ADODB.Connection\")
conn.open ConnString
set  = conn.execute(\"select level from users where nick=\'\"&Request.ServerVariables(\"AUTH_USER\")&\"\' and pass=\'\"&Request.ServerVariables(\"AUTH_PASSWORD\")&\"\'\")
    if not (.EOF or .BOF) then
    IsUser=True
        if (int((\"level\")) = 10 or int((\"level\")) = 9) then
        IsAdmin=True
        else
        IsAdmin=false
        end if
    else
    IsUser=false
    end if
end if

if not (IsUser and IsAdmin) then
Response.Addheader \"WWW-Authenticate\", \"BASIC Realm=\"&chr(34)&\"User Authorization\"&chr(34)&\"\"
response.Status = 401
%><!DOCTYPE HTML PUBLIC \"-//IETF//DTD HTML 2.0//EN\">
<HTML><HEAD><TITLE>401 Authorization Required</TITLE></HEAD>
<BODY BGCOLOR=\"#FFFFFF\" TEXT=\"#000000\"><H1>401 Authorization Required</H1>
<p>Either you gave a wrong username or password, or your browser did not send the information correctly.</p>
<p>You don´t have permission to access <%= Request.ServerVariables(\"SCRIPT_NAME\") %> on this server.</p></BODY></HTML><%
response.end
end if
conn.close
set conn = nothing
%>

Men kan desvære bare ikke få det til at virke...

Hjælp...
Avatar billede nordclc Nybegynder
17. juli 2001 - 08:06 #3
Hvad er problemet?
Du kan jo evt. også downloade et nyt:
http://www.viewsource.dk/pop.asp?ID=46&Cat=asp

//Claus
Avatar billede nordclc Nybegynder
17. juli 2001 - 11:11 #4
Der er flere af slagsen på: http://www.viewsource.dk
Avatar billede Slettet bruger
21. juli 2001 - 07:48 #5
Det skal være den kode da den henter en box op.

Avatar billede Slettet bruger
29. juli 2001 - 16:21 #6
Hallo er der ikke bare en der kender til den kode og kan hjælpe mig..
Avatar billede Slettet bruger
10. august 2001 - 13:01 #7
Kan du ike sende mig filen og databasen?
Avatar billede Slettet bruger
21. december 2001 - 14:55 #8
Da jeg ikke kan få den hjælp jeg søger er jeg gåde væk fra iden..
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