主题：[求助]

操作必须使用一个可更新的查询。

 

还是有如上报错。

 不可能。

OK了老师，我们找到问题了。

还有个小问题请教：

   如何只显示某个字段的一部分？

如此例子中  P.01.:圆片陶瓷电容   下拉选择它，但返回到表中，只显示 “圆片陶瓷电容”    --选择是在窗口中操作（用不了数据字典）

 去编写TextChanged事件，对选择的字符进行处理，重新给控件赋值。

 

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:新料导入系统.table

 

老师，例子中  如何将 圆片陶瓷电容_独石电容料号表  中的万盛料号和技术填写表中的 万盛料号实现同步更新、删除、增加行？

我们写了  

在  DataColChanged中

Select Case e.DataCol.name
    Case "wslh"
        Dim dr As DataRow = DataTables("技术填写表").Find("wslh= '" & e.DataRow("wslh") & "'")
        If dr Is Nothing Then
            dr = DataTables("技术填写表").AddNew()
            dr("wslh") = e.DataRow("wslh")
        Else
            dr("wslh") = e.DataRow("wslh")
        End If
End Select

 

在DataRowDeleting中写了：

Dim dr As DataRow = DataTables("技术填写表").Find("wslh = '" & e.DataRow("wslh") & "'")
If dr IsNot Nothing Then
    dr.Delete()
End If

 

 

但是不能实现。

还有如下代码，为什么要执行2次才能出来？请帮忙看看。

Dim cmd1  As New SQLCommand
cmd1.CommandText = "u-pdate {圆片陶瓷电容_独石电容料号表} set wslh = Mid(cplx,1,Instr(cplx,':')-1)+Mid(tclx,1,Instr(tclx,':')-1)+Mid(eddy,1,Instr(eddy,':')-1)+Mid(ypccdm,1,Instr(ypccdm,':')-1)+jx+wdtx+drlz+Mid(rldj,1,Instr(rldj,':')-1)+Mid(jj,1,Instr(jj,':')-1)+Mid(jjcd,1,Instr(jjcd,':')-1)+Mid(bzlx,1,Instr(bzlx,':')-1)+Mid(hb,1,Instr(hb,':')-1)+Mid(xjcz,1,Instr(xjcz,':')-1)+Mid(bf,1,Instr(bf,':')-1)"
cmd1.ExecuteNonQuery
DataTables("圆片陶瓷电容_独石电容料号表").Load

 

DataTables("圆片陶瓷电容_独石电容料号表").Save()

 

Dim cmd2  As New SQLCommand
cmd2.CommandText = "u-pdate {技术填写表},{圆片陶瓷电容_独石电容料号表} set {技术填写表}.wslh = {圆片陶瓷电容_独石电容料号表}.wslh"
cmd2.ExecuteNonQuery
DataTables("技术填写表").Load

 

MessageBox.Show("万盛料号已生成!", "提示")

26楼代码没有问题，前提是你要主动修改 wslh 的值，或者重置列啊

 

http://www.foxtable.com/help/topics/1469.htm

 

27楼看不懂你想做什么

老师  这个例子中  wslh  的值是根据窗口选择生成的  我们这样生成的时候 技术填写表之前的wslh都会变成新生成的  这并不是我们想看到的结果

还有 为什么需要点击两次生成料号按钮才能生成料号