Question

vb6.0如何让一些空字段增加到 access数据库

Dim rs As New ADODB.Recordset
Dim sql As String
sql = "select * from client"
rs.Open sql, cnn, adOpenKeyset, adLockPessimistic
rs.AddNew
rs!电话= Trim(Texttel.Text)
rs!姓名 = Trim(Textnom.Text)
rs!地址 = Trim(Textad.Text)
rs!城市 = Trim(Textvl.Text)
rs!邮编 = Trim(Textps.Text)
rs!手机 = Trim(Textbt.Text)
rs!QQ = Trim(Textqq.Text)
rs!msn = Trim(Textmsn.Text)
rs!邮箱 = Trim(Textemail.Text)
rs!备注 = Trim(Texbz.Text)
rs.Update
MsgBox "添加成功！", 0 + 48 + 0, "提示"
rs.Close

代码如上~！~
想做个会员资料库 因为有的资料不全，导致很多字段有时候为空！
增加数据的时候报错~！

Answer 1

变更数据库的结构,它不允许某个字段为空,你为空,所以你添加这条信息被拒绝!