Hjælp til SQL

Jeg får følgende fejl - men kan simpelthen ikke få den til at makke ret:

Der mangler et semikolon (;) i slutningen af SQL-sætningen.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.Data.OleDb.OleDbException: Der mangler et semikolon (;) i slutningen af SQL-sætningen.

Source Error:


Line 65:          'strSQL= "INSERT INTO [rental] ([date_end], [km_end]) VALUES ('" & dato & "', " & session("kmend") & ") WHERE  ([rental].[carid])='" & request.querystring("id") & "' AND ([Rental].[Km_end] is null )";
Line 66:          objCommand = New OLEDBcommand(strSQL, objConnection)
Line 67:          objCommand.ExecuteNonQuery()
Line 68:          label1.text =strSQL ' "Udlejningen er nu afsluttet"
Line 69:   


Source File: C:\Kursus\uge17\Aflevering\stopudlejning.aspx    Line: 67

Måske sådan her..

INSERT INTO rental (date_end, km_end ) values ( '29-04-2004', 3333) WHERE ([rental].[carid])='UT 33333' AND ([Rental].[Km_end] = null );

Desværre - jeg giver lige koden, så kan det være at der er nogen der kan se fejlen:
Dim format As New System.Globalization.CultureInfo("da-DK", True)
      Dim dato as date = System.DateTime.Parse(datetime.now, format).tostring("dd-MM-yyyy")

      objDR.Close()
      strSQL = "INSERT INTO rental ("

            strSQL = strSQL & "date_end, "
            strSQL = strSQL & "km_end )"

            strSQL = strSQL & " values ( "

            strSQL = strSQL & "'" & dato & "', "
            strSQL = strSQL & "" & session("kmend")
            strSQL = strSQL & ") WHERE  ([rental].[carid])='" & request.querystring("id") & "' AND ([Rental].[Km_end]is null );"
      objCommand = New OLEDBcommand(strSQL, objConnection)
      objCommand.ExecuteNonQuery()
      label1.text = "Udlejningen er nu afsluttet"

Er feltet date_end et datofelt eller et tekstfelt?

Sig mig er det ikke et Update statement du skal have?

Hvis det er et dato felt skal den nok se sådan her ud..

Dim format As New System.Globalization.CultureInfo("da-DK", True)
Dim dato as date = System.DateTime.Parse(datetime.now, format).tostring("dd-MM-yyyy")

      objDR.Close()
      strSQL = "INSERT INTO rental ("

            strSQL = strSQL & "date_end, "
            strSQL = strSQL & "km_end )"

            strSQL = strSQL & " values ( "

            strSQL = strSQL & "#" & dato & "#, "
            strSQL = strSQL & "" & session("kmend")
            strSQL = strSQL & ") WHERE  ([rental].[carid])='" & request.querystring("id") & "' AND ([Rental].[Km_end]is null );"
      objCommand = New OLEDBcommand(strSQL, objConnection)
      objCommand.ExecuteNonQuery()

Jo, da.. hvad er det jeg sidder er bilder dig ind.. du skal jo bruge en UPDATE istedet for..

Det giver nemlig ikke rigtig nogen mening med en where i en insert ;)

hehe... nu har jeg lavet en update istedet - men den virker heller ikke - kan du dinde fejlen?
strSQL= "UPDATE rental SET date_end='"& dato &"', km_end='"& Session("km_end") &"' WHERE carid=" & request.querystring("id") & "  AND ([Rental].[Km_end] is null"

Her er den rigtige - den skriver der mangler en operator...

strSQL= "UPDATE rental SET date_end='"& dato &"', km_end="& Session("kmend") &" WHERE carid=" & request.querystring("id") & "  AND ([Rental].[Km_end] is null"

hov jeg fandt den selv --- men du får poitz for at få mig på rette spor...