Avatar billede chatmanden Nybegynder
22. december 2001 - 19:29 Der er 16 kommentarer og
3 løsninger

Session ?

Hejsa...

Hvorfor virker min session ik ?

        If Not rs.EOF Then
              Sql = \"SELECT * FROM brugere WHERE Brugernavn=\'\"& Brugernavn &\"\' AND Password=\'\"& Password &\"\' AND ip=\'\"&  Request.ServerVariables(\"REMOTE_ADDR\") &\"\'\"
              rs = conn.execute(Sql)
          Session(\"Brugernavn\") = RS(\"Brugernavn\")
          Session(\"Password\") = RS(\"Password\")
          Sql2 = \"Update brugere Set Online = \'1\' Where Brugernavn=\"\' & Brugernavn & \'\"\" AND Password=\'\"& Password &\"\'
          Rs2 = Conn.execute(Sql2)

          Response.Redirect(\"<META HTTP-EQUIV=\'Refresh\' CONTENT=\'0;URL=frame.asp\'>\")

        Else

        Response.Redirect(\"login.asp?mode=forkert\")

End If
Avatar billede invisibleman Nybegynder
22. december 2001 - 19:32 #1
Response.Redirect(\"<META HTTP-EQUIV=\'Refresh\' CONTENT=\'0;URL=frame.asp\'>\")

Du kan ikke redirecte til det!

Du kan kun redirecte til filnavnet/URL\'s som du f.eks. har gjort nederst.
Avatar billede Slettet bruger
22. december 2001 - 19:33 #2
Byt rs = conn.execute(Sql)

ud med Set rs = conn.execute(Sql)

måske?
Avatar billede invisibleman Nybegynder
22. december 2001 - 19:37 #3
Mener faktisk at rs = Conn .. virker fint .. men ikke sikker.


PS. Så behøver man ikke Rs2 = Conn... når du bruger UPDATE, INSERT, ALTER, DROP osv.
Avatar billede Slettet bruger
22. december 2001 - 19:39 #4
usynlig: Oki. Kunne ikke helt huske om det var nødvendigt med Set når det er objekter. Bruger det bare for en sikkerheds skyld ;)
Avatar billede invisibleman Nybegynder
22. december 2001 - 19:40 #5
Nemmerligt .. bruger også selv Set Rs = .. pga. det er en objekt reference ...
Avatar billede freedom Nybegynder
22. december 2001 - 19:45 #6
rs = conn.execute(Sql) skal være =
RS = conn.execute(Sql)
Avatar billede invisibleman Nybegynder
22. december 2001 - 19:47 #7
freedom: Nixen .. ASP er ikke case sensitive! Det er kun PHP, Perl og andre *nix orienterede sprog.
Avatar billede Slettet bruger
22. december 2001 - 19:50 #8
så skulle det også have været Conn.Execute, da metoderne er med stort...
Avatar billede invisibleman Nybegynder
22. december 2001 - 20:34 #9
magik: Gør *heller* ikke noget. ASP er meget \"løst\" .. det er ikke case sensitive ..
Avatar billede Slettet bruger
22. december 2001 - 20:40 #10
Det ved jeg godt, men hvis han mener at noget skal være det, så skal resten vel osse...
Avatar billede invisibleman Nybegynder
22. december 2001 - 20:41 #11
Hvad mener du ? Det giver ikke rigtigt mening ;-)
Avatar billede Slettet bruger
22. december 2001 - 20:47 #12
Never mind. Mente bare at hvis noget skal være case sensitive, skal andet vel osse. Ifølge MS hedder det Conn.Execute og ikke conn.execute.

Men alt i alt en ligegyldig kommentar fra min side ;)
Avatar billede invisibleman Nybegynder
22. december 2001 - 20:55 #13
Intet er Case sensitive i ASP. Og du kan ikke *gøre* det Case Sensitive, men jeg skriver f.eks. selv Conn.Execute fordi det ser pænest ud.
Avatar billede Slettet bruger
22. december 2001 - 21:01 #14
Det ved jeg godt, men der er jo altid dokumentation til den slags, og der er keywords som If og Then med stort, lige så vel som Execute i connection objektet.

Var bare af den overbevisning at freedom troede at ASP var Case Sensitive.

Jeg er ikke helt newbie ;)
Avatar billede chatmanden Nybegynder
22. december 2001 - 21:09 #15
Hej igen...

Jeg læser lige det hele igennem :)
Avatar billede chatmanden Nybegynder
22. december 2001 - 21:25 #16
Jeg tror ik fejlen er ved denne linje.
Response.Redirect(\"<META HTTP-EQUIV=\'Refresh\' CONTENT=\'0;URL=frame.asp\'>\")

da Jeg har skiftet det til

Response.Redirect(\"nybruger.asp\")

og det virkede ik..

Når linket skifter til
login.asp?mode=login

så får jeg :
Siden kan ikke vises
Avatar billede chatmanden Nybegynder
22. december 2001 - 21:52 #17
har kodet det hele fra bunden igen :)

og det virker :)

<%
If Request.QueryString(\"mode\") = \"login\" Then
Dim Tid
Brugernavn = Request.Form(\"Brugernavn\")
Password = Request.Form(\"Password\")
Tid = Now()

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

Set Rs = Conn.Execute(\"SELECT * FROM brugere WHERE brugernavn=\'\" & Brugernavn & \"\' And Password=\'\" & Password & \"\'\")

If Not Rs.EOF Then
Sql = (\"Update Brugere Set Online=\'1\' WHERE brugernavn=\'\" & Brugernavn & \"\' And Password=\'\" & Password & \"\'\")
Session(\"Brugernavn\") = RS(\"Brugernavn\")
Session(\"Bruger_ID\") = RS(\"ID\")
Session(\"Tid\") = Response.Write(\"TID\")
Response.Redirect(\"nybruger.asp\")
Else
Response.Redirect(\"login.asp?mode=findesik\")
End If
Conn.Close
Set Conn = Nothing
End If
%>
Avatar billede chatmanden Nybegynder
22. december 2001 - 21:52 #18
invisibleman < der er forskel mellem stor/små bogstaver det handler om QueryString :) !!
Avatar billede chatmanden Nybegynder
22. december 2001 - 22:00 #19
mente når det handler om QueryString :)
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

IT-JOB

Det Nationale Forskningscenter for Arbejdsmiljø

IT-sikkerhedsspecialist med fokus på AI inden for forskning

Politiets Efterretningstjeneste

Netværksspecialist til IT i PET

RackPeople

Teknisk Lead