Asp.net ile Manşet Haber buyurun...

Kodla Büyü

ofkeli82

Aktif Üye
Mesajlar
152
Selam arkadaşlar, manşet haber sistemini çok araştırdım birkaç tane buldum da, düzenlemede sorun yaşadım. Uğraşa uğraşa kendim birşeyler yaptım. İstifade etmek isteyenler buyursun. Örnek www. yesilevlerbilisim.com adresinde var,
Arkadaşlar öncelikle işi daha da kolaylaştıran nesneyi eklememiz gerekir.Bu nesne ile emin olun internette bulduklarınızdan daha kolay yapılabiliyor.
www.obout.com daki show nesnesini kullanacağız. Show nesnesini sayfamıza bırakıp içerisine şu kodları yazmamız şimdilik yeterli, hatta direkt olarak kod olarak da ekleyebilirsiniz.

<obshow:Show ID="Show1" runat="server" Width ="300" Height ="220" ManualChanger ="false" ShowType ="Manual" >
<Changer Type="Arrow" ArrowType="Side1" Position="Bottom" VerticalAlign="Middle" HorizontalAlign="Center"></Changer>
<Panels >
<obshow:Panel >
<asp:Image runat="server" ImageUrl ="~/images/01.jpg" Width ="290" Height ="200" />
</obshow:Panel>
<obshow:Panel >
<asp:Image ID="Image1" runat="server" ImageUrl ="~/images/02.jpg" Width ="290" Height ="200" />
</obshow:Panel>
<obshow:Panel >
<asp:Image ID="Image2" runat="server" ImageUrl ="~/images/03.jpg" Width ="290" Height ="200" />
</obshow:Panel>
<obshow:Panel >
<asp:Image ID="Image3" runat="server" ImageUrl ="~/images/04.jpg" Width ="290" Height ="200" />
</obshow:Panel>
<obshow:Panel >
<asp:Image ID="Image4" runat="server" ImageUrl ="~/images/05.jpg" Width ="290" Height ="200" />
</obshow:Panel>
<obshow:Panel >
<asp:Image ID="Image5" runat="server" ImageUrl ="~/images/06.jpg" Width ="290" Height ="200" />
</obshow:Panel>
<obshow:Panel >
<asp:Image ID="Image6" runat="server" ImageUrl ="~/images/07.jpg" Width ="290" Height ="200" />
</obshow:Panel>
</Panels>
</obshow:Show>


Sonra Page_load sayfamıza şu kodları yazmamız yeterli...

Label1.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 1 & ")" )
Label2.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 2 & ")" )
Label3.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 3 & ")" )
Label4.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 4 & ")" )
Label5.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 5 & ")" )
Label6.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 6 & ")" )
Label7.Attributes.Add("onmouseover", "Show1.MoveToPanel(" & 7 & ")" )

:) bu kadar kolaymış , 1 aydır uğraşıyorum vallahi ama hepsi bu işte. Tabi bunun dinamik olması için veritabanı kullanmak gerekir. onun için de şöyle yapabilirsiniz.

label1.Text=dt.Rows.Item(0).Item(1)
label2.Text=dt.Rows.Item(1).Item(1)
label3.Text=dt.Rows.Item(2).Item(1)
label4.Text=dt.Rows.Item(3).Item(1)
label5.Text=dt.Rows.Item(4).Item(1)
label6.Text=dt.Rows.Item(5).Item(1)
label7.Text=dt.Rows.Item(6).Item(1)


saygılar...
 
Arkadaşlar önce gönderdiğimden daha kolayı da oluyormuş :D :D o da şu şekilde
Tablomun alanları "id,baslik,detay,tarih,resim"
Sadece aşağıdaki kodlarla bu iş halloluyor.

Page Load olayına
baglan = New OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source=|DataDirectory|\haber.mdb")
baglan.Open()
dt = New DataTable
adap = New OleDbDataAdapter("select * from manset order by tarih desc ", baglan)
adap.Fill(dt)
baglan.Close()
Label1.Text = dt.Rows.Item(0).Item(1)
Label2.Text = dt.Rows.Item(1).Item(1)
Label3.Text = dt.Rows.Item(2).Item(1)
Label4.Text = dt.Rows.Item(3).Item(1)
Label5.Text = dt.Rows.Item(4).Item(1)
Label6.Text = dt.Rows.Item(5).Item(1)
Label7.Text = dt.Rows.Item(6).Item(1)

Label1.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(0).Item(4) & "'")
Label2.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(1).Item(4) & "'")
Label3.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(2).Item(4) & "'")
Label4.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(3).Item(4) & "'")
Label5.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(4).Item(4) & "'")
Label6.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(5).Item(4) & "'")
Label7.Attributes.Add("onmouseover", Image1.ClientID & ".src='" & dt.Rows.Item(6).Item(4) & "'")

Önceki gönderdiğimde show nesnesi için dll filan bulmanız gerekiyordu. Bunda ona da gerek yok arkadaşlar...
 
BBNET
Geri
Üst