主题：SQL

Dim name As String
For Each dr1 As DataRow In dt.Datarows
    nd3 = nd2.nodes.add("01",dr1("CSearchName"))
    name = dr1("CName")
    cmd1.CommandText = "Select * From ['"& name &"'] "
    dt1 = cmd1.ExecuteReader()
    For Each dr2 As DataRow In dt1.Datarows
        nd3.nodes.add("0101",dr2("CSName"))
    Next
Next

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:unnamed qq screenshot20141210091541.rar