[سعود]

من يضع كود معرفة عدد الجداول ضمن دالة function

كود :

[align=left]        '**************************معرفة عدد الجداول****************


        ' Dim tc As New SqlCommand("SELECT Count(*) FROM INFORMATION_SCHEMA.TABLES", con)
        ' If con.State = ConnectionState.Closed Then
        ' con.Open()
        '  End If
        ' Response.Write("<div align=center><h2>" & tc.ExecuteScalar & "</h2></div>")
        ' If tc.ExecuteScalar = 0 Then
        ' Response.Write("<div align=center><h2>لا توجد جداول بالقاعدة الحالية</h2></div>")


        ' Exit Sub
        ' End If
        '*************************************************[/align]