saeed_sho
پنج شنبه 29 تیر 1391, 12:14 عصر
سلام
من یه یوزر کنترل دارم که توی اون یه repeater دارم و میخوام آدرس فایل تبلیغاتی رو که در فولدری ذخیره شده رو از دیتابیس بگیرم و در repeater نشون بدم اما نوع فایل های من دو نوع swf و jpg هستش که در یکی از فیلدهام نوع فایل رو ذخیره میکنم و میخوام با توجه به فیلدی که در تیبل دارم اونو تعیین کنم اما کدهایی که زدم هیچ واکنشی نشون نمیدن اینم کدهامه:
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="wuc_tablighat.ascx.vb" Inherits="SmsPanel.wuc_tablighats" %>
<table width ="960px" dir ="rtl" cellpadding ="0" cellspacing ="0">
<tr>
<td align ="right" style ="margin-left: 20px; margin-right: 20px; width: 920px; height: 140px;">
<asp:Repeater ID="rpt_tabligh" runat="server">
</asp:Repeater>
</td>
</tr>
</table>
Private Sub rpt_tabligh_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.RepeaterItemEventArgs) Handles rpt_tabligh.ItemDataBound
'این شرط کنترل میکند که نو فایل فلش است یا خیر
'در صورت برقرار نبودن شرط فایل از نوع jpg میباشد
If (e.Item.DataItem("tabligh_file_type") = "swf") Then
'یک کنترل لیترال تعریف میشود و یک شیء دایو قرار داده میشود
'و درون دایو یک شیء لینک قرار میگیرد تا در صورت کلیک کاربر به صفحه مورد نظر هدایت شود
'و درون دایو یک شیء آبجکت برای نمایش فلش قرار داده میشود
Dim itemNew As New Literal()
itemNew.ID = "itemDis" & e.Item.DataItem("tabligh_id")
itemNew.Text = "<div id='itemDis_" & e.Item.DataItem("tabligh_id") & "' style='width: 460px; height: 140px;' valign='center'>" & _
"<a href='" & e.Item.DataItem("tabligh_click_page") & "' target='_blank' style='width: 460px; height: 140px;'>" & _
"<object id='player1' type='apllication/x-shockwave-flash' data='../Images/Tablighat/" & e.Item.DataItem("tabligh_file_address") & _
"' height='140px' width='460px' style='border: 1px solid #FFFFFF;'>" & _
"<param name='movie' value='../Images/Tablighat/" & e.Item.DataItem("tabligh_file_address") & "' />" & _
"<param name='play' value='true' /><param name='loop' value='true' /><param name='scale' value='ExactFit'/>" & _
"<param name='mode' value='0' /><param name='menu' value='false' /><param name='allowFullScreen' value='false'/>" & _
"<param name='allowScriptAccess' value=sameDomain' /><param name='quality' value='high' /></object></a></div>"
'کنترل لیترال به کنترل آیتم اضافه میشود
e.Item.Controls.Add(itemNew)
Else
'یک شیء لیترال ایجاد میشود و درون آن یک دایو قرار داده میشود
'و درون دایو یک شیء لینک قرار میگیرد تا در صورت کلیک کاربر به صفحه مورد نظر هدایت شود
'و درون دایو یک شیء عکس قرار داده میشود تا تصویر از نوع jpg را نشان دهد
Dim itemNew As New Literal()
itemNew.ID = "itemDis" & e.Item.DataItem("tabligh_id")
itemNew.Text = "<div id='itemDis_" & e.Item.DataItem("tabligh_id") & "' style='width: 460px; height: 140px;' valign='center'>" & _
"<a href='" & e.Item.DataItem("tabligh_click_page") & "' target='_blank' style='width: 460px; height: 140px;'>" & _
"<asp:Image id='imgDis" & e.Item.DataItem("tabligh_id") & "' imageUrl='../Images/Tablighat/" & e.Item.DataItem("tabligh_file_address") & _
"' AlternateText='" & e.Item.DataItem("tabligh_click_page") & "' Width ='460px' Height ='140px' /></a></div>"
'کنترل لیترال به کنترل آیتم اضافه میشود
e.Item.Controls.Add(itemNew)
End If
End Sub
لطفا راهنمایی کنید
من یه یوزر کنترل دارم که توی اون یه repeater دارم و میخوام آدرس فایل تبلیغاتی رو که در فولدری ذخیره شده رو از دیتابیس بگیرم و در repeater نشون بدم اما نوع فایل های من دو نوع swf و jpg هستش که در یکی از فیلدهام نوع فایل رو ذخیره میکنم و میخوام با توجه به فیلدی که در تیبل دارم اونو تعیین کنم اما کدهایی که زدم هیچ واکنشی نشون نمیدن اینم کدهامه:
<%@ Control Language="vb" AutoEventWireup="false" CodeBehind="wuc_tablighat.ascx.vb" Inherits="SmsPanel.wuc_tablighats" %>
<table width ="960px" dir ="rtl" cellpadding ="0" cellspacing ="0">
<tr>
<td align ="right" style ="margin-left: 20px; margin-right: 20px; width: 920px; height: 140px;">
<asp:Repeater ID="rpt_tabligh" runat="server">
</asp:Repeater>
</td>
</tr>
</table>
Private Sub rpt_tabligh_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.RepeaterItemEventArgs) Handles rpt_tabligh.ItemDataBound
'این شرط کنترل میکند که نو فایل فلش است یا خیر
'در صورت برقرار نبودن شرط فایل از نوع jpg میباشد
If (e.Item.DataItem("tabligh_file_type") = "swf") Then
'یک کنترل لیترال تعریف میشود و یک شیء دایو قرار داده میشود
'و درون دایو یک شیء لینک قرار میگیرد تا در صورت کلیک کاربر به صفحه مورد نظر هدایت شود
'و درون دایو یک شیء آبجکت برای نمایش فلش قرار داده میشود
Dim itemNew As New Literal()
itemNew.ID = "itemDis" & e.Item.DataItem("tabligh_id")
itemNew.Text = "<div id='itemDis_" & e.Item.DataItem("tabligh_id") & "' style='width: 460px; height: 140px;' valign='center'>" & _
"<a href='" & e.Item.DataItem("tabligh_click_page") & "' target='_blank' style='width: 460px; height: 140px;'>" & _
"<object id='player1' type='apllication/x-shockwave-flash' data='../Images/Tablighat/" & e.Item.DataItem("tabligh_file_address") & _
"' height='140px' width='460px' style='border: 1px solid #FFFFFF;'>" & _
"<param name='movie' value='../Images/Tablighat/" & e.Item.DataItem("tabligh_file_address") & "' />" & _
"<param name='play' value='true' /><param name='loop' value='true' /><param name='scale' value='ExactFit'/>" & _
"<param name='mode' value='0' /><param name='menu' value='false' /><param name='allowFullScreen' value='false'/>" & _
"<param name='allowScriptAccess' value=sameDomain' /><param name='quality' value='high' /></object></a></div>"
'کنترل لیترال به کنترل آیتم اضافه میشود
e.Item.Controls.Add(itemNew)
Else
'یک شیء لیترال ایجاد میشود و درون آن یک دایو قرار داده میشود
'و درون دایو یک شیء لینک قرار میگیرد تا در صورت کلیک کاربر به صفحه مورد نظر هدایت شود
'و درون دایو یک شیء عکس قرار داده میشود تا تصویر از نوع jpg را نشان دهد
Dim itemNew As New Literal()
itemNew.ID = "itemDis" & e.Item.DataItem("tabligh_id")
itemNew.Text = "<div id='itemDis_" & e.Item.DataItem("tabligh_id") & "' style='width: 460px; height: 140px;' valign='center'>" & _
"<a href='" & e.Item.DataItem("tabligh_click_page") & "' target='_blank' style='width: 460px; height: 140px;'>" & _
"<asp:Image id='imgDis" & e.Item.DataItem("tabligh_id") & "' imageUrl='../Images/Tablighat/" & e.Item.DataItem("tabligh_file_address") & _
"' AlternateText='" & e.Item.DataItem("tabligh_click_page") & "' Width ='460px' Height ='140px' /></a></div>"
'کنترل لیترال به کنترل آیتم اضافه میشود
e.Item.Controls.Add(itemNew)
End If
End Sub
لطفا راهنمایی کنید