# Re: 再次请教

Posted by JOB on June 07, 1999 at 10:28:36:

In Reply to: 再次请教 posted by ㄚ雄 on June 07, 1999 at 02:28:47:

: : : : : 如何使用VB6 将Access 的日期(or 数值)栏位写入Null值?
: : : : : 如果可以的话,使用日期(or 数值)变数去承接的话, 要如何避免错误

: : : :
: : : : ex:
: : : : !datefiled=null

: : : 如果使用变数(Or TextBox)承接这个栏位,则会造成
: : : 'Null值使用不正确'的 Error Message.......

: : 例如: Text1.text = 栏位值 & ""

: 试过Adodc 搭配 Datagrid ,
: 程式码:
: Dim Con_res As ADODB.Connection
: Dim Res_res As ADODB.Recordset
: Dim Sql_str As String
: Set Con_res = New ADODB.Connection
: Set Res_res = New ADODB.Recordset
: Con_res.Open Con_str
: Sql_str = "insert into asb90 values ('" & Text1(0) & "','" & Text1(1) & "','" & Trim(Text1(2)) & "','" & Trim(Text1(3)) & "')"
: Set Res_res = Con_res.Execute(Sql_str)
: 我的日期栏位(Access 资料库) 还是无法写入 Null or Empty.....
:
你可以看一下日期栏位在ACCESS中是否设定为必须有资料
改成否,如果,还不行就给它一个初始值,例如DATE

Follow Ups: