SQL fel medelande osv.... mm

Jag ska gör en update pryl men det vill inte funka alls.....

koden ser ut så här....

if val="Kalendarium" then
sql2 = "SELECT * FROM kalendarium"
set rs2=databas.execute (sql2)

do while rs2.eof <> true

%>

<form action="admin.asp?update=<%=rs2("id")%>" method="post">
<table cellspacing="0" cellpadding="0" border="0" class="text">
<tr>
<td class="text">id: <input type="hidden" name="val" value="<%=val%>"></td>
<td><input type="text" name="id<%=rs2("id")%>" value="<%=rs2.fields("id")%>" class="form"></td>
</tr>

     \<tr\>
      \<td class="text"\>Vad: \</td\>
      \<td\>\<input type="text" name="vad" value="\<%=rs2.fields("vad")%\>" class="form"\>\</td\>
     \</tr\>
     \<tr\>
      \<td class="text"\>När: \</td\>
      \<td\>\<input type="text" name="nar\<%=rs2("id")%\>" value="\<%=rs2.fields("nar")%\>" class="form"\>\</td\>
     \</tr\>
     \<tr\>
          \<td class="text"\>Hur: \</td\>
          \<td\>\<textarea cols="60" rows="4" name="hur\<%=rs2("id")%\>" class="form"\>\<%=rs2.fields("hur")%\>\</textarea\>\</td\> 
     \</tr\>
     \<tr\>
    \<td\> \</td\>
    \<td\>\<input type="submit" name="uppdate" value="Uppdate" class="knapp"\>\</td\>
     \</tr\>

</table>
</form>
<%
rs2.movenext
loop

%>

och ifsatsen som har sköter updateringen lyder:
if update <> 0 then
%>
<script>alert("hej");</script>
<%
sqlup2 = "UPDATE kalendarium SET kalendarium.vad = '"& clearText(request.form("vad")) &"' WHERE kalendarium.id='update'"
response.write(sqlup2)
databas.execute (sqlup2)
end if

Scripet med alert körs så if satsen funkar....

Felmedelandet är:
UPDATE kalendarium SET kalendarium.vad = 'Kickoff2' WHERE kalendarium.id='update'

Microsoft OLE DB Provider for ODBC Drivers error '80040e07'

[Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression.

/seigan/fyk/admin/admin.asp, line 160

Vad är felet????
"vad" är ju text!!!! jag fattar inte!!