以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  项目自动关闭  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=53215)
--  作者：seal51
--  发布时间：2014/7/2 15:53:00
--  项目自动关闭
在表里填写数据，项目就自动关闭了， 怎么回事呢
--  作者：Bin
--  发布时间：2014/7/2 15:57:00
--  
检查DataCloChanged事件的代码,或者发出来看看

肯是代码死循环了
--  作者：seal51
--  发布时间：2014/7/2 16:00:00
--  

产品表里只有这段代码

\'----------产品ID自动编号-----------------------------
Dim max As String
max = e.DataTable.Compute("max(产品ID)")
If max > "" Then
    Dim idx As Integer
    idx = CInt(max.SubString(3,6)) + 1
    e.DataRow("产品ID") = "SMP" & Format(idx,"000000")
Else
    e.DataRow("产品ID") = "SMP" & "000001"
End If
\'----------产品ID自动编号-----------------------------
--  作者：Bin
--  发布时间：2014/7/2 16:01:00
--  
你这代码写在DataCloChanged事件?

你应该写到DataROwAdded事件.
--  作者：seal51
--  发布时间：2014/7/2 16:04:00
--  

啊， 写错地方了， 老师，你怎么知道我写在DataCloChanged事件里了
--  作者：Bin
--  发布时间：2014/7/2 16:05:00
--  
这有这样才会死循环,自动关闭项目.
--  作者：seal51
--  发布时间：2014/7/2 16:10:00
--  

谢谢老师