Session hur ska det se ut?

SQL = "SELECT * From movies WHERE namn = '" & Session('vem') & "' ORDER BY ID ASC"

Tackar vide men när ja kör den koden får ja

Error Type:
Microsoft VBScript compilation (0x800A03EA)
Syntax error
/figg3/filmer/weeee.asp, line 10, column 54

SQL = "SELECT * From movies WHERE namn = '" & Session([b]"[/b]vem[b]"[/b]) & "' ORDER BY ID ASC"

Så har iallafall jag lärt mig.

SQL = "SELECT * From movies WHERE namn = '" & Session("vem") & "' ORDER BY ID ASC"

Vide råkade skriva fel.

Så här ska det vara:

SQL = "SELECT * From movies WHERE namn = '" & Session("vem") & "' ORDER BY ID ASC"

Mvh,

Nu var vi där igen då..

Tackar grabbar nu funkar det...

En liten fråga till när ja kör denna

<% If Request.Querystring("logga") = "in" Then

Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("movies.mdb")

Set RecSet = Server.CreateObject("ADODB.Recordset")
Addera = "Select * From login"
RecSet.Open Addera, Connect, adOpenStatic, adLockOptimistic

Do Until RecSet.EOF

If RecSet("anv") = Request.Form("anv2") AND RecSet("los") = Request.Form("losen2") Then

Session("user") = "user"
Session("vem") = RecSet("anv")
Session.Timeout = "30"

RecSet.Close
Set RecSet = nothing

Connect.Close
Set Connect = nothing

Response.Redirect("default.asp")

End If

RecSet.MoveNext
Loop

RecSet.Close
Connect.Close
Set RecSet = nothing
Set Connect = nothing

Response.Redirect("weeee.asp")
%>

<% End If %>

så skappas juh en Session men varför skriver den inte ut det när ja kör

 SQL = "SELECT * From movies WHERE namn = '" & Session("vem") & "' ORDER BY ID ASC"

Någon som vet varför?

Hur då? Du sparar ett värde från tabellen login i din session. Varför skulle du få någon träff i tabellen movies med det namnet?

Din kod för inloggning är väldigt ineffektiv

<% If Request.Querystring("logga") = "in" Then
Set Connect = Server.CreateObject("ADODB.Connection") 
Connect.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source ="& Server.MapPath("movies.mdb")

sql = "Select * From login where anv = '" & request.form("anv2") & "' and los = '" & request.form("losen2") & "'"

set recset = Connect.execute(sql)

if not recset.eof then
Session("user") = "user"
Session("vem") = RecSet("anv")
Session.Timeout = "30"
found = true
else 
found = false
end if

RecSet.Close
Set RecSet = nothing

Connect.Close
Set Connect = nothing

if found then
Response.Redirect("default.asp")
End If

Response.Redirect("weeee.asp")

End If %>

red: Tog bort det end if som jag felaktigt lade dit.

Lars G när ja kör den koden får ja:

Error Type:
Microsoft VBScript compilation (0x800A0400)
Expected statement
/figg3/filmer/Default.asp, line 168

Vilken rad är 168 ?

Rad 168 är:
End If %>

Jag ändrade mitt inlägg och lade till en end if som jag glömde. Hann du kanske få den felaktiga koden?

Tack lars G men koden funkar inte testa att kopiera in den nu igen efter du skrev detta då men får samma fel meddelande...

Mvh FIgg3

Ursäkta, är lite virrig idag. Det end if som jag surrade om skulle inte vara med.

Jag har ändrat tillbaka nu så du kan försöka igen.

Tackar tackar men tro det eller ej fler fel...

Error Type:
Microsoft JET Database Engine (0x80040E14)
Syntax error (missing operator) in query expression 'and = 'figg3' and los = 'admin''.
/figg3/filmer/default.asp, line 145

Så du är också lite virrig i dag, själv har ja en ganska stor och fin migrän, men ja är juh så klart för dum för att flytta mig från datron

'and' är ett reserverat ord, byt namn eller lägg [] runt det ordet...

Tack vide men kör ja så som du säger får ja

Error Type:
Microsoft JET Database Engine (0x80040E10)
No value given for one or more required parameters.
/figg3/filmer/default.asp, line 145

Jag stavade fel på anv så selecten skall vara

sql = "Select * From login where anv = '" & request.form("anv2") & "' and los = '" & request.form("losen2") & "'"