关于时间保存!

[dingjuntm]

我用一个DateTimePicker1控件保存时间,我把showcheckbox设置为ture.
Dim overdate As date
If Me.DateTimePicker1.Checked = True Then
overdate = Me.DateTimePicker1.Value.Date
Else
overdate = ""
End If
我用一个
Dim sqlAdd As String
sqlAdd = "insert productpross(poverdate)values('"& overdate &"')
保存在数据库里
当 Me.DateTimePicker1.Checked = True 时是正确时间,
当Me.DateTimePicker1.Checked = False时,就不是为空了,而是默认为:1900-01-01
我想保存在数据库里为空或者为NULL都可以,
有哪位高手遇到过这种情况,请指点一下,谢谢了!

[shengrong_cai]

不能为空或者为NULL！
其理和int型的一样默认是0，
smalldate默认
1900-01-01
范围1900-01-01~2079-12-31;
除非把字段类型设为nvarchar型

[youlongzaitian]

对呀，是不可以的，它有默认值！

[2zhk]

DateTimePicker1.Format = DateTimePickerFormat.Custom
DateTimePicker1.CustomFormat = " "引号内为一个空格。
用DateTimePicker1的text负值，这样就可以获得null值了

[dingjuntm]

谁还有更好的办法呢

[水如烟]

If Me.DateTimePicker1.Checked = True Then
overdate = Me.DateTimePicker1.Value.Date
Else
overdate = "NULL"
End If

[yani_33]

If Me.DateTimePicker1.Checked = True Then
overdate = Me.DateTimePicker1.Value.Date
Else
overdate = "NULL"
End If

[水如烟]

NULL的时候，这里是
sqlAdd = "insert productpross(poverdate)values(NULL)

[dingjuntm]

当overdate = "NULL"就会报错了.
当Me.DateTimePicker1.Checked = False时可以用下面请句,
sqlAdd = "insert productpross(poverdate)values(NULL)
但当Me.DateTimePicker1.Checked = True 时,又会报错.说类型无法转换.

[dingjuntm]

当overdate = "NULL"就会报错了.报错说,NULL没有定义.

[水如烟]

If ... Then
sqlAdd = "insert productpross(poverdate)values('"& overdate &"')
Else
sqlAdd = "insert productpross(poverdate)values(Null)"
End If

[dingjuntm]

你说的这种方法,我现在已经用了,但认为太麻烦,因为在一个保存请句里,有三个这样的字段要这样保存,这样就会出现8种情况去分别讨论.不过很是谢谢你,看得出你认真看过我的问题.(TO水如烟朋友)

还有谁有更好的办法,让我不要写那么冗余的代码!谢谢,

[oo渣渣oo]

你可以把数据库里的日期字段直接定义不CHAR或NVARCHAR,不必一定要用日期型的
这样你在程序里可以直接使用字符串,大大减少代码量.
我一直这样用,还没出过问题

[oo渣渣oo]

第一行打错了个字:"定义不"应为"定义为"!