|
Namespace SQL
Public Class SQLBeginTransaction
Inherits SQL.SQLStatement
Public Overrides ReadOnly Property SQL() As String
Get
Select Case MyBase.ConnectionType
Case Database.ConnectionType.SQLServer
Return "BEGIN TRANSACTION"
Case Database.ConnectionType.MicrosoftAccess
Return "BEGIN TRANSACTION"
Case Database.ConnectionType.MySQL
Return "START TRANSACTION"
End Select
End Get
End Property
End Class
Public Class SQLCommitTransaction
Inherits SQL.SQLStatement
Public Overrides ReadOnly Property SQL() As String
Get
Select Case MyBase.ConnectionType
Case Database.ConnectionType.SQLServer
Return "COMMIT TRANSACTION"
Case Database.ConnectionType.MicrosoftAccess
Return "COMMIT TRANSACTION"
Case Database.ConnectionType.MySQL
Return "COMMIT"
End Select
End Get
End Property
End Class
Public Class SQLRollbackTransaction
Inherits SQL.SQLStatement
Public Overrides ReadOnly Property SQL() As String
Get
Select Case MyBase.ConnectionType
Case Database.ConnectionType.SQLServer
Return "ROLLBACK TRANSACTION"
Case Database.ConnectionType.MicrosoftAccess
Return "ROLLBACK TRANSACTION"
Case Database.ConnectionType.MySQL
Return "ROLLBACK"
End Select
End Get
End Property
End Class
End Namespace
|
By viewing downloads associated with this article you agree to the Terms of Service and the article's licence.
If a file you wish to view isn't highlighted, and is a text file (not binary), please
let us know and we'll add colourisation support for it.
This article has no explicit license attached to it but may contain usage terms in the article text or the download files themselves. If in doubt please contact the author via the discussion board below.
A list of licenses authors might use can be found here
This member has not yet provided a Biography. Assume it's interesting and varied, and probably something to do with programming.