Question

vb标准表达式中数据类型不匹配

下面是VB指出错误源码错误的一整句：
Set adoRs = adoCon.Execute("insert into tb_JT_QC(ID,OUT_NumID,OUT_KZX,OUT_name,OUT_JE,OUT_date,OUT_BZ,OUT_USER,OUT_USER_date) values(" & StrNum & ",'" & Text1(0).Text & "','" & Combo2.Text & "','" & Text1(1).Text & "','" & Text1(2).Text & "','" & Str(DTP_GX.Value) & "','" & Text1(3).Text & "','" & Name1 & "','" & Str(DTP_GX.Value) & "')")

Answer 1

OUT_date和OUT_USER_date这两个字段是什做滚弊么类备扮型呢？如果是日期型的，那么就要这样：

Set adoRs = adoCon.Execute("insert into tb_JT_QC(ID,OUT_NumID,OUT_KZX,OUT_name,OUT_JE,OUT_date,OUT_BZ,OUT_USER,OUT_USER_date) values(" & StrNum & ",'纯族" & Text1(0).Text & "','" & Combo2.Text & "','" & Text1(1).Text & "','" & Text1(2).Text & "',#" & DTP_GX.Value & "#,'" & Text1(3).Text & "','" & Name1 & "',#" & DTP_GX.Value & "#)")

追问

把我原来的换成你的后变成日期语法错误了。看图

追答

你的DTP_GX这个控件难道用的是自定义格式吗？正常的话不会出现 2016/1/23 星期六 这样的数据的。

Answer 2

ACCESS中,自伏腔动编号类型实际上是整形数字,所以你庆厅高写入的时候,不能带单引号(各个数据誉尺库中规定不同,比如ORACLE中就可以)
Adodc3.RecordSource
=
"SELECT
*
FROM
tkgl
where
编号
=
"
&
bianhao
&
"
"
Adodc3.Refresh