cmd As New OracleCommand(sql)
Private Sub Button4_Click(sender As Object, e As EventArgs) Handles Button4.Click
Dim oradb As String = "Data Source=datasource;User Id=user;Password=password;"
Dim conn As New OracleConnection(oradb)
Dim connect As Object = Nothing
Try
conn.Open()
' connect.Enabled = False
Dim sql As String = "Select name from client'"
Dim cmd As New OracleCommand(sql)
cmd.CommandType = CommandType.Text
Dim dr As OracleDataReader = cmd.ExecuteReader()
dr.Read()
departments.Items.Add(dr.GetString(0))
Catch ex As Exception
End Try
End Sub
End Class
Experts Exchange (EE) has become my company's go-to resource to get answers. I've used EE to make decisions, solve problems and even save customers. OutagesIO has been a challenging project and... Keep reading >>
Our community of experts have been thoroughly vetted for their expertise and industry experience.
The Most Valuable Expert award recognizes technology experts who passionately share their knowledge with the community, demonstrate the core values of this platform, and go the extra mile in all aspects of their contributions. This award is based off of nominations by EE users and experts. Multiple MVEs may be awarded each year.
The Distinguished Expert awards are presented to the top veteran and rookie experts to earn the most points in the top 50 topics.