VB Listbox控件内容录入数据库
怎么把Listbox里的所有内容存到数据库中
我的代码是
RS.Fields("备注")=List1.text
可是运行之后数据库的对应字段什么都没存进去,对应字段为空的,请问该怎么改?
[解决办法]
遍历ListBox内容,在For循环中一条一条填,也很快。
使用前需要先打开数据库连接
- VB code
For i=0 to list1.count-1'这里是listbox的总数 sql="select * from 表名" rs.open sql,conn,1,3 rs.addnew rs("备注")=list1.text rs.updatenext i
[解决办法]
- VB code
For i=0 to list1.count-1 sql="select * from 表名" rs.open sql,conn,1,3 rs.addnew rs("备注")= List1.List (i) rs.updatenext i