Learn about Hyper-V features that increase functionality and usability of Microsoft Windows Server 2016. Also, throughout this eBook, you’ll find some basic PowerShell examples that will help you leverage the scripts in your environments!
Dim con As ADODB.Connection Dim rst As ADODB.Recordset Set con = New ADODB.Connection Set rst = New ADODB.Recordset Dim sConString As String Dim sSQLString As String sConString = "Provider=Search.CollatorDSO;Extended Properties='Application=Windows';" con.Open sConString sSQLString = "SELECT Top 5 System.ItemPathDisplay FROM SYSTEMINDEX" Set rst = con.Execute(sSQLString) Do Until (rst.EOF) Debug.Print rst.Fields.Item("System.ItemPathDisplay").Value rst.MoveNext Loop rst.Close Set rst = Nothing con.Close Set con = Nothing
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
Join the community of 500,000 technology professionals and ask your questions.