用ADO 访问access 2000 用listview显示

Question

不行啊，在这个语句中，我可以不用，显示正常。但另外的地方，我有用到key的必要。

Answer 1

是ADO访问access2000不是访问sql server.确定吗?

Answer 2

本模块用于将一个ADO的记录集的内容输出到listview 
http://www.jinesc.com/disp.asp?idx=70key 不一定要唯一的，你要用就赋以下值不就可以了吗？

Answer 3

哦，对了，好象key 必须要唯一的，上面写错了比如在我的代码里
Set itmx = ll.ListItems.Add(, , Trim(r.Fields(0).Value)) 
  itmx.key=r!keyid
ADO访问access2000
只要装了SP5就可以用了

Answer 4

看你这样辛苦给你一点提示吧 ！！！Dim ls as ListItemPrivate Sub ListData()ListView1.ListItems.Clear '清除数据
If Not adors.RecordCount = 0 Then
   Dim intY As Integer
   
   Do Until adors.EOF '循环数据
     intY = intY + 1
     Set ls = ListView1.ListItems.Add
     ls.Text = adors!苹果
     ListView1.ListItems(intY).ListSubItems.Add , , adors!鸭梨
     ListView1.ListItems(intY).ListSubItems.Add , , adors!草莓
     ListView1.ListItems(intY).ListSubItems.Add , , adors!樱桃
     adors.MoveNext
   Loop
End IfEnd Sub

Answer 5

只用把数据库的字段与listview.subitem的列绑定就可以了~!