Is your cloud always on? With an Always On cloud you won't have to worry about downtime for maintenance or software application code updates, ensuring that your bottom line isn't affected.
'Declare Connection and set connection string Dim ClientCompaniesConnection As OleDbConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=S:\SimonEvans\Visual Basic Programs\IncorpDB\Incorporation Database.mdb") 'Declare Adapter Dim ClientCompaniesDataAdapter As New OleDbDataAdapter 'Set the CommandText for the Adapter and tell to connect to ClientCompaniesConnection ClientCompaniesDataAdapter.SelectCommand = New OleDbCommand ClientCompaniesDataAdapter.SelectCommand.Connection = ClientCompaniesConnection ClientCompaniesDataAdapter.SelectCommand.CommandText = "SELECT * FROM EIncCompanies WHERE ClientCode = '" & SearchString & "'" 'Declare the DataSet and Fill from the Adapter Dim ClientCompaniesDataSet As DataSet = New DataSet() ClientCompaniesDataAdapter.Fill(ClientCompaniesDataSet, "EIncCompanies") 'Declare the DataView Dim ClientCompaniesDataView = New DataView(ClientDataSet.Tables("EIncCompanies")) 'Check the count and then show the first record if there is one (just to check it works) If ClientCompaniesDataView.Count > 0 Then MsgBox(ClientCompaniesDataView(0).Item("Companyname"))
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.