At Percona’s web store you can order your MongoDB database support needs in minutes. No hassles, no fuss, just pick and click. Pay online with a credit card. Handle your MongoDB database support now!
For m = 0 To lstTags.Items.Count - 1 currTagQry = "SELECT * from T_TEST WHERE TAG = '" & lstTags.Items(m) & "' ORDER BY TAG, LOCATION" Dim cmd6 As New System.Data.OleDb.OleDbCommand(currTagQry, conn6) Dim data6 As New System.Data.OleDb.OleDbDataAdapter(cmd6) ds_CurrTagQry.Reset() Try data6.Fill(ds_CurrTagQry, "CURRTAGQRY") Catch ex As Exception End Try For p = 0 To ds_CurrTagQry.Tables("CURRTAGQRY").Rows.Count - 1 shtTags.Cells(lstExcelRow, 1).value = ds_CurrTagQry.Tables("CURRTAGQRY").Rows(p).Item("TAG").ToString() Next Next
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.