Fejl i udlånssystem

Hejsa allesammen

Jeg har flg. kode:

' Manglende informationer
<%
If Request.Form("navn") = "" OR Request.Form("vej") = "" OR Request.Form("nummer") = "" OR Request.Form("postnummer") = "" OR Request.Form("by") = "" OR Request.Form("telefon") = "" Then
Response.redirect "soeg.asp?msg=Dine+oplysninger+er+forkerte+-+Prøv+igen!"
End if
%>
' Henter Form
<%
strId  = Request.Form("id")
strBibliotek = Request.Form("bibliotek")
strNavn = Request.Form("navn")
strVej = Request.Form("vej")
strNummer = Request.Form("nummer")
strPostnummer = Request.Form("postnummer")
strBy = Request.Form("by")
strTelefon = Request.Form("telefon")
%>
' Opdater Database
<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("bibliodab.mdb")
Conn.Open DSN

strSQL = "Update udgivelser set "
strSQL = strSQL & "inde= 'Nej', "
strSQL = strSQL & "udlaant_til=" & strNavn & "<br>" & strVej & "<br>" & strNummer & "<br>" & strPostnummer & "<br>" & strBy & "<br>" & strTelefon
strSQL = strSQL & " Where Id =" & strId & " AND bibliotek = " & strBibliotek 

Conn.Execute(strSQL)

Conn.Close
Set Conn = Nothing
%>
' Send mail
<%
Dim Mailer
Set Mailer = Server.CreateObject("SMTPsvg.Mailer")

' Her sættes afsender navn og e-mail adresse
Mailer.FromName  = "Bibliotikar"
Mailer.FromAddress= "bibliotikar@donaldisten.dk"

' Afsenders mailserver
Mailer.RemoteHost = "mail.donaldisten.dk"

' Her sættes modtager navn og e-mail adresse
Mailer.AddRecipient "Biblioteket", "bibliotek@donaldisten.dk"

' Her sættes overskriften på mailen
Mailer.Subject    = "Materiale bestilt"

' Her sættes selve teksten til mailen
Mailer.BodyText  = "Bladet med ID " & strId & ", er bestilt af " & VbCrLf & VbCrLf & strNavn & "<br>" & strVej & strNummer & "<br>" & strPostnummer & strBy & "<br>" & strTelefon

' Send e-mail og skriv status
if Mailer.SendMail then
  Response.Write "Din bestilling er nu modtaget"
else
  Response.Write "Der skete en fejl: " & Mailer.Response
end if

' Fjern objekt igen
Set Mailer = Nothing
%>
' Videresend
<% Response.redirect "confirmed.asp" %>

Og når jeg prøver at køre den side, får jeg flg. fejl:

' Manglende informationer ' Henter Form ' Opdater Database
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error (missing operator) in query expression 'Jacob Berget<br>Vangedevej<br>213<br>2860<br>Søborg<br>39663379'.

/projekter/bibliotek/sure.asp, line 30

Hvorfor?

28' strSQL = strSQL & " Where Id =" & strId & " AND bibliotek = " & strBibliotek 
29'
30' Conn.Execute(strSQL)
31'
32' Conn.Close