帮忙看看这代码哪里错！！
<%  
hao=request.form( "hao ")
mingcheng=request.form( "mingcheng ")
lianxiren=request.form( "lianxiren ")
dianhua=request.form( "dianhua ")
id=request.QueryString( "Uid ")
set   conn   =   server.createobject( "adodb.connection ")
connstr= "DRIVER={Microsoft   Access   Driver   (*.mdb)};   DBQ= "   &   server.mappath( "data.mdb ")
conn.Open   connstr
sqlstmt   =   "update   3   set   hao= ' "&hao& " ',mingcheng= ' "&mingcheng& " ',lianxiren= ' "&lianxiren& " ',dianhua= ' "&dianhua& " '   where   id= "&id
Set   rs   =   Server.CreateObject( "ADODB.Recordset ")
conn.execute(sqlstmt)
%>    


Microsoft   VBScript   编译器错误   (0x800A0401)
语句未结束
/合同/ClientModify-VB.asp,   line   13,   column   30
sqlstmt   =   "update   3   set   hao= ' "&hao& " ',mingcheng= ' "&mingcheng& " ',lianxiren= ' "&lianxiren& " ',dianhua= ' "&dianhua& " '   where   id= "&id  

我对一个可以调试成功的代码进行修改的，但修改后却发生错误，实在不解。

------解决方案--------------------
我记得 hao 这个变量好像有问题。。
hao= ' " & hao & " ' 你这样试试。成功了记得给我打分。。。哈哈。