[khalid475]

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

الأخوة الأعزاء محتاج مساعدة منكم والسؤال كالتالي : -

في عملية البحث  أريد أن أبحث عن ActionName و VolationFees من خلال VolationCode و ActionNumber

الأكواد كالتالي : 

[ممدوح]

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

أخي الكريم، لا تتعب من يريد مساعدك بوضع صورة للأكواد،

ضع الأكواد نصاً، بارك الله فيك

---

المشكلة في الدالة VolationCode الموضوعة في (cmd.Parameters.Add(VolationCode

[khalid475]

شكرا لك أخي الكريم 

الأكواد كالتالي 

Data 

كود :

Friend Function Load_Volations_Details(ByRef dr As SqlDataReader, ByVal VolationCode As Integer, ByVal ActionNumber As Integer)
           Dim cmd As New SqlCommand("Load_Volations_Details")
           cmd.Parameters.Add("@VolationCode", SqlDbType.Int).Value = CType(VolationCode, Integer)
           cmd.Parameters.Add("@ActionNumber", SqlDbType.Int).Value = CType(ActionNumber, Integer)
           
           Dim retval As Integer = dm.executeReader(cmd, dr)
           Return retval
       End Function

Business 

كود :

Public Function Load_Volations_Details(ByVal VolationCode As Integer, ByVal ActionNumber As Integer)
           p.Load_Volations_Details(dr, VolationCode, ActionNumber)
           Return dr
       End Function

SearchBtn

كود :

ActionOneName.Text = p.Load_Volations_Details(txtFineCode.Text, ActionOne.Text)
       ActionOneFees.Text = p.Load_Volations_Details(txtFineCode.Text, ActionOne.Text)

[ممدوح]

المشكلة كما ذكرتها لك في المتغير أوالدالة VolationCode وكذلك على ما أعتقد ActionNumber

فأكوادك ناقصة ليتضح الأمر

فلو ترفق مشروع مصغر فإنه يساعد على الإجابة السريعة.

[khalid475]

النموذج في المرفقات 

شكرا جزيلا ...

[ممدوح]

جرب هذا التعديل وطبق نفس الأسلوب مع كل Parameter

كود :

cmd.Parameters.AddWithValue("@VolationCode",VolationCode)

أمر آحر: هل Load_Volations_Details هو StoredProcedure؟
إذا كان كذلك فيبقى إبلاغ Command بأنه كذلك مثل

كود :

cmd.CommandType = CommandType.StoredProcedure

[khalid475]

تم التعديل لكن يظهر نفس الخطأ

Conversion from type 'SqlDataReader' to type 'String' is not valid.


Load_Volations_Details هو StoredProcedure

[ممدوح]

ضع StoredProcedure هنا للتأكد منه

[khalid475]

كود :

ALTER PROCEDURE [dbo].[Load_Volations_Details]

@VolationCode int,
@ActionNumber int
as

begin

Select ActionNumber, VolationCode, VolationActionName, VolationFees from VolationsActionsTbl Where VolationCode = @VolationCode And ActionNumber = @ActionNumber
Return

End

وشكرا ..

[ممدوح]

أخي الكريم

في Procedure يقوم بإرجاع عدة أعمدة وهي actionnumber,  volationcode,  volationactionname,  volationfees
في حين أن Function Load_Volations_Details يطلب منه قراءة واحدة قيمة Integer

فهناك عدم تطابق المطلوب

فماذا تريد من Procedure Load_volations_details ومن Function Load_Volations_Details أن يقوما به

كود :

ALTER PROCEDURE [dbo].[Load_volations_details]
 @VolationCode INT,
 @ActionNumber INT
AS
 BEGIN
     SELECT actionnumber,
            volationcode,
            volationactionname,
            volationfees
     FROM   volationsactionstbl
     WHERE  volationcode = @VolationCode
            AND actionnumber = @ActionNumber

     RETURN
 END

---

والمرفق لم يفتح معي لاختلاف الإصدار

---

أيضا طريقة قراءة executeReader خطأ