|
<%@Import Namespace="System.Data" %>
<%@Import Namespace="System.Data.SqlClient" %>
<html>
<body>
<h2>Display of Data in a Table (Grid) Using SQL Objects</h2>
Northwind Employees:
<asp:datagrid id="dgrEmployees" runat="server" />
<script language="vb" runat="server">
Sub Page_Load()
Dim strSQL as string = "SELECT FirstName,LastName FROM Employees;"
Dim strConnection as String = "server=EWANB;database=Northwind; User Id=sa;password=;"
Dim objDataSet As New DataSet()
Dim objConnection As New SqlConnection(strConnection)
Dim objDataAdapter As New SqlDataAdapter(strSQL, objConnection)
objDataAdapter.Fill(objDataSet, "Employees")
Dim objDataView As New DataView(objDataSet.Tables("Employees"))
dgrEmployees.DataSource = objDataView
dgrEmployees.DataBind()
End Sub
</script>
</body>
</html>
|