Syntax error, unexpected "identifier", expecting ")"

Tjeare!
Förstår verkligen inte varför jag får detta fel:

Syntax error, unexpected "identifier", expecting ")"

på denna rad:

SQL ="INSERT INTO forumsvar (strAnv, intAnvID, strRubrik, strSvar, strCitat, strDatum, TR_ID) values ('" & strAnv & "', " & intAnvID & ", '" & strRubrik & "', '" & strText & "', '" & strCitat & "', Now(), "& intTRID &")"
Connect.Execute(strSQL)

^^

Regel nummer ett till tio:

1. Skriv ut färdig SQL-fråga.
2. Skriv ut färdig SQL-fråga.
3. Skriv ut färdig SQL-fråga.
4. Skriv ut färdig SQL-fråga.
5. Skriv ut färdig SQL-fråga.
6. Skriv ut färdig SQL-fråga.
7. Skriv ut färdig SQL-fråga.
8. Skriv ut färdig SQL-fråga.
9. Skriv ut färdig SQL-fråga.
10. Skriv ut färdig SQL-fråga.

Visa den här.

Jag har försökt få ut frågan..

SQL ="INSERT INTO forumsvar (strAnv, intAnvID, strRubrik, strSvar, strCitat, strDatum, TR_ID) values ('" & strAnv & "', " & intAnvID & ", '" & strRubrik & "', '" & strText & "', '" & strCitat & "', Now(), "& intTRID &")"
response.Write(SQL)
'Connect.Execute(strSQL)

Grejjen är den att denna kod ligger innanför en ifsats..
Och felet kommer upp även fast ifsatsen inte är uppfylld..

Är det ett VBScriptfel?
Pekar felet på någon speciell rad?
Är du säker på att det är rätt kod du visar här?

Hela felmesset ser ut såhär

Sun ONE ASP VBScript compilation (0x800A03EE)
Syntax error, unexpected "identifier", expecting ")"
/com/forum_las.asp, line 46, column 61

Rad 61 är tom och SQL-satsen är raden ovanför...

Felmeddelandet pekar ju på rad 46.

Förlåt...skrev fel...Koden är från rad 45, 46 är tom...

Microsoft brukar räkna lite fel på raderna. Hur ser if-satsen ut?

if request.QueryString("spara") = "svar" then

Function FixSql(str)
    str = Trim(str)
    str = Replace(str, "\", "\\")
    str = Replace(str,"'","''")
    str = Replace(str,"<","")
    str = Replace(str,">","")
    str = Replace(str,"/","")

    FixSql = str

End Function

intTRID = request.QueryString("ID")
strAnv = session("User")
intAnvID = session("ID")
strRubrik = FixSql(request.Form("rubrik"))
strText = FixSql(request.Form("text"))
strCitat = FixSql(request.Form("citat"))

SQL ="INSERT INTO forumsvar (strAnv, intAnvID, strRubrik, strSvar, strCitat, strDatum, TR_ID) values ('" & strAnv & "', " & intAnvID & ", '" & strRubrik & "', '" & strText & "', '" & strCitat & "', Now(), "& intTRID &")"
response.Write(SQL)
'Connect.Execute(strSQL)

response.Redirect("forum_las.asp?ID=<%=request.QueryString("ID")%>")

end if

Sådär ser hela ut...

Microsoft brukar räkna lite fel på raderna. Hur ser if-satsen ut?

Det är inte Microsoft som räknar, det är SUN. Dessutom har jag aldrig varit med om att IIS:en har räknat konstigt. Däremot IE, när det gäller javascriptfel, men det är en helt annan sak.

Webbsajten: det är inget "fel" på den koden du visar. Felmeddelandet måste peka på något annat i koden, så du får nog visa lite mer.

Här är felet:

response.Redirect("forum_las.asp?ID=[b]<%=request.QueryString("ID")%>[/b]")

Skall vara:

response.Redirect("forum_las.asp?ID=" & request.QueryString("ID"))

Tack så otroligt mycket :D:D:D

Då får man passa på att ändra de tio första reglerna till "Visa rätt kod." ;)

response.Redirect("forum_las.asp?ID=<%=request.QueryString("ID")%>")

response.Redirect "forum_las.asp?ID=" &_
request.QueryString("ID")

Sen så bör du inte lägga en Function så där mitt i koden. Lägg dem för sig.