- <%@ Page Language="VB" %>
- <%@ Register TagPrefix="wmx" Namespace="Microsoft.Saturn.Framework.Web.UI" Assembly="Microsoft.Saturn.Framework, Version=0.5.464.0, Culture=neutral, PublicKeyToken=6f763c9966660626" %>
- <%@ import Namespace="System.Data" %>
- <%@ import Namespace="System.Data.SqlClient" %>
- <script runat="server">
-
- Sub Page_Load(Sender As Object, E As EventArgs)
-
- ' TODO: Update the ConnectionString and CommandText values for your application
- Dim ConnectionString As String = "server=nom_du_server_SQL;database=Nom_de_la_base;trusted_connection=true"
- Dim CommandText As String = "select Nom,prenom from personnel"
-
- Dim myConnection As New SqlConnection(ConnectionString)
- Dim myCommand As New SqlCommand(CommandText, myConnection)
-
- myConnection.Open()
-
- DataGrid1.DataSource = myCommand.ExecuteReader(CommandBehavior.CloseConnection)
- DataGrid1.DataBind()
-
-
- End Sub
-
- Sub DataGrid1_SelectedIndexChanged(sender As Object, e As EventArgs)
-
- End Sub
-
- </script>
- <html>
- <head>
- </head>
- <body style="FONT-FAMILY: arial">
- <h2>Simple Data Report
- </h2>
- <hr size="1" />
- <form runat="server">
- <asp:DataGrid id="DataGrid1" runat="server" BackColor="Silver" ForeColor="Black" OnSelectedIndexChanged="DataGrid1_SelectedIndexChanged" Width="399px" Height="155px" BorderColor="Gray" BorderStyle="Groove">
- <HeaderStyle borderstyle="Double" bordercolor="Black" backcolor="#8080FF"></HeaderStyle>
- </asp:DataGrid>
- </form>
- </body>
- </html>
-
<%@ Page Language="VB" %>
<%@ Register TagPrefix="wmx" Namespace="Microsoft.Saturn.Framework.Web.UI" Assembly="Microsoft.Saturn.Framework, Version=0.5.464.0, Culture=neutral, PublicKeyToken=6f763c9966660626" %>
<%@ import Namespace="System.Data" %>
<%@ import Namespace="System.Data.SqlClient" %>
<script runat="server">
Sub Page_Load(Sender As Object, E As EventArgs)
' TODO: Update the ConnectionString and CommandText values for your application
Dim ConnectionString As String = "server=nom_du_server_SQL;database=Nom_de_la_base;trusted_connection=true"
Dim CommandText As String = "select Nom,prenom from personnel"
Dim myConnection As New SqlConnection(ConnectionString)
Dim myCommand As New SqlCommand(CommandText, myConnection)
myConnection.Open()
DataGrid1.DataSource = myCommand.ExecuteReader(CommandBehavior.CloseConnection)
DataGrid1.DataBind()
End Sub
Sub DataGrid1_SelectedIndexChanged(sender As Object, e As EventArgs)
End Sub
</script>
<html>
<head>
</head>
<body style="FONT-FAMILY: arial">
<h2>Simple Data Report
</h2>
<hr size="1" />
<form runat="server">
<asp:DataGrid id="DataGrid1" runat="server" BackColor="Silver" ForeColor="Black" OnSelectedIndexChanged="DataGrid1_SelectedIndexChanged" Width="399px" Height="155px" BorderColor="Gray" BorderStyle="Groove">
<HeaderStyle borderstyle="Double" bordercolor="Black" backcolor="#8080FF"></HeaderStyle>
</asp:DataGrid>
</form>
</body>
</html>