May 2011
Intermediate to advanced
800 pages
39h 19m
German
Sie möchten eine Tabelle auf dem SQL Server löschen.
Sub Tabelle_mit_SQL_löschen()
Dim conn As New ADODB.Connection
conn.Open "Provider=SQLOLEDB.1;Integrated Security=SSPI;DATA SOURCE =.\SQLEXPRESS;catalog=FinanzDB"
conn.Execute "DROP TABLE umsaetze2010"
conn.Close
End SubSub Tabelle_mit_DMO_löschen
Dim serv As New SQLDMO.SQLServer
Dim db As New SQLDMO.Database
serv.LoginSecure = True
serv.LoginTimeout = 3
serv.Connect ".\SQLEXPRESS"
Set db = serv.Databases.Item("FinanzDB")
db.Tables.Remove "umsaetze2006"
serv.Disconnect
End SubAchten Sie auf entsprechende Fehlerbehandlungen. Spätestens wenn Sie obige Prozeduren zweimal aufrufen, werden Sie einen Fehler auslösen!
Read now
Unlock full access