سؤال عن الـClass

Creating Classes in Visual Basic .NET

http://msdn.microsoft.com/en-us/library/ms973814.aspx

المثال رائع ويستحق التطبيق بعناية

لقد طبقت المثال الذي تم شرحة في الرابط وبصراحة غاية في الروعة

Creating_Classes in VB.net.rar

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

اخ محمد السائل يريد الاستفادة من الفئات في التعامل مع قواعد البيانات وليس كيفية إنشاء فئة!! اخي جرب الكود التالي

Imports System.Data.SqlClient

Public Class Utility
	Private Shared conn As New SqlConnection("ConnectionString")

	Public Shared Function ExecuteNonReaderCommand(ByVal SQL As String) As Boolean
    	Try
        	Dim cmd As New SqlCommand(SQL, conn)
        	conn.Open()
        	cmd.ExecuteNonQuery()
        	Return True
    	Catch ex As Exception
        	Trace.WriteLine(ex.Message)
        	Return False
    	Finally
        	conn.Close()
    	End Try
	End Function

	Public Shared Function ExecuteReaderCommand(ByVal SQL As String) As DataTable
    	Try
        	Dim adpt As New SqlDataAdapter(SQL, conn)
        	Dim ds As New DataSet()
        	adpt.Fill(ds)
        	Return ds.Tables(0)
    	Catch ex As Exception
        	Trace.WriteLine(ex.Message)
        	Return Nothing
    	End Try
	End Function
End Class

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