16-03-13, 10:37 PM
من يضع كود معرفة عدد الجداول ضمن دالة 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]اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء، اللهم أصلح لي ديني الذي هو عصمة أمري، وأصلح لي دنياي التي فيها معاشي، وأصلح لي آخرتي التي فيها معادي، واجعل الحياة زيادة لي في كل خير، واجعل الموت راحة لي من كل شر
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي جدي وهزلي وخطأي وعمدي وكل ذلك عندي، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
