This is a sample blog entry using a new tool, called VisualBlogger.



1Public Class Employee
2 Public Function GetEmployees() As DataSet
3 Dim ds As New DataSet
4 Dim oCon As New SqlConnection(ConfigurationSettings.ConnectionStrings("NorthwindConnection").ConnectionString)
5 Dim da As New SqlDataAdapter("Select * from Employees", oCon)
6 da.Fill(ds, "Employee")
7 Return ds
8 End Function
9End Class