Från en nybörjare! Hej!Hämta data från Datalist
Jag har en enkät där frågorna kommer från en databasen. Frågorna publicerar jag med en datalist och till varje fråga har jag en radiobuttonlist. När jag sedan submittar sidan vill jag skicka ner svaren i databasen.
Hur kommer jag åt värdena i min radiobuttonlist som "loopas" upp till varje fråga. Någon som har ett bra exempel, jag kodar i vb.
Lite kod:
<code>
<HTML>
<HEAD>
<title>TEST</title>
<LINK href="inc/ie.css" type="text/css" rel="STYLESHEET">
</HEAD>
<body>
<form id="Form1" method="post" runat="server">
<P>
<ASP:DATALIST id="DataList1" runat="server" Width="420px">
<ItemTemplate>
<%# FixaRubrik(Container.DataItem("fldFraga"),Container.DataItem("fldTyp")) %>
<asp:RadioButtonList id="rdoLst" runat="server" RepeatDirection="Horizontal" CssClass="liten">
<asp:ListItem Value="1"></asp:ListItem>
<asp:ListItem Value="2"></asp:ListItem>
<asp:ListItem Value="3"></asp:ListItem>
<asp:ListItem Value="4"></asp:ListItem>
<asp:ListItem Value="5"></asp:ListItem>
</asp:RadioButtonList>
</ItemTemplate>
</ASP:DATALIST></P>
</form>
</body>
</HTML>
</code>Sv: Hämta data från Datalist
För att lösa problemet kan det vara bra att känna till hur asp.net hanterar din sida och dina kontroller som adderats till datalisten. Egentligen är en asp.net sida bara en klass som ärver från page (som implementerar ihttphandler interfacet). Denna består av samling kontroller (page är rooten) med underkontroller som i sin tur kan ha underkontroller.
Ett kontrollträd byggs upp för din sida där varje kontroll kan ha underkontroller. Enkel html kommer tex. att bli en literalcontrol. Det som du sätter inom <% %> kommer dock skrivas in i en dynamiskt skapad metod (typ __Render__control1 (Kolla din kompilerade sida med ildasm).
När pagecontrollen renderas ger den i sin tur order om att varje underkontroll som denna har skall renderas.
Nog om detta, över till problemet!
När du droppar en kontroll i en ItemTemplate så kommer denna att hamna som en underkontroll till respektive item i din datalist. För att nå dessa kan du iterera igenom denna. t.ex. på detta sätt:
<code>
Dim ctl As Control
Dim dlItem As DataListItem
For Each dlItem In dlMain.Items
For Each ctl In dlItem.Controls
If ctl.GetType.ToString() = "System.Web.UI.WebControls.RadioButtonList" Then
Dim tempctl As RadioButtonList = DirectCast(ctl, RadioButtonList)
If Not tempctl.SelectedItem Is Nothing Then
Response.Output.Write("<BR>Text: {0}, värde: {1}", tempctl.SelectedItem.Text, tempctl.SelectedItem.Value)
End If
End If
Next
Next
</code>
Du når alltså ditt data genom att kolla igenom alla dina datalistitems i din datalist och för dessa gå igenom alla kontroller som finns i denna.
Exempelkod för detta:
<code>
<%@ Page Language="vb" AutoEventWireup="false" Codebehind="Questions.aspx.vb" Inherits="micke.Questions"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML>
<HEAD>
<title>Questions</title>
<meta content="Microsoft Visual Studio.NET 7.0" name="GENERATOR">
<meta content="Visual Basic 7.0" name="CODE_LANGUAGE">
<meta content="JavaScript" name="vs_defaultClientScript">
<meta content="http://schemas.microsoft.com/intellisense/ie5" name="vs_targetSchema">
</HEAD>
<body>
<form id="Form1" method="post" runat="server">
<asp:datalist id="dlMain" runat="server">
<ItemTemplate>
<%# Databinder.Eval(Container.DataItem,"Question")%>
<asp:RadioButtonList id="rblQuestion" runat="server">
<asp:ListItem Value="Value1">Text1</asp:ListItem>
<asp:ListItem Value="Value2">Text2</asp:ListItem>
<asp:ListItem Value="Value3">Text3</asp:ListItem>
</asp:RadioButtonList>
</ItemTemplate>
</asp:datalist><BR>
<asp:button id="cmdSubmit" runat="server" Text="Submit"></asp:button></form>
</body>
</HTML>
</code>
<code>
Option Explicit On
Option Strict On
Imports System.Data
Imports System.Data.SqlClient
Public Class Questions
Inherits System.Web.UI.Page
Protected WithEvents cmdSubmit As System.Web.UI.WebControls.Button
Protected WithEvents dlMain As System.Web.UI.WebControls.DataList
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'Put user code to initialize the page here
If Not IsPostBack Then
Dim cmd As SqlCommand = New SqlCommand("SELECT * FROM tQuestions")
cmd.Connection = New SqlConnection("server=.;database=testdb;trusted_connection=true")
cmd.Connection.Open()
Dim rdr As IDataReader = cmd.ExecuteReader
dlMain.DataSource = rdr
dlMain.DataBind()
rdr.Close()
cmd.Dispose()
End If
End Sub
Private Sub cmdSubmit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdSubmit.Click
Dim ctl As Control
Dim dlItem As DataListItem
For Each dlItem In dlMain.Items
For Each ctl In dlItem.Controls
If ctl.GetType.ToString() = "System.Web.UI.WebControls.RadioButtonList" Then
Dim tempctl As RadioButtonList = DirectCast(ctl, RadioButtonList)
If Not tempctl.SelectedItem Is Nothing Then
Response.Output.Write("<BR>Text: {0}, värde: {1}", tempctl.SelectedItem.Text, tempctl.SelectedItem.Value)
End If
End If
Next
Next
End Sub
End Class
</code>