我这样向数据库添加新记录为什么会错?该如何添加新记录呢?Private Sub cmdSave_Click()
With Mange_Data.rsMember
.Open
.AddNew
.Fields("会员号") = txtMemberNumber.Text
.Fields("会员名") = txtMemberName.Text
.Fields("状态") = comMemberState.Text
.Fields("会员卡号") = txtMemberCardNO.Text
.Close
End With
End Sub
With Mange_Data.rsMember
.Open
.AddNew
.Fields("会员号") = txtMemberNumber.Text
.Fields("会员名") = txtMemberName.Text
.Fields("状态") = comMemberState.Text
.Fields("会员卡号") = txtMemberCardNO.Text
.Close
End With
End Sub
解决方案 »
- 求文件监控实现
- 在VB在如何添加Toolbar部件
- 关于VB2005速成测试版新建无任何选项的问题
- ComBox的锁定问题?
- 我在点击下载网页上的连接文件时,没有跳出“目标另存为”的对话框,而是直接下载到临时文件夹,过后却又找不到文件,怎么办?
- datareport 中年月日如何分开显示,急手!
- 将程序中的数据导出到Excel后,怎样在程序中释放Excel资源
- 超级难题:如果在VB工程中响应Excel中的系统消息?
- 有个小问题,还请高手帮个忙啦!
- 如何在VB的DataReport中编写分组显示数据
- 怎么不能更新数据库里的数据?
- 问一个很简单的问题:我是个VB新手,加入程序中加入登录form,怎么样才能让它一打开就显示?
With Mange_Data.rsMember
.Open
.AddNew
.Fields("会员号") = txtMemberNumber.Text
.Fields("会员名") = txtMemberName.Text
.Fields("状态") = comMemberState.Text
.Fields("会员卡号") = txtMemberCardNO.Text
.Close
.update
End With
End Sub
提示无法插入空行
可是我这里都有填内容啊
是不是.addnew的用法不对?