Avatar billede swiffer Nybegynder
03. maj 2001 - 19:10 Der er 11 kommentarer og
1 løsning

hvorfor dur det nu ikke=====?

(databaseconnection)

RS(\"sidstloggetpå\") = date()

If RS(\"sidstloggetpå\") = date() THEN
%>
<SCRIPT language=\"JavaScript\">
  alert(\'du har været her flere gange idag og må ikke komme ind \')
    self.close()
</SCRIPT>
<%
End if
Avatar billede swiffer Nybegynder
03. maj 2001 - 19:11 #1
den skriver ikke at man har været der flere gange :(
Avatar billede nute Nybegynder
03. maj 2001 - 19:16 #2
Avatar billede ldanielsen Nybegynder
03. maj 2001 - 19:21 #3
RS(\"sidstloggetpå\") = date()
RS.Update
If RS(\"sidstloggetpå\") = date() THEN
%>
Avatar billede swiffer Nybegynder
03. maj 2001 - 19:35 #4
Det hjælper ikke...
Avatar billede ldanielsen Nybegynder
03. maj 2001 - 19:39 #5
Lad os lige se al koden, eller bare der hvor du åbner RS
Avatar billede jvh Nybegynder
03. maj 2001 - 19:47 #6
Jeg gætter på det er fordi, du sammenligner 2 forskellige objekter. Prøv:
if rs(\"sidstloggetpå\").value = date() then
Avatar billede swiffer Nybegynder
03. maj 2001 - 21:51 #7
SIDE1
------
RS(\"sidstloggetpå\") = date()

SIDE2
------
Set bc = Server.CreateObject(\"MSWC.BrowserType\")
Set DB = Server.CreateObject(\"ADODB.Connection\")
DB.ConnectionString = \"Driver={Microsoft Access Driver (*.mdb)};\" & \"DBQ=d:webs\\web.dk\\access\\data.mdb;\" & \"DefaultDir=d:webs\\mote.dk\\access\\;\" & \"FIL=MS Access;\"
DB.Open
SQL = \"SELECT * FROM Login WHERE Brugernavn =\'\" & request.cookies(\"login\")(\"navn\") & \"\'\"
Set RS = Server.CreateObject(\"ADODB.Recordset\")
RS.Open SQL, DB, 3, 3

If RS(\"sidstloggetpå\").value = date() THEN
  %>
<SCRIPT language=\"JavaScript\">
  alert(\'Du må kun besøge siden 1 gang om dagen!\')
    self.close()
</SCRIPT>
<%
END IF
Avatar billede swiffer Nybegynder
03. maj 2001 - 21:52 #8
Side1 bruger samme connection som side2.
Avatar billede ldanielsen Nybegynder
03. maj 2001 - 22:40 #9
skriv lige:

Response.write RS(\"sidstloggetpå\")

Response.write date()

og se om de er ens.

Jeg kunne tænke mig at datoformatet er forskelligt i databasen og på serveren. Fx kan Date() være \"3/21/2001\" på serveren, men når du hælder den i databasen bliver den formateret om (forhåbentligt rigtigt), og når du henter den igen vil RS(\"sidstloggetpå\") være \"21-3-2001\".

Og det er jo ikke det samme

Prøv dette:
RS(\"sidstloggetpå\") = Year(Now)&\"/\"&Month(Now)&\"/\"&Day(Now)

Så får databasen \"2001/3/21\", og deter ikke til at misforstå.

Når du sammenligner siger du:
If Cdate(RS(\"sidstloggetpå\")) = date() THEN

Idet du Konverterer RS(\"sidstloggetpå\") til et dato-objekt, kan du sammenligne.

Hvis det ikke virker, så må du lave begge datoer om til tekststrenge inden du sammenligner. Sig til hvis det ikke virker
Avatar billede swiffer Nybegynder
04. maj 2001 - 13:32 #10
ldanielsen >>

Hold kæft hvor er du klog!

Jeg ville ønske jeg havde nogle flere point jeg kunne give dig...

10000 tak!!

Med venlig hilsen

SWIFFER
Avatar billede swiffer Nybegynder
04. maj 2001 - 13:33 #11
Vil du have dine point nu, eller vil du vente til jeg har 50?
Avatar billede ldanielsen Nybegynder
04. maj 2001 - 16:13 #12
Nej pyt da med det, er glad for at hjælpe, også fattigrøve *gg*

Hilsen Lars
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