Compressão usando Advantage .NET Data Provider

Exemplo de string de conexão

Essa é uma string de conexão Advantage .NET Data Provider para se conectar com Sybase Advantage.

Compressão

Data Source=\\Servidor\Diretorio\Arquivo.add;User ID=Usuario;Password=Senha;ServerType=REMOTE;Compression=ALWAYS;

Sybase Advantage

Se ServerType estiver definido como LOCAL, a propriedade Compression é ignorada.

Os valores válidos são ALWAYS (SEMPRE), INTERNET e NEVER (NUNCA).

Lembre-se de que se a compressão estiver desativada no servidor, nenhuma compressão ocorrerá independentemente dessa configuração do cliente.

Conexão através de diferentes linguagens

C#

Exemplo de código em C# de conexão com Sybase Advantage usando Advantage .NET Data Provider:

using System;
using Advantage.Data.Provider;

class DatabaseConnection {
    static void Main() {
        // Define a string de conexão Sybase Advantage usando Advantage .NET Data Provider
        string connectionString = "Data Source=\\\\Servidor\\Diretorio\\Arquivo.add;User ID=Usuario;Password=Senha;ServerType=REMOTE;Compression=ALWAYS;";

        using (AdsConnection connection = new AdsConnection(connectionString)) {
            try {
                // Abre a conexão
                connection.Open();

                Console.WriteLine("Conexão aberta com sucesso!");

                //
                // INSIRA SEU CÓDIGO AQUI
                //
            }
            catch (AdsException ex) {
                // Erros específicos do AdsException
                Console.WriteLine("Erro: " + ex.Message);
            }
            catch (Exception ex) {
                // Outros erros
                Console.WriteLine("Erro: " + ex.Message);            
            }
            finally {
                // Fecha a conexão
                if (connection != null) {
                    connection.Close();
                    Console.WriteLine("Conexão fechada.");
                }
            }
        }
    }
}

Alternativamente, você pode usar o código abaixo, que usa a classe DbProviderFactory:

using System;
using System.Data.Common;

class DatabaseConnection {
    static void Main() {
        /// Define a string de conexão Sybase Advantage usando Advantage .NET Data Provider
        string connectionString = "Data Source=\\\\Servidor\\Diretorio\\Arquivo.add;User ID=Usuario;Password=Senha;ServerType=REMOTE;Compression=ALWAYS;";

        // Cria o objeto factory usando o namespace Advantage.Data.Provider
        DbProviderFactory factory = DbProviderFactories.GetFactory("Advantage.Data.Provider");

        using (DbConnection connection = factory.CreateConnection()) {
            if (connection == null) {
                Console.WriteLine("Não foi possível criar a conexão.");
                return;
            }

            connection.ConnectionString = connectionString;

            try {
                // Abre a conexão
                connection.Open();
                Console.WriteLine("Conexão aberta com sucesso!");

                //
                // INSIRA SEU CÓDIGO AQUI
                //
            }
            catch (DbException ex) {
                // Erros específicos do DbException
                Console.WriteLine("Erro: " + ex.Message);
            }
            catch (Exception ex) {
                // Outros erros
                Console.WriteLine("Erro: " + ex.Message);
            }
            finally {
                // Fecha a conexão
                if (connection != null) {
                    connection.Close();
                    Console.WriteLine("Conexão fechada.");
                }
            }
        }
    }
}

VB.NET

Exemplo de código em VB.NET de conexão com Sybase Advantage usando Advantage .NET Data Provider:

Imports System
Imports Advantage.Data.Provider

Public Class DatabaseConnection
    Public Shared Sub Main()
        ' Define a string de conexão Sybase Advantage usando Advantage .NET Data Provider
        Dim connectionString As String = "Data Source=\\Servidor\Diretorio\Arquivo.add;User ID=Usuario;Password=Senha;ServerType=REMOTE;Compression=ALWAYS;"

        Using connection As New AdsConnection(connectionString)
            Try
                ' Abre a conexão
                connection.Open()

                Console.WriteLine("Conexão aberta com sucesso!")

                '
                ' INSIRA SEU CÓDIGO AQUI
                '

            Catch ex As AdsException
                ' Erros específicos do AdsException
                Console.WriteLine("Erro: " & ex.Message)
            Catch ex As Exception
                ' Outros erros
                Console.WriteLine("Erro: " & ex.Message)
            Finally
                ' Fecha a conexão
                If connection IsNot Nothing Then
                    connection.Close()
                    Console.WriteLine("Conexão fechada.")
                End If
            End Try
        End Using
    End Sub
End Class

Alternativamente, você pode usar o código abaixo, que usa a classe DbProviderFactory:

Imports System
Imports System.Data.Common

Public Class DatabaseConnection
    Public Shared Sub Main()
        ' Define a string de conexão Sybase Advantage usando Advantage .NET Data Provider
        Dim connectionString As String = "Data Source=\\Servidor\Diretorio\Arquivo.add;User ID=Usuario;Password=Senha;ServerType=REMOTE;Compression=ALWAYS;"

        ' Cria o objeto factory usando o namespace Advantage.Data.Provider
        Dim factory As DbProviderFactory = DbProviderFactories.GetFactory("Advantage.Data.Provider")

        Using connection As DbConnection = factory.CreateConnection()
            If connection Is Nothing Then
                Console.WriteLine("Não foi possível criar a conexão.")
                Return
            End If

            connection.ConnectionString = connectionString

            Try
                ' Abre a conexão
                connection.Open()
                Console.WriteLine("Conexão aberta com sucesso!")

                '
                ' INSIRA SEU CÓDIGO AQUI
                '

            Catch ex As DbException
                ' Erros específicos do DbException
                Console.WriteLine("Erro: " & ex.Message)
            Catch ex As Exception
                ' Outros erros
                Console.WriteLine("Erro: " & ex.Message)
            Finally
                ' Fecha a conexão
                If connection IsNot Nothing Then
                    connection.Close()
                    Console.WriteLine("Conexão fechada.")
                End If
            End Try
        End Using
    End Sub
End Class