Check which ports are open to the outside world. Helps make sure that your firewall rules are working as intended.
One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.
Dim sql As String sql = "SELECT * FROM Departments where Customer = '" & customer & "'" ' This is our DataAdapter. This executes our SQL Statement above against the Database ' we defined in the Connection String Dim adapter As New OleDbDataAdapter(sql, con1) ' Gets the records from the table and fills our adapter with those. Dim dt As New DataTable("Departments") adapter.Fill(dt) If dt.Rows.Count = 0 Then MessageBox.Show("No record") Else ' Assigns our DataSource on the DataGridView dgv1.DataSource = dt Dim sql1 As String sql1 = "SELECT * FROM Departments" Dim adapter1 As New OleDbDataAdapter(sql1, con1) Dim cmd1 As New OleDbCommand(sql1, con1) 'Dim dt1 As New DataTable("Departments") con1.Open() Dim myreader As OleDbDataReader = cmd1.ExecuteReader myreader.Read() con1.Close() End If
Add your voice to the tech community where 5M+ people just like you are talking about what matters.
|Vba code required for to attach all .gif (pictures) from folder to email body||4||40|
|VB.net Code to make a TaskPane float in Excel Add-in||2||25|
|VB.Net Exporting Excel Woorkbook to PDF||7||59|
|VB.net Excel VSTO Add-in version compatability||2||15|