Problema con SHOW CREATE TABLE

[leophp]

Hola

estoy trabajando con Visual basic 6 y con base de datos MySQL 4.1.22 instalado en Windows XP pro.

al ejecutar esta SQL en visual basic solo devuelve basura

pero si la ejecuto en Navicat, que es una aplicacion que administra la base de datos, devuelve el valor correcto

esta es la sql :

SHOW CREATE TABLE mitabla;

este es el codigo visaul basic

Código:

    'Abriendo la base de origen
    tConexionBDD = "DSN=midsnor;UID=midsnor;PWD=midsnor;database=" & nbd_origen & ";Option=3;"
    Dim OBDOrigen As ADODB.Connection
    Set OBDOrigen = New ADODB.Connection
    OBDOrigen.ConnectionString = tConexionBDD
    OBDOrigen.Open
            
    'Abriendo la base de destino
    tConexionBDD = "DSN=midsndes;UID=midsndes;PWD=midsndes;DATABASE=" & nbd_destino & ";Option=3"
    Dim OBDDestino As ADODB.Connection
    Set OBDDestino = New ADODB.Connection
    OBDDestino.ConnectionString = tConexionBDD
    OBDDestino.Open

    Dim SQLCreaTabla As String
    Dim RSTabla As ADODB.Recordset
    Set RSTabla = New ADODB.Recordset

    nombretabla="mitabla"

    'Obtiene la estructura de la tabla desde el origen
    SQL = "SHOW CREATE TABLE " & nombretabla & ";"
    Set RSTabla = OBDOrigen.Execute(SQL)
    SQLCreaTabla = RSTabla.Fields(1).Value
    'Crea la estructura en el destino
    OBDDestino.Execute SQLCreaTabla