Hallo und guten Abend
Ich habe ein "großes" Problem.
Ich möchte mehrere Events auf einen Butten legen, der dann dynamisch vervielfacht wird.
Hier mein Code:
Hoffe Ihr könnt mir einige Tipps geben.
Schönen Abend
Noel Schenk
Edit: Ach ja und momentan passiert nichts
Ich habe ein "großes" Problem.
Ich möchte mehrere Events auf einen Butten legen, der dann dynamisch vervielfacht wird.
Hier mein Code:
VB.NET-Quellcode
- Private Sub RadButton1_Click(sender As Object, e As EventArgs) Handles RadButton1.Click
- Dim PageVerse() As String
- Dim strSql As String = "use bible select * from t_asv"
- Dim dtb As New DataTable
- Using cnn As New SqlConnection("Server=localhost\SQLEXPRESS;Database=bible;User Id=Sys_Bible;Password=SystemBible123;")
- 'Achtung der SQL Server ist auf meinem Home PC also keine Chance meine Datenbank zu manipulieren. :D
- cnn.Open()
- Using dad As New SqlDataAdapter(strSql, cnn)
- dad.Fill(dtb)
- End Using
- cnn.Close()
- End Using
- Dim TextVerse As [String]() = Array.ConvertAll(Of DataRow, [String])(dtb.[Select](), Function(row As DataRow) DirectCast(row("bible_Text"), [String]))
- Dim count As Integer = 0
- For Each Text As String In TextVerse
- Dim testLabel = New LinkButton()
- testLabel.ID = "btn_" + count.ToString
- testLabel.Text = Text
- testLabel.CssClass() = "basic.css"
- AddHandler testLabel.Click, AddressOf dynText_Click
- PlaceHolder1.Controls.Add(testLabel)
- Dim labeltest As New Label
- labeltest.Text = "<div class='page' id='pageTag'><div>nocheinmal text</div><div>// und noch einmal</div>" + Text + "</div>"
- PlaceHolder1.Controls.Add(labeltest)
- count += 1
- Next Text
- RadTextBox1.Text += "-"
- End Sub
- Private Sub dynText_Click(sender As Object, e As EventArgs)
- Label1.Text = "ok post back geht"
- RadButton1_Click(sender, e)
- End Sub
Hoffe Ihr könnt mir einige Tipps geben.
Schönen Abend
Noel Schenk
Edit: Ach ja und momentan passiert nichts