fechar conexao

Question

Eu tenha a seguinte conexao

sql = "select * from agenda_contato ORDER BY id"
With ADO
.ConnectionString = "Driver={MySQL ODBC 5.1 Driver};Server=local;Port=3306;Database=banco;User=usuario; Password=senha;Option=3;"
.RecordSource = sql
.Refresh

end With

meu problema, como fecho esta conexao, ja tentei Já tentei de tudo com os componentes

ADO.recordset.close
ADOrecordset.activeconnection = nothing...
ADO.connectionstring = ""

a conexao nao fecha!!!!!

Answer 1

Sidão a melhor maneira de se fazer isso é usando o using assim

sql += "seu select"
            using (SqlConnection conexao = new SqlConnection(ConfigurationManager.ConnectionStrings["suaconexaoConnectionString"].ConnectionString))
            {
                SqlCommand cmd = new SqlCommand(sql, conexao);

                conexao.Open();
                SqlDataReader dr = dr = cmd.ExecuteReader();

                
                Gvboleto.DataSource = dr;
                Gvboleto.DataBind();

                conexao.Close();
                conexao.Dispose(); 
            }

---

Junior

Answer 2

é VB.NET ou VB6?

---

Thiago Coelho - Líder da Comunidade .NET Coders
thiagocoelho.net | @thiagokoelho | Windows 8 Brasil

Answer 3

Thiago é em vb6

Answer 4

Olha se te ajuda

http://www.vb6.us/forums/%5Bcatpath%5D/ado-data-control-and-servierside-cursor-filter-property-cause-ldb-file-remain

Tenho uma adodc conectado com um banco access e fecho dessa maneira:

With Adodc1
    .Recordset.Close
    .Recordset.ActiveConnection = Nothing
End With

aqui funciona, tenta isso.