Cambiar el la ruta del ODBC desde Visual Basic

Kenia
06 de Septiembre del 2003
Cómo puedo cambiar la ruta de la base de datos en el ODBC desde Visual Basic, por el momento estoy haciendo el siguiente código, solo que este código solo me funciona en tiempo de ejecusión sin cambiar la dirección real desde el ODBC, es decir cuando voy al panel de control y abró el ODBC la ruta continua siendo la misma.

'///////// Código
Public cnt As New adodb.Connection
Public cmd As New adodb.Command

Sub Abrir_Conexion()
If cnt.State = 0 Then
cnt = "DSN=BD_ODBC"
cnt.CommandTimeout = 15
cnt.ConnectionTimeout = 15
cnt.Open
cnt.DefaultDatabase = "C:Nueva_RutaBD"
cmd.ActiveConnection = cnt
End If
End Sub

Por favor!!! si alguién sabe la respuesta enviémela a mi correo electrónico, gracias!