use [TestTestD]
declare @SQL nvarchar(max)=''
declare @SQLV nvarchar(max)=''
declare @SQLT nvarchar(max)=''
SELECT @SQL = STUFF((SELECT ', ' + quotename(TABLE_SCHEMA) + '.' + quotename(TABLE_NAME)
FROM INFORMATION_SCHEMA.TABLES WHERE Table_Name LIKE '%'
FOR XML PATH('')),1,2,'')
SET @SQLT = 'DROP TABLE ' + @SQL
SET @SQLV = 'DROP View ' + @SQL
PRINT @SQLT
PRINT @SQLV
EXECUTE (@SQLT) -- uncomment to actually delete the tables
EXECUTE (@SQLV) -- uncomment to actually delete the View
(10-04-20, 04:22 AM)asemshahen5 كتب : [ -> ]PHP كود :
use [TestTestD]
declare @SQL nvarchar(max)=''
declare @SQLV nvarchar(max)=''
declare @SQLT nvarchar(max)=''
SELECT @SQL = STUFF((SELECT ', ' + quotename(TABLE_SCHEMA) + '.' + quotename(TABLE_NAME)
FROM INFORMATION_SCHEMA.TABLES WHERE Table_Name LIKE '%'
FOR XML PATH('')),1,2,'')
SET @SQLT = 'DROP TABLE ' + @SQL
SET @SQLV = 'DROP View ' + @SQL
PRINT @SQLT
PRINT @SQLV
EXECUTE (@SQLT) -- uncomment to actually delete the tables
EXECUTE (@SQLV) -- uncomment to actually delete the View
DROP TABLE [dbo].[Table_1], [dbo].[Table_2], [dbo].[Table_3], [dbo].[Table_4], [dbo].[Table_5]
DROP View [dbo].[Table_1], [dbo].[Table_2], [dbo].[Table_3], [dbo].[Table_4], [dbo].[Table_5]
Msg 3701, Level 11, State 5, Line 1
Cannot drop the view 'dbo.Table_1', because it does not exist or you do not have permission.
Msg 3701, Level 11, State 5, Line 1
Cannot drop the view 'dbo.Table_2', because it does not exist or you do not have permission.
Msg 3701, Level 11, State 5, Line 1
Cannot drop the view 'dbo.Table_3', because it does not exist or you do not have permission.
Msg 3701, Level 11, State 5, Line 1
Cannot drop the view 'dbo.Table_4', because it does not exist or you do not have permission.
Msg 3701, Level 11, State 5, Line 1
Cannot drop the view 'dbo.Table_5', because it does not exist or you do not have permission.
--EXECUTE (@SQLV) -- uncomment to actually delete the View
(10-04-20, 05:31 AM)asemshahen5 كتب : [ -> ]عدل الاستعلام الى :
PHP كود :
--EXECUTE (@SQLV) -- uncomment to actually delete the View
Msg 3705, Level 16, State 1, Line 1
Cannot use DROP TABLE with 'dbo.ReceiptQuery' because 'dbo.ReceiptQuery' is a view. Use DROP VIEW.
Dim dop As New SqlCommand("DROP TABLE flvs,cpus,comments,lovers", con)
dop.ExecuteNonQuery()
(10-04-20, 06:59 AM)سعود كتب : [ -> ]هل تقصد جداول تخص قاعدة بياناتك؟
استخدم command للحذف ومرر له drop table tablename
ونفذ
كود من مثال عندي:
أكيد لا بد من فتح الاتصالPHP كود :
Dim dop As New SqlCommand("DROP TABLE flvs,cpus,comments,lovers", con)
dop.ExecuteNonQuery()
flvs,cpus,comments,lovers أسماااااء جداول
Function drop(str As String, tt As String) As String
Using con As New SqlClient.SqlConnection(str)
Using cm As New SqlClient.SqlCommand("", con)
cm.CommandText = "DROP TABLE " & tt & ""
If con.State = ConnectionState.Closed Then con.Open()
Try
cm.ExecuteNonQuery()
Return "Droped... " & tt & " "
Catch ex As Exception
Return Err.Description
End Try
If con.State = ConnectionState.Open Then con.Close()
End Using
End Using
End Function
Using con As New SqlClient.SqlConnection(TextBox1.Text)
'SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES
Using cm As New SqlClient.SqlCommand("", con)
cm.CommandText = "SELECT TABLE_NAME FROM INFORMATION_SCHEMA.TABLES"
If con.State = ConnectionState.Closed Then con.Open()
Dim dr As SqlClient.SqlDataReader = cm.ExecuteReader
Do While dr.Read
MsgBox(drop(TextBox1.Text, dr(0).ToString))
Loop
dr.Close()
If con.State = ConnectionState.Open Then con.Close()
End Using
End Using
MultipleActiveResultSets=True;