نمایش اطلاعات دیتابیس در Marquee

[مهدی رحیم زاده]

سلام
من می خوام که اطلاعاتی که توی Marquee نمایش داده میشه از دیتابیس خونده بشه. اما نمی دونم که چطور باید این اطلاعات رو که از دیتابیس می خونم ، توی Marquee با خونه های یک Tableنمایش بدم.
ممنون میشم کمکم کنید.
با تشکر

[hobab-theme]

من یه بار یه همچین کاری انجام دادم . به صورت زیر


اطلاعات مربوط به کانکشن استرینگ
اطلاعات مربوط به دستور سلکت ( مثلاً دریافت اطلاعات از فیلد Note )
While dtr.Read
Note = dtr("Note")
dtr.Close()
End While

تعریفها :
dtr: همان DataReader هست که شما باید قبل از استفاده اون رو تعریف کنید . با نام دلخواه که تو این مثال اینجوری تعریف شده
Dim dtr As SqlDataReader
Note: این یک رشته تعریف شده هست که شما اون رو اینجور تعریف میکنید
Dim Note As String
dtr("Note"): این دستور تمام فیلدهای Note رو از تو بایگاه داده ای که شما تو دستور Select ذکر کردید رو بر میگردونه
------------------------------------------
حالا با کد زیر میتونید این اطلاعات رو هرجایی که خواستید چاپ کنید

<%= Note %>
-----------------------------------------
استفاده این کد :
میتونید مثلاً لیستی از مشتریان سایتتون رو به صورت اسکرول نمایش بدید
---------------------
اگر نمیخواید که این کد تمام فیلدهای مثلاً Note شما رو برگردونه باید از دستور Select شرطی استفاده کنید

[مهدی رحیم زاده]

میشه یه نمونه کد کامل (یک صفحه کامل )رو برام بزارید؟
ممنون میشم.

[karim orooji]

اگه به نتيجه اي رسيديد
من رو هم با خبر كنيد :چشمک:

[مهدی رحیم زاده]

دوست عزیز ممنون که راهنمایی کردین. همونی که فرمودین درست شد. حالا اگه بخواییم این داده ها رو در حین اجرای برنامه تغییر بدیم و بعد داده های جدول رو نشون بدیم باید چکار کنیم؟
با تشکر

[مهدی رحیم زاده]

اگه به نتيجه اي رسيديد
من رو هم با خبر كنيد
من درست کردم. یعنی به نتیجه رسیدم. کجاشو برات توضیح بدم دوست من ؟

[hobab-theme]

دوست عزیز ممنون که راهنمایی کردین. همونی که فرمودین درست شد. حالا اگه بخواییم این داده ها رو در حین اجرای برنامه تغییر بدیم و بعد داده های جدول رو نشون بدیم باید چکار کنیم؟
با تشکر
دوست عزیز الان دارم رو وب یکی از دوستان کار میکنم
اگه اجازه بدید تا 24 ساعت آینده کد کامل رو براتون مینویسم
موفق باشید

[karim orooji]

با سلام
irammsb عزيز ميتوني برام برنامه رو ضميمه كني
با تشكر

[online_mansoor2007]

یه دیتا گرید بزارید . بعد در کد های html تگ مربوط به دیتاگرید را در بین تگ Marquee قرار بدید . به همین راحتی

[karim orooji]

یه دیتا گرید بزارید . بعد در کد های html تگ مربوط به دیتاگرید را در بین تگ Marquee قرار بدید . به همین راحتی

با سلام
خاله پسر خوب اون وقت مياد گريد ما رو به صورت marqeeu در مياره
من ميخوام اطلاعات داخا بانك رو در marqeeu قرار بده

[online_mansoor2007]

با سلام
خاله پسر خوب اون وقت مياد گريد ما رو به صورت marqeeu در مياره
من ميخوام اطلاعات داخا بانك رو در marqeeu قرار بده

جیگر طلا کار دیتاگرید چی هست ؟؟!! مگه نمی خوای اطلاعات موجود در بانگ را به شکل Marquee نشون بدی؟؟؟ کاری غیر از این می خوای انجام بدی؟

[silverfox]

چرا با ریپیتر نمی خونین؟


<asp:Repeater ID="Repeater1" runat="server" DataSourceID="SqlDataSource1">
<HeaderTemplate>
<marquee behavior="$behavior" direction="up" onmouseout="this.start()" onmouseover="this.stop()"
scrollamount="1" scrolldelay="80" style="width: 472px; height: 185px; text-align: right;"
truespeed="truespeed">
</HeaderTemplate>
<ItemTemplate>
چیزی که قراره خونده بشه مثلا یه سری لینک یا هرچی
</ItemTemplate>
<FooterTemplate>
</marquee>
</FooterTemplate>
</asp:Repeater>

