none
如何为动态集 adodb.recordset创建索引 RRS feed

  • 问题

  • 想为动态集adodb.recordset创建索引,请问该如何操作?

    代码如下:

    Sub alarm_find()
    Dim rs_z As New ADODB.Recordset

    Dim sql_z As String

    Dim idx_z As New Index
             
    sql_z = " select c.厂家标识,c.地市,c.告警标题  as 主要告警,c.告警对象名称_S,c.告警发生时间  as 主要告警时间  from  告警详表 as c

    Set rs_z = New ADODB.Recordset

    Set rs_z = CurrentDb.OpenRecordset("sql_z")

    With rs_z
    .Index = "idx_z"

    End With


    End Sub

    2016年3月28日 13:44

全部回复