SQL

Du mangeler =tegnet
SQL_tjek = "select * from bruger_artikel where bruger_Id = Session(brugerID) and artikel_id = Request.QueryString(id)"

nu får jeg bare denne istedet:
[Microsoft][ODBC Microsoft Access Driver] Undefined function 'Session' in expression.

SÅdan her :
SQL_tjek = "select * from bruger_artikel where bruger_Id = Session("brugerID") and artikel_id = Request.QueryString("id")"

har løst sidste problem *SS*:

SQL_tjek = "select * from bruger_artikel where bruger_Id = " & Session("brugerID") & " and artikel_id = " & Request.QueryString("id") & ""

Fint nok virker det nu ?

jae, men min funktion virker ikke, ved ikke helt hvad der er galt med den, har denne funktion, der skal tjekke om man har betalt, hvis ikke, skal de ligges 5 til point brugt, men synnes ikke den gør det &:-D

<%
' Databaseforbindelse
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("bruger.mdb")
Conn.Open DSN
SQL_tjek = "select * from bruger_artikel where bruger_Id = " & Session("brugerID") & " and artikel_id = " & Request.QueryString("id") & ""
set rs = conn.execute(SQL_tjek)
if not rs.EOF then

SQLstmt = "INSERT INTO bruger_artikel (bruger_id, artikel_id)"
SQLstmt = SQLstmt & " VALUES ('" & Session("brugerID") & "'),'" & Request.QueryString("id") & "'"

response.write sqlstmt

Conn.Execute (SQLstmt)

ligTil = 5

' Hent fra databasen afhængig af værdien id fra URL
sql = "UPDATE bruger SET point_brugt = (point_brugt + " & ligTil & ") WHERE id = " & session("brugerID")
Conn.execute (sql)

' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing
end if
%>

vil godt give lidt mere hvis du kan se hvad fejlene er

Nej, det kan jeg godt se prøv med det her :

' Hent fra databasen afhængig af værdien id fra URL
sql = "Insert into bruger(point_brugt) values('point_brugt + " & ligTil & "') WHERE id = " & session("brugerID")
Conn.execute (sql)

jeg tror ikke det er problemet (i hverfald ikke alene, da den helle ikke skriver det den skal i den anden tabel, så jeg kunne tænke mig at det var min if funktion den er galt med &:-D

Undskyld mig da lige jeg sidder her og ødelægger det hele, men kan du ikke lave det sådan her

If ligTil = 5 Then
sql = "UPDATE bruger SET point_brugt = 'point_brugt + " & ligTil & "' WHERE id = " & session("brugerID")"
Conn.execute (sql)

hvordan skal jeg så styre de 5 ?

Sådan her så laver sætter den alle de point typer der er over 0 point.

If ligTil > 0 Then
sql = "UPDATE bruger SET point_brugt = 'point_brugt + " & ligTil & "' WHERE id = " & session("brugerID")"
Conn.execute (sql)

det hjælper ikke, har prøvet at lave denne if sætning inden i den anden, men det hjalp ikke, tror at man slipper uden om den første if sætning

ahhhh. havde et not for meget i min if måske *SS*

men får nu denne fejl første gang brugeren åbner siden, men ved refresh, virker siden optimalt

Hvilken fejl ?

INSERT INTO bruger_artikel (bruger_id,artikel_id) VALUES ('3','11')
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Missing semicolon (;) at end of SQL statement.

/artikler/artikel.asp, line 31

Der har vi nok det endelige problem skriv det her i en lang linie
Jeg ved ikke skal bruger ID iind i begge celler ?

SQLstmt = "INSERT INTO bruger_artikel(bruger_id, artikel_id) values('" & Session("brugerID") & "'),'" & Request.QueryString("id") & "'"

Nej sådan her :
SQLstmt = "INSERT INTO bruger_artikel(bruger_id, artikel_id) values('" & Session("brugerID") & "','" & Request.QueryString("id") & "')"

ja det kan jeg så sige at det ikke blev bedre af *SS*

I linie 31 prøv at sætte et ; ind bagerst

så får jeg bare af vide at linien er afslutte *SS*

så fjern den igen

jeps, men så er vi jo lige vidt &:-D

har fået det til at virke det hele nu. takker for hjælpen &:-D

takker for pointene