Formatieren von Daten in Spaltenform mit DataList

von Tony Patton am 19. September 2006 , 09:00 Uhr

Das oben angeführte Beispiel bietet eine einfache und direkte Methode zur Ausgabe von Daten in einem leicht verständlichen Format. Es eignet sich gut, um Namenslisten darzustellen und es dem Anwender zu erlauben einen Namen aus der Liste auszuwählen und mehr Informationen zu diesem zu erhalten. Dieser Ansatz wird im nächsten Beispiel umgesetzt.

Der folgende Code erweitert das vorangegangene Beispiel, indem die einzelnen DataList-Felder mit Hyperlinks versehen werden, die je eine weitere ASP.NET-Seite öffnen, auf der Angaben zum ausgewählten Firmennamen zu finden sind. In Listing D wird zuerst das DataList Web Form vorgestellt.

Listing D

Die Werte der einzelnen Felder des vorherigen Beispiels werden mit Links versehen, die das folgende Web Form öffnen. Der Wert Customer ID wird mittels einer QueryString-Variable an das nächste Formular weitergegeben. Dieser Wert wird an einen Datenbankaufruf weitergeleitet, der die Angaben zum Unternehmen in das in Listing E dargestellte Formular lädt.

Listing E

<br />
<%@ Page language="c#" %><br />
<%@ Import Namespace="System.Data" %><br />
<%@ Import Namespace="System.Data.SqlClient" %><br />
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" ><br />
<html><head><title>Details</title><br />
<script language="C#" runat="server">
private void Page_Load(object sender, System.EventArgs e) {
if (!IsPostBack) {
SqlConnectionconn = null;
SqlCommandcomm = null;
SqlDataReadersdr = null;
String cString = "Data Source=LOU8-3590424\PATTON;Initial Catalog=Northwind;User Id=sa;Password=;";
String custID = Request.QueryString["custid"];
String selString = "SELECT CustomerID, CompanyName, ContactName, Address, City, Country, PostalCode FROM Customers WHERE CustomerID = '" + custID + "' ORDER BY CompanyName";
try {
using (conn = new SqlConnection(cString)) {
conn.Open();
comm = new SqlCommand(selString, conn);
sdr = comm.ExecuteReader();
sdr.Read();
txtAddress.Text = sdr["Address"].ToString();
txtCity.Text = sdr["City"].ToString();
txtCompanyName.Text = sdr["CompanyName"].ToString();
txtID.Text = sdr["CustomerID"].ToString();
txtCountry.Text = sdr["Country"].ToString();
txtPostalCode.Text = sdr["PostalCode"].ToString();
txtContactName.Text = sdr["ContactName"].ToString();
} finally {
sdr.Dispose();
comm.Dispose();
if (conn.State == ConnectionState.Open) {
conn.Close();
}
conn.Dispose();
}
}
}
}
</script></head><body></p>
<form id="frmDetails" method="post" runat="server">
<table border="0">
<tr>
<td><STRONG>ID:</STRONG></td>
<td><asp:TextBox id="txtID" runat="server" Width="97px" /></td>
</tr>
<tr>
<td><STRONG>Company:</STRONG></td>
<td><asp:TextBox id="txtCompanyName" runat="server" /></td>
</tr>
<tr>
<td><STRONG>Contact:</STRONG></td>
<td><asp:TextBox id="txtContactName" runat="server" /></td>
</tr>
<tr>
<td><STRONG>Address:</STRONG></td>
<td><asp:TextBox id="txtAddress" runat="server" /></td>
</tr>
<tr>
<td><STRONG>City:</STRONG></td>
<td><asp:TextBox id="txtCity" runat="server" /></td>
</tr>
<tr>
<td><STRONG>Country:</STRONG></td>
<td><asp:TextBox id="txtCountry" runat="server" /></td>
</tr>
<tr>
<td><STRONG>Postal Code:</STRONG></td>
<td><asp:TextBox id="txtPostalCode" runat="server" /></td>
</tr>
</table>
</form>
<p></body></html><br />

Die Kombination der beiden Formulare erlaubt es dem Anwender, eine Liste mit Firmennamen schnell durchzublättern und sich zu einem der Namen weitere Angaben anzeigen zu lassen. Listing F enthält den entsprechenden VB.NET-Code, Listing G den VB.NET-Code für die Seite mit den Angaben.

Listing F

