الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف بدي اجيبها من الداتا بيز

بدأه easy_3a3 في 30 يوليو 2010 · 4 رد · 572 مشاهدة · في ASP.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

Dim connectionStr As String = ConfigurationManager.ConnectionStrings("DatabaseConnectionString1").ConnectionString

Dim Conn As New SqlConnection(connectionStr)

Conn.Open()

Dim cmd As New SqlCommand()

cmd.Connection = Conn

cmd.CommandText = "SELECT titl,id FROM News "

Label1.Text = "<marquee id=m onmouseover=m.stop() onmouseout=m.start() scrollAmount=2 direction=up >"

Dim dr As SqlDataReader = cmd.ExecuteReader()

While dr.Read()

Label1.Text += "<a href='shownew.aspx?id=" & Convert.ToString(dr(1)) & "'>" & Convert.ToString(dr(0)) & "</a> <br><br><br>;"

End While

Label1.Text += "</marquee>"

ال url تاع الصفحة لو بدي اجيبه م الداتا بيز ايش اعمل

وقبل ما تقوليوا اني ما ببحث لوحدي انا انا ممكن ارفعلكم محاولتي ومن ضمنها اني خليت الدايركشن up

:P :P :P

تم تعديل هذه المشاركة بواسطة easy_3a3 في 30 يوليو 2010 في 04:33

−1
#2

السلام عليكم

اضفيفي حقل بقاعدة البيانات ولكن url

او اي اسم اخر وحددي طوله اكيد حيكون نصي

بعد ذلك اضافي ذلك الحقل بالاستعلام sqlcommand

وفي الرابط عدلي لتكون قيمته من قيمة الحقل الموجود بقاعدة البيانات

عدلي المثال التالي ليوائم احتياجاتك 

Dim connectionStr As String = ConfigurationManager.ConnectionStrings("DatabaseConnectionString1").ConnectionString
Dim Conn As New SqlConnection(connectionStr)
Conn.Open()
Dim cmd As New SqlCommand()
cmd.Connection = Conn

cmd.CommandText = "SELECT    	titl,id,url FROM        	News "
Label1.Text = "<marquee id=m onmouseover=m.stop() onmouseout=m.start() scrollAmount=5 >"
Dim dr As SqlDataReader = cmd.ExecuteReader()
While dr.Read()

Label1.Text += (("<a href='" + dr(2) & "?id=") + dr(1) & "'>") + dr(0) & "</a>    "
End While
Label1.Text += "</marquee>"
Conn.close()

الفكرة هي اضافة عمود بقاعدة البيانات وطلبه خلال العرض

ولكن سؤال ؟؟؟؟ ما الغرض من ذلك

testmarcs.rar

تم تعديل هذه المشاركة بواسطة X-File في 30 يوليو 2010 في 05:07

In bad state

#3

السلام عليكم

قم بإضافة LinkButton

لإضافة اسم المقال نجعل الخاصية Text تبع ال LinkButton تعمل Bind لل Title

اما بالنسبة للرابط حق المقال راح يكون لعب في خاصية ال PostBackUrl

نخليها تسوي Bind علي Id

ولكن يكون شكل ال Bind عبارة عن رابط الصفحة ثابت مضاف الية كويري استرينج QueryString

بمعني مثلا

Article.aspx?Id=13

بحيث ال 13 هذا رقم المقال

ويقوم بالتغيير بناءا علي رقم المقال

وفي الصفحة Article

تعمل لها تصميم كما يناسب رغبتك في اظهار المقال

مع العلم انة ممكن يتم عملة بادوات تانية غير اللينك بوتون LinkButton

وهذة الطريقة لن تجعلك تحتاج لاضافة حقل جديد في جدول قاعدة البيانات لان هذا التوليد اتوماتك وليس يدوي

ولو وضعت حقلا جديد راح يزيد حجم القاعدة بشكل دوري بدون اي حاجة له

مع العلم ان حل اخونا السابق يوفي بالغرض ولكن ليس الامثل

بالتوفيق

تم تعديل هذه المشاركة بواسطة Yahia.Agwa في 30 يوليو 2010 في 06:09

#4

السلام عليكم

اخي الكريم كان الطلب هو ان تاخذ حتى اسم الصفحة من قاعدة البيانات اما ما عملته انت فقد كان موجودا بالاساس

الفكرة من وراء ذلك هو مثلا ان لا تظهر الصفحة اي لا تظهر اسم الصفحة

مثلا

?pgid=10

هنا الرقم عشرة هو معرف الصفحات ويكون مثلا ال path هو shownew.aspx

طبعا هنا كل صفحة ستاخذ مسار آخر طبعا من البديهي ذلك

الفكرة هي طلب صفحة من خلال المعرف دون ظهور اسم الصفحة

ولو اردت تشفير ال id

لاصبح من الصعب جدا تحديد الصفحة

ليس الغرض هو طلب ال querystring لانه بالساس يتم طلبه

بالتوفيق :)

In bad state

#5

شكرا اخي xfile

X-File كتب:

السلام عليكم

اضفيفي حقل بقاعدة البيانات ولكن url

او اي اسم اخر وحددي طوله اكيد حيكون نصي

بعد ذلك اضافي ذلك الحقل بالاستعلام sqlcommand

وفي الرابط عدلي لتكون قيمته من قيمة الحقل الموجود بقاعدة البيانات

عدلي المثال التالي ليوائم احتياجاتك 

Dim connectionStr As String = ConfigurationManager.ConnectionStrings("DatabaseConnectionString1").ConnectionString
Dim Conn As New SqlConnection(connectionStr)
Conn.Open()
Dim cmd As New SqlCommand()
cmd.Connection = Conn

cmd.CommandText = "SELECT    	titl,id,url FROM        	News "
Label1.Text = "<marquee id=m onmouseover=m.stop() onmouseout=m.start() scrollAmount=5 >"
Dim dr As SqlDataReader = cmd.ExecuteReader()
While dr.Read()

Label1.Text += (("<a href='" + dr(2) & "?id=") + dr(1) & "'>") + dr(0) & "</a>    "
End While
Label1.Text += "</marquee>"
Conn.close()

الفكرة هي اضافة عمود بقاعدة البيانات وطلبه خلال العرض

ولكن سؤال ؟؟؟؟ ما الغرض من ذلك

بدي اعمل شريط متحرك لاخر الانجازاة بفراغ اسمه news

ازا بدك برفعلك كل الشغل على الخاص خلص صرت منا وفينا هههههههههه

مواضيع مشابهة