Soyez le premier à donner votre avis sur cette source.
Snippet vu 15 488 fois - Téléchargée 34 fois
<%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.Oledb" %> <SCRIPT language=VB runat=server> Sub Page_Load(sender as object,e as eventargs) Dim DBobjConn as OleDBConnection DBobjConn = New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Request.MapPath("\aspx\ASPxMyAdmin\test.mdb")) DBobjConn.Open() Dim dS_ModifTable as new DataSet Dim ODDA_ModifTable as new OLEDBDataAdapter("SELECT * FROM Table1",dbobjconn) ODDA_ModifTable.Fill(dS_ModifTable,"Table1") Dim MyTable as DataTable Dim MyColumn as DataColumn Dim MyRow as DataRow response.Write("<TABLE width=100% cellspacing=0 cellpadding=0 border=1 bordercolor=#777777><TR>") For Each MyTable in dS_ModifTable.Tables For Each MyColumn in MyTable.Columns response.Write("<TD align=center>" & MyColumn.Caption & "</TD>") Next MyColumn Next MyTable response.Write("</TD>") For Each MyTable in dS_ModifTable.Tables For Each MyRow in MyTable.Rows response.Write("<TR>") For Each MyColumn in MyTable.Columns response.Write("<TD align=center>" & MyRow(MyColumn.Caption) & "</TD>") Next MyColumn response.Write("</TR>") Next MyRow Next MyTable response.Write("</TABLE>") End Sub </SCRIPT>
Ma page est vide.
Et pour ma part les contrôles de liste c'est (à priori) très bien, d'une part car il tienne compte des clients mais dès qu'on veut faire du spec, c'est la mort...
Les controles de listess sont :
. Repeater
. DataList
. DataGrid
Voilà, bonne programmation
A+
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.