<br />
<%@ Page language="vb" %><br />
<%@ Import Namespace="System.Data" %><br />
<%@ Import Namespace="System.Data.SqlClient" %><br />
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" ><br />
<html><head><title> BuilderAu.com.au – DataList </title><br />
<script language="vb" runat="server">
Sub Page_Load(Sender As Object, e As System.EventArgs)
Dim conn As SqlConnection
Dim comm As SqlCommand
Dim cString AS String
cString = "Data Source=LOU8-3590424PATTON;Initial Catalog=Northwind;User Id=test;Password=test;"
Dim selString As String
selString = "SELECT CustomerID, CompanyName FROM Customers ORDER BY CompanyName"
Try
conn = New SqlConnection(cString)
conn.Open()
comm = new SqlCommand(selString, conn)
dlCompanyList.DataSource = comm.ExecuteReader()
dlCompanyList.DataBind()
Finally
comm.Dispose()
If (conn.State = ConnectionState.Open) Then
conn.Close()
End If
conn.Dispose()
End Try
End Sub
</script></head><br />
<body></p>
<form id="frmDataListTest" method="post" runat="server">
<asp:DataList id="dlCompanyList" runat="server" RepeatColumns="4" RepeatDirection="Vertical" GridLines="Both" RepeatLayout="Table" Caption="BuilderAU.com.au Test"><br />
<ItemTemplate><br />
<a href="Details.aspx?custid=<%# Eval("CustomerID") %>„><br />
<asp:Label Text='<%# Eval("CompanyName") %>‚ Runat=“Server“ ID=“lblCompanyName“/><br />
</a><br />
</ItemTemplate><br />
<AlternatingItemTemplate><br />
<a href="Details.aspx?custid=<%# Eval("CustomerID") %>„><br />
<asp:Label Text='<%# Eval("CompanyName") %>‚ Runat=“Server“ ID=“Label1″ BackColor=“Yellow“/><br />
</a><br />
</AlternatingItemTemplate><br />
<SeparatorTemplate></p>
<p></SeparatorTemplate><br />
</asp:DataList><br />
</form>
<p></body></html><br />

Listing G

<br />
<%@ Page language="vb" %><br />
<%@ Import Namespace="System.Data" %><br />
<%@ Import Namespace="System.Data.SqlClient" %><br />
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN" > <br />
<html><head><title>Details</title><br />
<script language="vb" runat="server">
Public Sub Page_Load(sender As Object, e As System.EventArgs)
If Not (IsPostBack) Then
Dim conn As SqlConnection
Dim comm As SqlCommand
Dim sdr As SqlDataReader
Dim cString As String
cString = "Data Source=Test;Initial Catalog=Northwind;User Id=sa;Password=;"
Dim custID As String
custID = Request.QueryString("custid")
Dim selString As String
selString = "SELECT CustomerID, CompanyName, ContactName, Address, City, Country, PostalCode FROM Customers WHERE CustomerID = '" + custID + "' ORDER BY CompanyName"
Try
conn = New SqlConnection(cString)
conn.Open()
comm = new SqlCommand(selString, conn)
sdr = comm.ExecuteReader()
sdr.Read()
txtAddress.Text = sdr("Address").ToString()
txtCity.Text = sdr("City").ToString()
txtCompanyName.Text = sdr("CompanyName").ToString()
txtID.Text = sdr("CustomerID").ToString()
txtCountry.Text = sdr("Country").ToString()
txtPostalCode.Text = sdr("PostalCode").ToString()
txtContactName.Text = sdr("ContactName").ToString()
Finally
sdr.Dispose()
comm.Dispose()
If (conn.State = ConnectionState.Open) Then
conn.Close()
End If
conn.Dispose()
End Try
End If
End Sub
</script></head><br />
<body></p>
<form id="frmDetails" method="post" runat="server">
<table border="0">
<tr>
<td><STRONG>ID:</STRONG></td>
<td><asp:TextBox id="txtID" runat="server" Width="97px" /></td>
</tr>
<tr>
<td><STRONG>Company:</STRONG></td>
<td><asp:TextBox id="txtCompanyName" runat="server" Width="272px" /></td>
</tr>
<tr>
<td><STRONG>Contact:</STRONG></td>
<td><asp:TextBox id="txtContactName" runat="server" Width="272px" /></td>
</tr>
<tr>
<td><STRONG>Address:</STRONG></td>
<td><asp:TextBox id="txtAddress" runat="server" Width="273px" /></td>
</tr>
<tr>
<td><STRONG>City:</STRONG></td>
<td><asp:TextBox id="txtCity" runat="server" Width="273px" /></td>
</tr>
<tr>
<td><STRONG>Country:</STRONG></td>
<td><asp:TextBox id="txtCountry" runat="server" /></td>
</tr>
<tr>
<td><STRONG>Postal Code:</STRONG></td>
<td><asp:TextBox id="txtPostalCode" runat="server" /></td>
</tr>
</table>
</form>
<p></body></html><br />

Inhalt

Formatieren von Daten in Spaltenform mit DataList

Neueste Kommentare

Noch keine Kommentare zu Formatieren von Daten in Spaltenform mit DataList

Vielen Dank für Ihren Kommentar.
Ihr Kommentar wurde gespeichert und wartet auf Moderation.

Schreibe einen Kommentar Antworten abbrechen

Neueste Kommentare

Noch keine Kommentare zu Formatieren von Daten in Spaltenform mit DataList

Vielen Dank für Ihren Kommentar.Ihr Kommentar wurde gespeichert und wartet auf Moderation.

Schreibe einen Kommentar Antworten abbrechen

Vielen Dank für Ihren Kommentar.
Ihr Kommentar wurde gespeichert und wartet auf Moderation.