ممكن مساعدة فى web service باستدعاء جمل الاستعلام

لماذا هذا السطر؟

datagiedview1.datasource=rr

الويب سرفس ليس بها أي نوع من الكونترولز. هي مجرد دالة تقوم بعمل معين وقد تعيد معلومات وقيم (مثل الدوال العادية)

بداخل الويب سيرفس سيكون لديك دالة مثل هذه

 <WebMethod()> _
	Public Function GetSearchResults(ByVal KeyWord As String) As datatable

    	Dim CMD As New SQLComand
    	With CMD
        	.Connection()
        	.CommandType = CommandType.Text
        	.CommandText = "Select * From MyTable Where Name Like %'" & KeyWord & "%'"
    	End With

    	Dim SearchAdapter As New SQLDataadapter
    	SearchAdapter.SelectCommand = CMD

    	Dim SearchResults As New DataTable
    	SearchAdapter.Fill(SearchResults)

    	Return SearchResults

	End Function

مع الافتراض انك قمت بتعريف و تمرير إتصال مفتوح

و فى صفحة ال ASP.NET ستقوم بإضافة Web Reference للويب سيرفس الخاصة بك و من ثم إستخدام الدالة GetSearchResults مع تمرير القيمة التى تود البحث عنها و الناتج يجب ان يدعم ISerializable لذا قمنا بإرجخاع النتيجة فى هيئة DataTable

* ملحوظة الكود للتوضيح فقط

طارق إبراهيم كتب:

بداخل الويب سيرفس سيكون لديك دالة مثل هذه

 <WebMethod()> _
	Public Function GetSearchResults(ByVal KeyWord As String) As datatable

    	Dim CMD As New SQLComand
    	With CMD
        	.Connection()
        	.CommandType = CommandType.Text
        	.CommandText = "Select * From MyTable Where Name Like %'" & KeyWord & "%'"
    	End With

    	Dim SearchAdapter As New SQLDataadapter
    	SearchAdapter.SelectCommand = CMD

    	Dim SearchResults As New DataTable
    	SearchAdapter.Fill(SearchResults)

    	Return SearchResults

	End Function

مع الافتراض انك قمت بتعريف و تمرير إتصال مفتوح

و فى صفحة ال ASP.NET ستقوم بإضافة Web Reference للويب سيرفس الخاصة بك و من ثم إستخدام الدالة GetSearchResults مع تمرير القيمة التى تود البحث عنها و الناتج يجب ان يدعم ISerializable لذا قمنا بإرجخاع النتيجة فى هيئة DataTable

* ملحوظة الكود للتوضيح فقط

جزاك الله خيرا يا اخى على كود

اذا ممكن انه يكون بالسى شارب وتبقى مشكورجدا

واتمنى ان تجربة قبل ان تكتبه لانى لاحظت به بعش المشاكل

قمت بتجربة الكود التالى و هو يعمل

 <WebMethod()> _
	Public Function GetSearchResults(ByVal KeyWord As String) As DataTable

    	Dim CMD As New SqlCommand
    	With CMD
        	.Connection = MyConnection
        	.CommandType = CommandType.Text
        	.CommandText = "Select * From MyTable Where Name Like %'" & KeyWord & "%'"
    	End With

    	Dim SearchAdapter As New SQLDataadapter
    	SearchAdapter.SelectCommand = CMD

    	Dim SearchResults As New DataTable("SearchResults")
    	SearchAdapter.Fill(SearchResults)

    	Return SearchResults

	End Function

قم بتغيير ال Connection , Command and Adapter Objects كما يناسبك

الويب سيرفرس بالعادة تستخدم للاستعلام لذلك

اذا اردت ات تستعلم حاول رسم جدول و ارجاع القيمة

STRING