Bonjour;
Je voudrais récupérer le résultat de la requête sql et de l'afficher sur le navigateur, mais rien ne s'affiche Voici le code:
Merci.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 Protected Sub Afficher_Click(ByVal sender As Object, ByVal e As EventArgs) Handles Afficher.Click Dim lect As SqlDataReader Try cmd1 = cn.CreateCommand cmd1.CommandText = String.Format("select id from comentaire") lect = cmd.ExecuteReader While lect.Read Response.Write("<i> Nom </i>" & "<table width=""900"" border=""1"" style=""background-color:#003330""><tr><td><b> " & lect(0).items & "</b></tr></table>" & "!") End While lect.Close() Catch ex As Exception Finally cn.Close() End Try End Sub
Partager