Hvordan finder man en sætning i adressen?

Hvis tabellen fid er tal felt:
strSQL = "select * from forum WHERE fid=" & request.querystring("fid")

Hvis tabellen fid er et tekstfelt:
strSQL = "select * from forum WHERE fid='" & request.querystring("fid") &"'"

/Goose

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'fid='.

Den fejl får jeg. Det er et tal felt

Der må være en anden fejl da du tilsyneladende ikke får overført værdien af fid ?!?
Prøv og post din opret.asp

/Goose

<%
'Åbner connection til databasen
Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../db.mdb")

'Hvis brugeren har submittet formularen
    if Request.ServerVariables("REQUEST_METHOD") = "POST" then
   
'Tjecker om felterne er udfyld
    if (Request.Form("emne") <> "" AND Request.Form("besked") <> "" AND Request.Form("navn") <> "") then

   
'Tilføjer brugeren til databasen
    Set rs = Server.CreateObject("ADODB.Recordset")
    strSQL = "select * from forum WHERE fid=" & request.querystring("fid")
        rs.Open strsql, conn, 1, 3
   
    'Tilføjer brugeren til databasen og sender ham/hende til login siden
    rs.AddNew
      rs("Navn") = Request.form("Navn")
      rs("emne") = Request.form("emne")
      rs("kat") = Request.form("kat")
      rs("points") = Request.form("points")
      rs("Besked") = Request.form("Besked")
      rs("Dato") = Now()
      rs("IP") = request.servervariables("remote_Addr")
    rs.update
   
    Response.Write("<strong><font color='red'>Din artikel er nu blevet oprettet!</font></strong>")
   
    rs.Close
    set rs = nothing
   
    else
    Response.Write("<strong><font color='red'>Du mangler at udfylde felter!</font></strong>")
   
    end if
    end if
   
    Set rs = Server.CreateObject("ADODB.Recordset")
    strSQL = "select * from users WHERE pkuserid = " & Session("userid")
    rs.Open strsql, conn, 1, 3
   
    intTmp = Rs("points") - Request.Form("points")
    rs.AddNew
      Rs("points_b") = Request.Form("points")
      Rs("points") = intTmp
    rs.update
   
    rs.Close
    set rs = nothing

%>

Det kan jeg desværre ikke lige gennemskue, det ser sg* meget rigtigt ud .....

/Goose

har fundet ud af det... Men den vil ikke udføre den sidste del af koden.

Set rs = Server.CreateObject("ADODB.Recordset")
    strSQL = "select * from users WHERE pkuserid = " & Session("userid")
    rs.Open strsql, conn, 1, 3
   
    intTmp = Rs("points") - Request.Form("points")
    rs.AddNew
      Rs("points_b") = Request.Form("points")
      Rs("points") = intTmp
    rs.update
   
    rs.Close
    set rs = nothing

Ved du havordan jeg får den til at aktivere den? Den kommer ikke med nogle fejl den udføre den bare ikke.

Indeholder din session("userid") noget ?!?
Prøv og lav en response.write session("userid")

/Goose

ja den indeholder noget. Den tilføjer også godt nok indlæget i tabellen forum det er bare det sidste den ikke vil. Den kommer ikke med nogle fejl.

Ellers tak for hjælpen