Na stranici (web form) postoji Image#velikaSlika (imgKontrol) i DataList#maleSlike koja se Binduje svim slikama nekog foldera.
Kako da napravim da se klikom na neku od malih slika u DataList#maleSlike u kontroli Image#velikaSlika učita (prikaže) baš ta slika.
Možda bude jasnije uz postojeći kod:
Details.aspx
Details.aspx.vb
Hvala unapred
Kako da napravim da se klikom na neku od malih slika u DataList#maleSlike u kontroli Image#velikaSlika učita (prikaže) baš ta slika.
Možda bude jasnije uz postojeći kod:
Details.aspx
Code:
<div id="velikaSlika">
<asp:Image ID="velSlika" runat="server" Width="350" Height="263px" ImageUrl="" />
</div>
<div id="maleSlike">
<asp:DataList id="dlMaleSlike" runat="server" RepeatDirection="Vertical" RepeatColumns="4">
<ItemTemplate >
<asp:Image ID="imgFromList" runat="server" ImageUrl='<%# Bind("Name") %>' width="100px" Height="70px" />
</ItemTemplate>
</asp:DataList>
</div>
<div id="velikaSlika">
<asp:Image ID="velSlika" runat="server" Width="350" Height="263px" ImageUrl="" />
</div>
<div id="maleSlike">
<asp:DataList id="dlMaleSlike" runat="server" RepeatDirection="Vertical" RepeatColumns="4">
<ItemTemplate >
<asp:Image ID="imgFromList" runat="server" ImageUrl='<%# Bind("Name") %>' width="100px" Height="70px" />
</ItemTemplate>
</asp:DataList>
</div>
Details.aspx.vb
Code:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
folderName = Request("id")
BindDataToList(folderName)
End Sub
Protected Sub dlMaleSlike_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataListItemEventArgs) Handles dlMaleSlike.ItemDataBound
If e.Item.ItemType = ListItemType.AlternatingItem Or e.Item.ItemType = ListItemType.Item Then
DirectCast(e.Item.FindControl("imgFromList"), Image).ImageUrl = "~/images/accommodation/" + folderName + "/" + CType(e.Item.DataItem, System.IO.FileInfo).Name
End If
End Sub
Private Sub BindDataToList(ByVal dirWithImages As String)
If folderName = "" Then
Response.Write("odaberi slike iz padajućeg izbornika")
Else
Dim di As New DirectoryInfo("C:\Documents and Settings\V\My Documents\Vinko WEB\Apartmani\02Cro-adriaNet\images\accommodation\" & dirWithImages)
Me.dlMaleSlike.DataSource = di.GetFiles()
Me.dlMaleSlike.DataBind()
End If
End Sub
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
folderName = Request("id")
BindDataToList(folderName)
End Sub
Protected Sub dlMaleSlike_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataListItemEventArgs) Handles dlMaleSlike.ItemDataBound
If e.Item.ItemType = ListItemType.AlternatingItem Or e.Item.ItemType = ListItemType.Item Then
DirectCast(e.Item.FindControl("imgFromList"), Image).ImageUrl = "~/images/accommodation/" + folderName + "/" + CType(e.Item.DataItem, System.IO.FileInfo).Name
End If
End Sub
Private Sub BindDataToList(ByVal dirWithImages As String)
If folderName = "" Then
Response.Write("odaberi slike iz padajućeg izbornika")
Else
Dim di As New DirectoryInfo("C:\Documents and Settings\V\My Documents\Vinko WEB\Apartmani\02Cro-adriaNet\images\accommodation\" & dirWithImages)
Me.dlMaleSlike.DataSource = di.GetFiles()
Me.dlMaleSlike.DataBind()
End If
End Sub
Hvala unapred
Potpis
Vinko
www.cro-adria.net
www.cro-adria.net