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

لا أستطيع أن أظهار نتيجة الاجراء من Sql Server الى Vb.net

بدأه mam555 في 25 فبراير 2009 · 5 رد · 764 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاتة

لا أعرف أين يوجد الخطا في هذا الكود ( وهو عبارة عن كود لمنادات أجراء مخزن في SQL SERVER )

 Dim con As New SqlConnection
        Dim x As String
        con.ConnectionString = st
        Dim SqlData As SqlClient.SqlDataReader
        con.Open()
        Dim SqlCom As New SqlClient.SqlCommand("Stored_t-nameID", con)
        SqlCom.CommandType = CommandType.StoredProcedure
        SqlData = SqlCom.ExecuteReader()
        While SqlData.Read()
            x = SqlData.Item("Customer_name")
        End While
        SqlData.Close()
        con.Close()

بارك الله فيكم ،،،،

#2

اخي الكريم في مجال تطبع الخطأ

#3

لا يوجد أي خطاً يظهر عند تنفيذ الامر وكذالك أنا لم أستخدم Try لصتياد الخطأ !

#4

السلام عليكم ورحمة الله

حاول اخي الكريم أن تجعل كودك كما في الكود التالي :-

'نوع الأمر = إجراء مخزن
					SqlCom .CommandType = CommandType.StoredProcedure
					'نص الأمر = اسم الاجراء المخزن
					SqlCom .CommandText = "dbo.[Stored_t-nameID]"

					SqlData = SqlCom .ExecuteReader

فهذا الكود مجرب وإن شاء الله يعمل معك

بالتوفيق

مختار أحمد

موقع الويب : http://www.luxorsystems.com

منتدياتنا :http://www.luxorsystems.com/forum/index.php

للمراسلة

luxorsystems@hotmail.com

للاتصال التليفوني

00201228085123

#5

أشكركم على مساعدتي

أستخدمتة الكود هذا ولكن لم يظهر أي رسالة أسترجاع لقيمة معادة من الاجراء أو رسالة خطاَ 

Dim con As New SqlConnection
		Dim x As String = ""
		con.ConnectionString = st
		Dim SqlData As SqlClient.SqlDataReader
		con.Open()
		Dim SqlCom As New SqlClient.SqlCommand("dbo.[Stored_t-nameID]", con)
		SqlCom.CommandType = CommandType.StoredProcedure
		SqlCom.CommandText = "dbo.[Stored_t-nameID]"
		SqlData = SqlCom.ExecuteReader
		While SqlData.Read()
			x = SqlData.Item("Customer_name")
		End While

		SqlData.Close()
		con.Close()
		MsgBox(x.ToString)
#6

اتبع الخطوات التالية ربنا تعرف خطأك من اي خطوة

تأكد ان البروسيديور بيرجع قيمة وذلك عن طريق البروسيديور نفسه اللي في السيكوال سيرفر (يعني روح للبروسيديور وافتحه وعلم على اسمه اللي فوق ثم اضغط على الإيقونة الحمراء اللي اسمها Execute SQL)

---------------------------------------------------------

هل البروسيديور بيرجع اكثر من جدول ؟ من المحتمل ان اول جدول مش بيرجع قيمة وتاني جدول بيرجع قيمة ولكن الكود طالب قيمة الجدول الأول فقط علشان تجيب التاني تكتب SqlData .NextResult

قبل الحلقة التكرارية

----------------------------------------------

تأكد هل الــ Compiler بيخش فعلا جوة الحلقة التكرارية ام لا

-----------------------------------------------------------

تأكد انه لم يوجد متغير اخر اسمه x ولكن عام على مستوى المشروع كله

---------------------------------------------------------------------------------

شوف كدة وقولي

Mohamed Ali Salim

0.1..0...4....7.....6......2.......7........4.........8

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