Hej Jens
Først tak for et hurtigt og klart svar!
Jeg har desværre forsøgt mig med at komme i kontakt med MySql med det
scripteksempel der findes på One.com´s hjemmeside om support.
Når jeg refererer til til en "sti" var det forsi jeg (fejlagtigt) troede at
der måske skulle yderligere specificeres HVOR databasen er anbragt.
Min database hedder ifølge MYsqladmin senius_dk og jeg skal bruge et
servernavn der så er "Localhost" så vidt så godt, men det er desværre ikke
muligt at få enden end denne fejlmeddelelse:
Technical Information (for support personnel)
a.. Error Type:
ADODB.Connection.1 (0x80004005)
SQLState: S1T00 Native Error Code: 2003 [MySQL][ODBC 3.51 Driver]Can't
connect to MySQL server on 'Localhost' (4)
/checklogin.asp, line 45
b.. Browser Type:
Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 2.0.50727)
c.. Page:
POST 51 bytes to /checklogin.asp
d.. POST Data:
dologin=TRUE&brugernavn=senius_dk&password=eeh86rca
e.. Time:
Saturday, February 10, 2007, 9:11:43 PM
Her er koden for checklogin.asp
<%'*******************************************************************************************
' Dette er filen, som opretter forbindelse til MySQL Serveren. Herefter
hentes data ud fra
' formen jeg har lavet i default.asp filen. Der hentes 3 oplysninger.
Brugernavn og Password
' som blev indtastet på default.asp siden. Herudover hentes en anden
oplysning. Nemlig DOLOGIN
' Jeg bruger DOLOGIN til at se om denne side er hentet som led i login. Hvis
denne side er tastet
' direkte i browserens adressebar, redirectes til default.asp siden. På den
måde kan der kun
' blive udført en MySQL forespørgelse, hvis man har indtastet brugernavn og
password på default.asp
' siden.
'********************************************************************************************%>
<%
' Her henter jeg dologin data værdien fra formen på default.asp siden.
' Hvis denne værdi ikke er TRUE, så udføres scriptet ikke, og der
' redirectes til default.asp siden.
strdologin = request.form("dologin")
if strdologin = "TRUE" then
' Hvis dologin er TRUE så henter jeg de 2 andre værdier. Nemlig det
indtastede brugernavn og password.
strbrugernavn = request.form("brugernavn")
strPassword = request.form("password")
' Der er ikke indtastet brugernavn, hvis strbrugernavn er = "".
' Jeg sætter nu bare for en sikkerhedsskyld strbrugernavn og strpassword til
intet. Herefter redirecter jeg
' til default.asp siden.
if (strbrugernavn="") then
strbrugernavn = ""
strpassword = ""
strdologin = ""
Response.Redirect "default.asp"
' Hvis strbrugernavn ikke er tom, søger vi vores MySQL database igennem. Vi
vil gerne have passwordet
' der hvor tabellen brugernavn er = strbrugernavn. Altså det brugernavn der
blev indtastet på default.asp siden.
else
' Jeg opretter her forbindelsen til MySQL databasen :
' Husk at rette brugernavn, password og databasenavn til.
DB_FORBINDSTRENG =
"driver=MySQL;server=Localhost;uid=senius_dk;pwd=eeh86rca;database=senius_dk"
'## MySQL w/ MyODBC v2.50
strConn = DB_FORBINDSTRENG
set conn=server.createobject("adodb.connection")
conn.Open strConn
conn.Open "SELECT password FROM brugere WHERE brugernavn = '" &
strbrugernavn & "'",strConn
' Vi har nu hentet password ud fra databasen, som passer til det brugernavn
vi indtastede på default.asp siden.
' Nu skal vi tjekke om det password passer med det som brugeren indtastede
på default.asp siden. Det password
' brugeren indtastede har vi jo hentet ud i strpassword tidligere i dette
script. Vi tjekker om de passer sammen, hvis
' de gør det, så sætter vi session "access" til at være "TRUE". Herefter
guider vi brugeren over på den egentlig hjemmeside.
' I dette eksempel har jeg kaldt den for hovedside.asp.
' Det som man skal huske er så på alle sine sider at tjekker for om session
"access" er sat til TRUE. Hvis den ikke er det,
' skal man guide brugeren over på default.asp siden, så brugeren kan logge
ind.
' Det gøres ved i toppen af alle sine asp filer, at tilføje følgende kode :
' if session("access") = "TRUE" then
' Herefter kommer hele ens HTML eller ASP kode. Altså selve filen. I bunden
af ens side indsætter man følgende kode :
' else
' response.redirect "default.asp"
if conn("password") = strpassword then
session("access") = "TRUE"
' Jeg lukker nu database forbindelsen igen, sætter session access til TRUE
og guider brugeren over
' til den rigtige hjemmeside. Jeg sætter også strbrugernavn og strpassword
til intet, da vi ikke skal bruge
' disse variabler mere. Vi har jo sat session("access") til TRUE.
conn.close()
set conn = nothing
strbrugernavn = ""
strpassword = ""
strdologin = ""
resonse.redirect "hovedside.asp"
else
' Jeg sætter strpassword samt strbrugernavn til intet, hvis ikke password
passer med det som brugeren indtastede.
' Herefter redirecter jeg igen til default.asp, så brugeren kan prøve en
gang til.
strpassword = ""
strbrugernavn = ""
response.redirect "default.asp"
end if
end if
else
response.redirect "default.asp"
end if
%>
Mit passsword har jeg ladet stå skrevet da det jo kan ændres
Jeg håber at du - på trods af et melodi grand prix, måske kunne hjælpe mig
til i det mindste at "kunne se " min database?
--
Med venlig hilsen
John
http://www.dkfritidmotorcykel.dk/?id=1071