一个ASP 的设备故障报修和故障处理程序,为什  其中的一个字段  故障原因字段 无法复制啊! 我
部分代码如下:
<%sub announce(id)
tem_id=id
Set my_rs=server.CreateObject("ADODB.Recordset")
strSql="select * from jhtsbxl where id="&amp;amp;amp;amp;tem_id&amp;amp;amp;amp;""
my_rs.Open StrSqL,my_Conn,1,3
     temp=my_rs("dada_jilu_id")
                  temp_1=my_rs("设备名称")
          temp_2=my_rs("设备编号")
              temp_3=my_rs("设备规格型号")
          temp_4=my_rs("产品序列号")        
              temp_5=my_rs("设备负责人") 
                  temp_66=my_rs("生产厂商") 
                  temp_6=my_rs("设备提供") 
                  temp_7=my_rs("报修人") 
                  temp_8=my_rs("报修人部门")
                  temp_9=my_rs("报修方式") 
                  temp_10=my_rs("故障时间")
                 temp_14=my_rs("故障原因")        
                  temp_12=request("guzhchli")
                   temp_13=my_rs("报修时间")
                
                   
                 my_rs.delete
my_rs.Update
my_rs.close
Set my_rs=nothing

Set my_rrs= Server.CreateObject("ADODB.Recordset")
Sql="select * from xlhistory" 
my_rrs.Open Sql,my_Conn,1,3                                        
              my_rrs.addnew
        my_rrs("dada_jilu_id")=tem_id
        my_rrs("部门")=myUpart
        my_rrs("设备名称")=temp_1
        my_rrs("设备编号") = temp_2
        my_rrs("设备规格型号")=temp_3
        my_rrs("产品序列号")=temp_4  
        my_rrs("设备负责人")=temp_5
        my_rrs("生产厂商") =temp_6
        my_rrs("设备提供") =temp_66
        my_rrs("报修人")=temp_7
        my_rrs("报修人部门")=temp_8
        my_rrs("报修方式")=temp_9
        my_rrs("故障时间")=temp_10
        my_rrs("故障处理")=temp_12
      [B]  my_rrs("故障原因")＝temp_14    出错行[/B]        my_rrs("修后状态")=request("zhuangtai") 
        my_rrs("报修时间") =temp_13        
        my_rrs("添加时间")=now()
        
        my_rrs.Update
        my_rrs.close
        Set my_rrs=nothing
        
        Set my_rrs= Server.CreateObject("ADODB.Recordset")
        Sql="select * from jhtdata where id="&amp;amp;amp;amp;temp&amp;amp;amp;amp;""
        my_rrs.Open Sql,my_Conn,1,3  
        my_rrs("运行状况")=request("zhuangtai")
        my_rrs.Update
        my_rrs.close
        Set my_rrs=nothing
        
        
end sub
%>



错误信息如下
Microsoft VBScript 编译器错误 错误 '800a03f6' 

缺少 'End' 

/iisHelp/common/500-100.asp，行242 

Microsoft VBScript 编译器错误 错误 '800a0408' 

无效字符 

/online_shebeigli/xiu_guzhchuli_chuli.asp，行113 

my_rrs("故障原因")＝temp_14
---------^ 


[B]jhtsbxl 和xlhistory 是两个含有部分现同字段的表,这段代码的目的就是把jhtsbxl表的部分字段拷到xlhistory,不知为什么故障原因字段无法拷贝,  故障原因一开始是备注字段,后来改为文本字段,也不行![/B]