[online_mansoor2007]

مهم نیست توسط چه شئی اطلاعات را نمایش می دهید . مهم این هست که اون شئ را بین تگ Marquee قرار بدید.

[karim orooji]

با سلام دوستان ممنونم از راهنماييهايتان
پاسخ شما درست ولي اگر من بيام گريد رو در تگ قرار بدم مياد كل گريد رو در تگ برام ميزاده
من ميخوام بياد محتوا بانك روفيلد به فيلد بخونه و براي اونها لينك هم قرار بدم مثلاً اخبار سايت رو نمايش بده براي ادامه مطلب رو كليك كنه بره توي يك صفحه ديگه اون ادامه مطلب رو برام نمايش بده

[silverfox]

id شماره ردیف خبر
newstext موضوع خبر


<asp:Repeater ID="Repeater1" runat="server" DataSourceID="SqlDataSource1">
<HeaderTemplate>
<marquee behavior="$behavior" direction="up" onmouseout="this.start()" onmouseover="this.stop()"
scrollamount="1" scrolldelay="80" style="width: 472px; height: 185px; text-align: right;"
truespeed="truespeed">
</HeaderTemplate>
<ItemTemplate>
&nbsp;<a href="News.aspx?id=<%#Eval("id") %>"
style="text-decoration: none"><%#Eval("newstext") %></a><br />
</ItemTemplate>
<FooterTemplate>
</marquee></div></FooterTemplate>
</asp:Repeater>

و بعد لینک می کنه به صفحه news و id خبر رو بهش پاس میده تا متن خبر نشون داده بشه

[online_mansoor2007]

نیاز به هست که یک نفر که حال و حوصله داره آموزش کامل این کار رو واست بزاره یا اینکه یه سورس به شما بده . اینطوری سوال پرسیدن نتیجه ای نداره

[mmnoody2006]

شاید این کمکت کنه واسه من که خوب کار میکنه ولی اگه کسی تونست توش
عکس هم بزاره به ما کمک کنه


Function Links_LinksList() As String
con.Open()

Dim Command As SqlCommand = New SqlCommand("GetLinks", con)
Command.CommandType = CommandType.StoredProcedure
Dim RecordSet As SqlDataReader
Dim Marquee As String = "", Name, Address

RecordSet = Command.ExecuteReader()
Marquee = "<marquee onmouseover=this.stop() onmouseout=this.start() direction=up scrolldelay=1 scrollamount=1 style=Width:100%;Height:100%;padding:3px>"
If RecordSet.HasRows = True Then
While RecordSet.Read()
Address = RecordSet("Address").ToString()
Name = RecordSet("Name").ToString()
Marquee += String.Format("<p align=\center\><a href=\{0}\ target=\_blank\ >{1}</a></p>", Address, Name)
End While
Else
Marquee += "<p align=\center\ > تاکنون لینکی در سایت ثبت نشده است </p>"
End If
Marquee += "</marquee>"
con.Close()
RecordSet.Close()
Return Marquee
End Function

[dr.pantagon]

آموزش نمی خواد بابا خیلی ساده است

من الان بهتون یاد می دم که چه طور هر سطر از هر ستونی رو خواستین نشون بدین

صورت سوال
یک مارکیو که به صورت متحرک از دیتابیس اطلاعات بخونه و ماوس رفت روش استاپ شه ماوس رفت کنار شروع به حرکت کنه

کد html


<marquee align="right" dir="rtl" direction="right" onmouseout="start();"
onmouseover="stop();" scrollamount="3" width="100%"><P>
<P align="right">
</P>
<asp:label id="Label8" runat="server" Font-Names="Tahoma" Font-Size="9pt"></asp:label>
</marquee>

