主题：用access作为外部数据源没有提示,用SQL作为外部数据源,有截图提示,为什么?

此主题相关图片如下：未命名.gif

我的过程是这样的:

1、父表增加一行

2、在父表输入相关数据

3、增加子表行

 

用access作为外部数据源没有提示，用SQL作为外部数据源有截图提示。

 

上述过程是通过代码完成的

 

用access可以给新增加行输入数据，用sql2000就不可以给新增加行输入数据。

注：是用代码输入数据的。

我解决不了,谁可以帮我远程协助一下?

提示的错误是事实,但我不知道怎么解决

Dim a,s As String
For Each c As Winform.Control In e.Form.Controls
    If  e.Form.Controls("" & c.name & "").text=""
        a="no"
    End If
Next
If e.form.controls("日期").text = ""
    messagebox.show("日期 不能为空,否则无法关闭")
Else
    Dim dr As Row=vars("父表t").rows.AddNew() '父表增加一行
    dr("单据类型")=vars("单据类型")
    dr("日期")=vars("日期")
    If month(dr("日期"))<10
        s=year(vars("日期")) & "0" & month(vars("日期"))
    Else
        s=year(vars("日期")) & month(vars("日期"))
    End If
    dr("年月")=s
    Dim s1 As Double = vars("父表t").Compute("max(单据序号)", "年月='" & s & "'")
    If s1=0
        dr("单据序号")=s & "001"
    Else
        dr("单据序号")=s1+1
    End If
    dr("年月")=s
    vars("关联表").Rows.AddNew() '关联表增加一行
    e.Form.close()
End If

Dim dr As Row=vars("父表t").rows.AddNew() '父表增加一行
运行到这里就停止运行了

e.DataRow("单据编号")=e.DataRow("单据类型") & e.DataRow("单据序号")

 用SQL

此主题相关图片如下：未命名.gif

用ACCESS

此主题相关图片如下：未命名1.gif

最后一行是运行结果，只是数据源不同，其他一切都一样的。

单据类型是空的，是怎么回事