Adodc控件的添加记录无法插入空行
本来是做asp.net的,帮朋友用VB6写一个小的CS软件,这两天熟悉了一下,虽然很多东西不难理解,但一时之间找到原因还真不好找。
我用Adodc控制实现增删改查的功能,在增加时,先要用到AddNew,在DataGrid里增加一行,如果没有输入数据再点击一次按钮,会报错“无法插入空行”
Visual Basic code?Private Sub Command1_Click() On Error Resume Next Adodc1.Recordset.AddNew Exit SubEnd Sub
我目前是用这种方法解决的,有没有好点的办法,手工控制进行提示呢?
现在的方法可以。另外一种:
Visual Basic code?Dim blnAdding As BooleanPrivate Sub Command1_Click() If blnAdding Then Exit Sub Adodc1.Recordset.AddNew blnAdding = TrueEnd Sub
当在其他过程中完成记录 Update 时,记得设置 blnAdding = False
设置一个标识。也想到过,另外想到另外一种变通的方法,当点击添加按钮时,将按钮的Enable属性为False,Update完成后再设回True。