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 :) ]
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.