Article View: dk.edb.internet.webdesign.asp
Article #12005Re: Password i asp
From: M
Date: Tue, 30 Jun 1998 00:00
Date: Tue, 30 Jun 1998 00:00
71 lines
2891 bytes
2891 bytes
M@ds skrev i meddelelsen <6nb0ei$2eco$2@news-inn.inet.tele.dk>...
>Karsten Jyhne skrev i meddelelsen <3596826e.9563690@news.inet.tele.dk>...
>>Jeg skal hj�lpe med at lave en hjemmeside med brugernavn og password
>>beskyttelse for en bruger af et professionelt TD @ abonnement. Siden
>>ligger p� en Microsoft Internet Information Server 4.0, s� det burde
>>kunne lade sig g�re i ASP, men hvordan?
>>
Jeg kan ikke lige finde scriptet p� min harddisk. Det ligger sikkert p�
arbejdet. S� jeg poster det i morgen eftermiddag.
>
>>Hvis vedkommende gerne vil have en t�ller p� siden, hvordan g�r jeg s�
>>smartest det.?
>>
>Du kan lave det med en database og ASP.
>
Databasen:
Lav en database, f.eks. med MS Access.
Opret en tabel der hedder "TblVisits"
Lav f�lgende kollonner:
Page
NoVisits
Since
I "Page" skriver du dine sidenavn, f.eks. "Hovedside".
I "NoVisits" skriver du bare 0
I "Since" skriver du datoerne du har oprettet t�llerne.
ASP-koden:
<%
Pagename = "SideNavn" ' Inds�t sidenavnet her. F.eks. Hovedside
Set dbCon = Server.CreateObject("ADODB.Connection")
DSNfake = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" &
server.mappath("/database_sti/testdb.mdb")
' Erstat /databasesti/testdb.mdb med stien til din database og dit database
navn.
' Finder bes�gstal i databasen
dbCon.open DSNfake
set dbRs = dbCon.Execute("SELECT * FROM TblVisits WHERE Page = '" & Pagename
& "'")
NoVisits = dbRs("NoVisits") + 1
Since = dbRs("Since")
dbCon.close
' Gemmer det nye bes�gstal i databasen
dbCon.open DSNfake
Set dbRs = dbCon.Execute("UPDATE TblVisits SET NoVisits='" & NoVisits & "'
WHERE Page = '" & Pagename & "'")
dbCon.close
%>
Du er bes�gende nr. <% = NoVisits %>. Siden d. <% = Since %>.
Som du kan se, opretter jeg databaseforbindelsen, uden et DSN. Hvis du har
et DSN-navn, skal du rette DSNfake til det.
Hvis du har nogle problemer med scriptet eller sp�rgsm�l om det, skal du
bare e-maile til mig.
Mojn
M@ds
On replys to Newsgroup, please make a CC: to my e-mail.
Ved svar til nyhedsgruppen, send venligst en CC: til min e-mail*
E-mail: mads@iname.com ICQ: 13562453
WWW: http://home5.inet.tele.dk/byr-tan
* Jeg siger det ikke fordi jeg er doven, men s� jeg har mulighed for at se
p� min mobiltelefon n�r der er kommet svar i en nyhedsgruppe, og derefter
har mulighed for hurtigt at give et evt. gen-svar.
Technical Details
Message-ID:
<6nb7oi$d7o$1@news-inn.inet.tele.dk>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<3596826e.9563690@news.inet.tele.dk> <6nb0ei$2eco$2@news-inn.inet.tele.dk>Show Full Headers
Complete Article Headers
X-Google-Language: DANISH,ASCII X-Google-Thread: ff435,16e2b550c4198312 X-Google-Attributes: gidff435,public From: "M@ds" <mads@iname.com> Subject: Re: Password i asp Date: 1998/06/30 Message-ID: <6nb7oi$d7o$1@news-inn.inet.tele.dk> X-Deja-AN: 367483055 References: <3596826e.9563690@news.inet.tele.dk> <6nb0ei$2eco$2@news-inn.inet.tele.dk> X-MimeOLE: Produced By Microsoft MimeOLE V4.71.1712.3 Newsgroups: dk.edb.internet.webdesign.asp