Imports System.Data Imports System.Data.OleDb Imports System.IO Imports System.Drawing Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click Dim imag As New ImageButton For Each tr As TableRow In Table2.Rows For Each tc As TableCell In tr.Cells For Each c As Control In tc.Controls If Not c.[GetType]() Is GetType(ImageButton) Then tc.Controls.Add(imag) imag.ImageUrl = "~/pic/flower.jpg" imag.ID = Session("imgtle") imag.OnClientClick = "SetSource(this.Id)" End If Next Next Next End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)