Récupérer le résultat d'une requète sql

Contenu du snippet

Tout dans le titre...

Source / Exemple :


<%@ Page Language="VB" Debug="true" Trace="false" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.Oledb" %>

<SCRIPT language=VB runat=server>
Dim DBobjConn  as OleDBConnection
Dim dS_Global as new DataSet("NomDataSet") ' le nom est facultatif

DBobjConn.Open()
	Sub Page_Load(sender as object,e as eventargs)	

		Dim DBobjConn as New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.MapPath("\base.mdb"))
		DBobjConn.Open()		
		
Dim DBCmd as New OleDbDataAdapter("SELECT * FROM Table",DBobjConn)
		DBCmd.Fill(dS_Global,"Table1")	
		
		
		Dim myTable As DataTable
		Dim myRow As DataRow
		Dim myColumn As DataColumn
		
		
		
		For Each myTable in dS_Global.Tables
			For Each myRow In myTable.Rows           
				response.Write(myRow("ColumnName"))
			Next myRow
		Next myTable		
			
	end sub
</SCRIPT>

Conclusion :


C'est pas top top jtrouve comme methode on doit pouvoir faire autrement mais je c'est pas comment faire, en attendant...

[Excusez moi javais foutu un peu nimporte koi...dsl :) ]

A voir également

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.