onmouseout="start() برای این است که ماوس رفت کنار حرکت کنه
onmouseover="stop() برای اینکه ماوس رفت روی شیئ ما حرکت متوقف شود
scrollamount="3" سرعت حرکت
id="Label8 شیئ id مهم ترین گزینه است هر چیزی رو می خوایین حرکت کنه اسمش رو بزارید
( اسم شیئ من label8 است

باقی کد html هم که فونت و سایز و ... است

برنامه نویسی


Private Sub marque()
cmd.Parameters.Clear()
cmd.CommandText = ("SELECT * FROM marque ORDER BY uid DESC")
cn.Open()
Dim dr As SqlDataReader = cmd.ExecuteReader
If dr.Read Then
Me.Label8.Text = dr.GetValue(1).ToString()
Else
Me.Label8.Text = ""
End If
dr.Close()
cn.Close()
End Sub

همه چیز کد معمولی است و نیاز به توضیح نداره فقط این خط
Me.Label8.Text = dr.GetValue(1).ToString()

جدول marque من در دیتابیس دو تا ستون داره
uid
marque
به هر ستون یک شماره سطر اختصاص پیدا می کنه که از صفر هم شروع می شه حالا من سطر دوم رو می خوام یعنی می شه 1
چون
uid=0
marque=1

بنابراین شما هر سطری رو خواستین لود کنین
dr.GetValue(1)

جای عدد یک من عدد شماره سطر خودتون رو بزارید

همین

اگر شد پروژه رو می سازم آپلود می کنم

[dr.pantagon]

اینم پروژه

من کانکشنم رو توی گلوبال می زارم از اونجا تغییر دهید

[مهدی رحیم زاده]

دوستان حالا اکه ما بخواییم یک سری عکس رو از دیتابیس بخونیم و توی Marquee نمایش بدیم باید چکار کنیم؟
من عکس معمولی رو هم که می خوام نمایش بدم ، عکس رو نشون نمیده!
با تشکر

[dr.pantagon]

اینم باز کاری نداره و فرقی نداره
این کدش




Private Sub marque()
cmd.Parameters.Clear()
cmd.CommandText = ("SELECT * FROM kalameroz ORDER BY uid DESC")
cn.Open()
Dim dr As SqlDataReader = cmd.ExecuteReader
If dr.Read Then
Me.Image1.ImageUrl = dr.GetValue(1).ToString()
Else
Me.Image1.Visible = False
End If
dr.Close()
cn.Close()
End Sub


اینم HTML


<marquee align="right" dir="rtl" direction="right" onmouseout="start();"
onmouseover="stop();" scrollamount="3" width="100%"><P><P align="right"></P><asp:Image ID="Image1" runat="server" /></marquee></div>


پروژه رو هم می سازم می زارمش

[dr.pantagon]

اینم پروژه

[مهدی رحیم زاده]

اما اینم که عکس رو نشون نمیده!
ببینید چند تا عکس داریم که از بانک میخونیمشون.
حالا اینا حرکت می کنن اما هیچ عکسی توی اینا نمایش داده نمیشه . مشکل من اینجاست.
با تشکر

[hobab-theme]

اما اینم که عکس رو نشون نمیده!
ببینید چند تا عکس داریم که از بانک میخونیمشون.
حالا اینا حرکت می کنن اما هیچ عکسی توی اینا نمایش داده نمیشه . مشکل من اینجاست.
با تشکر
شما کدی رو که استفاده کردید بذارید تا بررسی بشه

[karim orooji]

iranmsb عزيز
چطوري مينونم يك عكس رو در بانك ذخيره كنم و بتونم اون رو در برنامه بيارم
ميتوني برام يك مثال بزني با تشكر

[silverfox]

به طور متوسط این سوال روزی 3 بار پرسیده می شه بخدا یه جستجو کنی همینجا 20مورد مفید پیدا می کنی...

[Sajjad.Aghapour]

به طور متوسط این سوال روزی 3 بار پرسیده می شه بخدا یه جستجو کنی همینجا 20مورد مفید پیدا می کنی...

دوست عزیز شما تو پست 26 و صفحه سوم این تاپیک این حرفو زدید.یه کم فکر کنید ببینید منطقی عمل کردید یا نه؟؟؟؟
بهتر بود به جای این حرف لینک تاپیک مربوطه رو میذاشتید...



اینم باز کاری نداره و فرقی نداره
این کدش

کد:
Private Sub marque()
cmd.Parameters.Clear()
cmd.CommandText = ("SELECT * FROM kalameroz ORDER BY uid DESC")
cn.Open()
Dim dr As SqlDataReader = cmd.ExecuteReader
If dr.Read Then
Me.Image1.ImageUrl = dr.GetValue(1).ToString()
Else
Me.Image1.Visible = False
End If
dr.Close()
cn.Close()
End Sub
اینم HTML
کد:
<marquee align="right" dir="rtl" direction="right" onmouseout="start();"
onmouseover="stop();" scrollamount="3" width="100%"><P><P align="right"></P><asp:Image ID="Image1" runat="server" /></marquee></div>
پروژه رو هم می سازم می زارمش
یعنی اگه 20 تا عکس داشته باشه توی designer باید 20 تا تگ image اضافه کنه؟ میشه یه کم توضیح بدید..
کاری که من کردم(البته از استاندارد بودنش مطمئن نیستم)...
یه تگ div داخل تگ marquee اضافه کردم و id اون رو sa و runat server گذاشتم.توی run time هم این کدها رو نوشتم:


SqlConnection con = new SqlConnection("data source=(local);initial catalog=test;integrated security=true");

SqlCommand cmd = new SqlCommand("select * from pics", con);

con.Open();
SqlDataReader r = cmd.ExecuteReader();
while (r.Read())
{
this.sa.InnerHtml += "<a href=\"\"><img src=\"" + r["pic"].ToString() + "\" /></a><br />";
}
r.Close();
con.Close();
کار میکنه ولی اینکه استاندارد هست یا نه ؟؟؟؟؟؟....

[silverfox]

البته مدیران باید به فکر نظم ترد ها و کل فروم باشند نه کاربران ولی اگر هرکس اول سرچ کنه بعد تاپیک بزنه یا سوال بپرسه هم مطالب منسجم تر می شه هم نتیجه گیری همه سریع تر سعی کردم یجوری بنویسم لحنش بد نباشه توصیه ای بود...عذر می خوام اسپم شد
http://barnamenevis.org/forum/showthread.php?t=165255
این و موارد زیاد دیگری که این چند روزه دیدم...

[hobab-theme]

دوست عزیز شما تو پست 26 و صفحه سوم این تاپیک این حرفو زدید.یه کم فکر کنید ببینید منطقی عمل کردید یا نه؟؟؟؟
بهتر بود به جای این حرف لینک تاپیک مربوطه رو میذاشتید...

یعنی اگه 20 تا عکس داشته باشه توی designer باید 20 تا تگ image اضافه کنه؟ میشه یه کم توضیح بدید..
کاری که من کردم(البته از استاندارد بودنش مطمئن نیستم)...
یه تگ div داخل تگ marquee اضافه کردم و id اون رو sa و runat server گذاشتم.توی run time هم این کدها رو نوشتم:


SqlConnection con = new SqlConnection("data source=(local);initial catalog=test;integrated security=true");

SqlCommand cmd = new SqlCommand("select * from pics", con);

con.Open();
SqlDataReader r = cmd.ExecuteReader();
while (r.Read())
{
this.sa.InnerHtml += "<a href=\"\"><img src=\"" + r["pic"].ToString() + "\" /></a><br />";
}
r.Close();
con.Close();
کار میکنه ولی اینکه استاندارد هست یا نه ؟؟؟؟؟؟....
مشکل کد شما اینه که کار اضافی میکنه. یعنی اگه به قول خودتون 20 تا عکس داشته باشید 20 تا تگ Div میسازه
شما فقط همون تگ img یا <asp:Image رو بذارید تو این کد جواب میده و کافیه

[مهدی رحیم زاده]

من کد شما رو هم استفاده کردم . اما تگ میاد و هیچ عکسی رو نشون نمیده!!

[dr.pantagon]

اوم باید بگم آره همین جواب رو دادم ولی این پست سابجکتش فرق می کرد اگر بنا به ایراد گرفتن از کار اشتباه است کار شما هم اشتباه است که کل پست من رو گذاشتین دکمه اعتراض بخدا برا همین جور چیز ها در هر صورت متشکر
و اما کد
کد درست است و عکس رو لود می کنه نمی دونم مشکله کار شما کجاس

[مهدی رحیم زاده]

این رو نگاه کن دوست من :
http://72.232.49.243/forum/showpost.php?p=564359&postcount=100

[Sajjad.Aghapour]

من کد شما رو هم استفاده کردم . اما تگ میاد و هیچ عکسی رو نشون نمیده!!

خوب عکس رو چطوری توی بانک ذخیره کردی.من فقط آدرس اون رو ذخیره کرده بودم که تو مسیر root سایت توی پوشه pic هستش.....

[karim orooji]

با سلام به دوستان
اين كد براي لود كردن دو فيلد از بانك كه توي تگ Marquee بريزه
ميخوام ببينم كه مشكل كار كجايه كه كار نميكنه




Dim con AsNew SqlConnection
con.ConnectionString = "server=KARIM-DE9E2F51B\SQLEXPRESS;integrated security=sspi;initial catalog=karim;"


con.Open()
Dim Com AsNew SqlCommand
Com.Connection = con
Com.CommandText = "select * from lola"


Dim reader As SqlDataReader = Com.ExecuteReader
Dim Marquee AsString = "", Name, Address
Marquee = "<marquee1 onmouseover=this.stop() onmouseout=this.start() direction=up scrolldelay=1 scrollamount=1 style=Width:100%;Height:100%;padding:3px>"


If reader.HasRows = TrueThen


While reader.Read()
Address = reader("Address").ToString()
Name = reader("Name").ToString()
Marquee += String.Format("<p align=\center\><a href=\{0}\ target=\_blank\ >{1}</a></p>", Address, Name)
EndWhile


Else


Marquee += "<p align=\center\ > </p>"


EndIf


Marquee += "</marquee1>"


con.Close()
reader.Close()


با تشكر