03. maj 2001 - 19:10Der 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
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
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\".
Nej pyt da med det, er glad for at hjælpe, også fattigrøve *gg*
Hilsen Lars
Synes godt om
Ny brugerNybegynder
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.