请专家们指导

请专家们指点
nhandle=0
nhandle=sqlstringconnect("driver=sql server;server=ZHOUPENGCHENG\HHJXCJFWQ;uid=admin;pwd=zhoujunmin;database=HHJXCJ_ZHGLXT")
     if nhandle>0
        messagebox("数据库连接成功！",0,"提示")
     else
        messagebox("数据库连接失败！",0,"提示")
        RETURN
     endif

上段执行是没有问题的


sqlexec(nhandle,"declare @iCJ_XH int")
sqlexec(nhandle,"declare @cCJ_CJNAME char(20)")
sqlexec(nhandle,"select @iCJ_XH=96")
sqlexec(nhandle,"select @cCJ_CJNAME='热处理车间'")

sqlexec(nhandle,"insert into Table_CJ (CJ_XH,CJ_CJNAME) values (@iCJ_XH,@cCJ_CJNAME)")

这一段执行后，添加记录失败
------解决方案--------------------
text to cc NOSHOW TEXTMERGE 
  declare @iCJ_XH int
  declare @cCJ_CJNAME char(20)
  select @iCJ_XH=<<thisform.text1.Value>>
  select @cCJ_CJNAME=<<thisform.text2.Value>>
  insert into Table_CJ (CJ_XH,CJ_CJNAME) values (@iCJ_XH,@cCJ_CJNAME)
endtext

------解决方案--------------------

引用:

PUBLIC nTEXT1,cTEXT2
nTEXT1=0
cTEXT2=""
nTEXT1=thisform.text1.Value
cTEXT2=thisform.text2.value

text to cc NOSHOW TEXTMERGE 
  declare @iCJ_XH int
  declare @cCJ_CJNAME char(20)
  select @iCJ_XH[color=&nTEXT1
  select @cCJ_CJNAME=&cTEXT2
  insert into Table_CJ (CJ_XH,CJ_CJNAME) values (@iCJ_XH,@cCJ_CJNAME)
endtext
sqlexec(nhandle, cc)

用不着这么麻烦，把这些语句改为下面一句即可：
sqlexec(nhandle,"insert into Table_CJ (CJ_XH,CJ_CJNAME) values (?thisform.text1.Value,?thisform.text2.Value)")