新增資料...錯誤ㄟ?

CNNDB.inc
<%
option explicit
Dim objDBCn,StrCn,objRS　　　　　
Set objDBCn = Server.CreateObject("ADODB.Connection")
StrCn="DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & _
　　　 Server.MapPath("webdb.mdb")
objDBCn.ConnectionTimeout=30
objDBCn.Open StrCn　
%>

Addmember.asp

<%
DIM rs,SQLString
DIM sexflag　　
DIM NameTxt,Birth,Blood,Tel,Addr,EmailTxt,Acct,Pwd1,memo

NameTxt="'" & Trim(Request("NameTxt")) & "'"
sexflag="'" & Trim(Request("Sex")) & "'"
Birth="'" & Trim(CDATE(Request("y1") & "/" & Request("m1") & "/" & Request("d1"))) & "'"
Blood="'" & Trim(Request("Blood")) & "'"
Tel="'" & Trim(Request("phone")) & "'"
Addr="'" & Trim(Request("Address")) & "'"
EmailTxt="'" & Trim(Request("Email")) & "'"
Acct="'" & Trim(Request("Account")) & "'"
Pwd1="'" & Trim(Request("Pwd1")) & "'"
memo="'" & Trim(Request("Memo")) & "'"

SQLString = "select * from member where 帳號=" & Acct
SET rs=objDBCn.execute(SQLString)

if NOT rs.EOF then
　 Response.write "<center><font color=red>此身份證號已註冊過，請查明後再輸入</font></center>"
　 Server.Transfer "AddMember.htm"
end if

SQLString = "insert into member(姓名,性別,生日,血型,電話,住址,EMAIL,帳號,密碼,自傳) values(" & NameTxt & "," & sexflag & "," & Birth & "," & Blood & "," & Tel & "," & Addr & "," & EmailTxt & "," & acct & "," & Pwd1 & "," & memo & ")"
objDBCn.execute(SQLString)

'釋放資源　　　　　　　　　
rs.close　: SET rs=nothing
objDBCn.close : SET objDBCn=nothing
%>

錯誤訊息:
錯誤類型：
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver] 運作必須使用更新查詢。

不知哪裡有錯?請高手回答!!謝謝!