|
N.B. Il va de soit qu'à cette étape, vous avez déjà installé la base de données SQL Server!
Ensuite, en supposant que vous avez une base de données nommé «mybasededonnees_db» dans votre base de données SQL Server Express avec la table «cdmworkgroup» ayant le contenu suivante:
| 000 |
0000023901 |
Coder |
Développement |
Groupe de programmeur effectuant de la recherche et développement (R&D). |
A |
2006/03/09 |
SYSADM |
2006/03/09 |
SYSADM |
| 000 |
0000023902 |
Maintenance |
Maintenance |
Groupe maintenant les divers services réseaux, implantant les développements, maintenant l'état actuel du matériel et administratant les accès. |
A |
2006/03/09 |
SYSADM |
2006/03/09 |
SYSADM |
| 000 |
0000023903 |
Direction |
Direction |
Direction Groupe de travail s'occupant des divers orientations à prendre sur les projets et les produits. |
I |
2006/03/09 |
SYSADM |
2006/03/09 |
SYSADM |
| 075 |
0000000068 |
Test |
Teste |
Groupe désigné pour le contrôle de la Qualité |
A |
2006/03/09 |
STREMBLAY |
2006/03/09 |
STREMBLAY |
Grâce à ce petit programme, vous pourrez afficher la table «cdmworkgroup» vers le navigateur:
<%@ Page Language="VB" %>
<%@ Import Namespace="System.Data.SqlClient" %>
<%
Dim conn As SqlConnection = New SqlConnection("Data Source=(local)\SQLEXPRESS;Initial Catalog=mybasededonnees_db;Integrated Security=True")
Try
conn.Open()
Dim stmt As New SqlCommand("SELECT WorkGroupId,Name_EN,Name_FR FROM cdmworkgroup;", conn)
Dim RS As SqlDataReader = stmt.ExecuteReader()
While RS.Read()
Response.Write(CStr(RS("Name_FR")) &"<br>")
End While
conn.Close()
Catch
Console.WriteLine("Connexion impossible: ", conn.ConnectionString)
End Try
%>
|
Ensuite, vous devriez voir afficher un résultat ressemblant à celui-ci:
Développement
Maintenance
Direction
Teste
|
|
|
| Dernière mise à jour: Mardi, le 7 février 2006 |