以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 无法保存到数据库 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=143379) |
-- 作者:xa139 -- 发布时间:2019/11/22 12:01:00 -- 无法保存到数据库 Dim cmd As new SQLCommand cmd.C cmd.CommandText = "GetOrderByID" cmd.StoredProcedure = True cmd.Parameters.Add("@Err", 12, False) \'返回参数 cmd.Parameters.Add("@type","sanoid") \'输入参数 cmd.Parameters.Add("@RETID", "", True) \'输出参数 cmd.ExecuteNonQuery Output.Show( cmd.Parameters("@RETID")) e. Form.controls("TextBox1").text ="SZ19"+ Format( Cint (( cmd.Parameters("@RETID"))),"0000000") With Tables("样本信息表") If .Current IsNot Nothing Then .Current.Save() End If End With ----------------------------------------------------- 使用存储过程获取并构造字符串,赋值给窗体对应字段的text控件,保存不上. |
-- 作者:有点蓝 -- 发布时间:2019/11/22 13:38:00 -- 看看:http://www.foxtable.com/webhelp/topics/2436.htm With Tables("样本信息表") If .Current IsNot Nothing Then .Current("某某列") = "SZ19"+ Format( Cint (( cmd.Parameters("@RETID"))),"0000000") .Current.Save() End If End With |