การแก้ไขข้อมูล (Update) asp+mysql......ช่วยบอกที่คราบ

<%
 Dim Conn,strSQL,objRec
Set Conn = Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER={MySQL ODBC 5.1 Driver}; SERVER=localhost;Port=3307;UID=root;pwd=usbw;database=shop;option=16384;"
'Conn.Execute "set names tis620"
strSQL = "SELECT * FROM category_Add "
Set objRec = Server.CreateObject("ADODB.Recordset")
objRec.Open strSQL, Conn, 1,3

%>

<%
Response.ContentType = "text/html"
Response.Charset = "TIS-620"
%>
<!--#include file="connect.asp"-->
<%

if Request.Form("txtId") <>"" then

strSQL = strSQL &"UPDATE category_Add  SET"
strSQL = strSQL &" Id='"&Request.Form("txtId")&"',Name='"&Request.Form("txtName")&"',Detail= '"&Request.Form("Detail")&"',Image= '"&Request.Form("txtImage")&"' "
Set objRec = Conn.Execute(strSQL)

	if err <> 0 then
		response.write "Error" 
	else
		response.write "OK" 
			Response.Redirect("หมวดหมู่สินค้า.asp")

	end if
else

		response.Redirect "แก้ไขหมวดหมู่สินค้า.html" 
end if	
Conn.Close()
Set objExec = Nothing
Set Conn = Nothing

%>