运行时修改DataEnvironment.Connection.Connectionstring属性

Question

我的程序在运行时要经常的修改Connection对象的ConnectionString属性，但修改时总是提示"对象打开时不能操作"或"关闭时不能操作"的错误，请问应如何修改此属性才是正确的？

Answer 1

If DataEnvironment1.Connection1.State = adStateOpen Then
        DataEnvironment1.Connection1.Close
    End If
    DataEnvironment1.Connection1.ConnectionString = "Provider=SQLOLEDB.1;Password=sa;User ID=sa;Initial Catalog=Northwind;Data Source=PMSERVER"
    DataEnvironment1.Connection1.Open
    DataEnvironment1.Commands(1).CommandText = "select top 1 * from employees"

Answer 2

If DataEnvironment1.Connection1.State = adStateOpen Then
        DataEnvironment1.Connection1.Close
    End If
    DataEnvironment1.Connection1.ConnectionString = "Provider=SQLOLEDB.1;Password=sa;User ID=sa;Initial Catalog=Northwind;Data Source=PMSERVER"
    DataEnvironment1.Connection1.Open
    DataEnvironment1.Commands(1).CommandText = "select top 1 * from employees"