Error 3705 VB 6.0 y MySQL

[ecerpa]

Estimados amigos de Foros del Web, me encuentro desarrollando una aplicación en Visual Basic con MySQL. Todo va muy bien y funciona todo a la perfección, pero se me presento el siguiente problema:

Instalé la aplicación en un Servidor con Windows 2000, corrí la aplicación y me arrojó el siguiente error:

Error "3705" en tiempo de ejecución: No se permite operación cuando el objeto está abierto.

Hice un montón de pruebas para ver como solucionarlo pero no encontré nada que me sirviera, ojalá que ustedes me puedan guiar en como resolverlo. Adjunto el trozo de código en el cual se genera dicho error.

Public Function conexion() As Boolean

Dim cadenaODBC As String
Dim cadenaSQL As String
Dim server As String
Dim bd As String
Dim puerto As String
Dim driver As String
Dim usuario As String
Dim clave As String
Dim numeroRegistros As Integer

conexion = False

server = servidorIP
driver = "{MySQL ODBC 3.51 Driver}"
usuario = "xxxxx"
clave = "xxxxx"
bd = "xxxxx"
puerto = "3306"

cadenaODBC = "SERVER=" & server & _
";DRIVER=" & driver & _
";UID=" & usuario & _
";PASSWORD=" & clave & _
";DB=" & bd & _
";PORT=" & puerto & ";"

On Error GoTo errorConexion
oConexion.Open cadenaODBC
conexion = True

Exit Function
errorConexion:

Msgbox "Error de Conexion con la BD MySQL " & Err.Number & " " & err.Description

End Function

Gracias por su colaboración

Atentamente

ecerpa