Devart Forums

Code: Select all

        
        Private Shared Function ExecuteScript(ByVal script As String) As Boolean
            Dim locReturnValue As Boolean = True

            Using locConnection As Devart.Data.MySql.MySqlConnection = New Devart.Data.MySql.MySqlConnection(mySQL.GetConnectionString)
                locConnection.Open()
                Dim locScript As Devart.Data.MySql.MySqlScript = New Devart.Data.MySql.MySqlScript(script, locConnection)
                AddHandler locScript.Progress, AddressOf OnProgress

                progressStatements = locScript.Statements.Count
                Dim locTransaction As Devart.Data.MySql.MySqlTransaction = locConnection.BeginTransaction()

                Try

                    locScript.Execute()
                    locTransaction.Commit()
                Catch ex As Exception
                    locReturnValue = False
                    locTransaction.Rollback()
                    Start.WriteToErrorLog(ex, LinqProvider.MessageCaption)

                Finally
                    locConnection.Close()
                End Try

                RemoveHandler locScript.Progress, AddressOf OnProgress
            End Using
            Return locReturnValue
        End Function