vb6からmysqlにアクセスしていますがどうしても???と言う具合に文字化けしてしまいます。
コードはこんな感じです。

    Dim objConn As Object
    Dim strConn As String
    Dim objRs As Object
    Dim strSql As String

    strConn = "driver={MySQL ODBC 3.51 Driver};" & _
            "SERVER=localhost;" & _
            "DATABASE=test;" & _
            "UID=root;" & _
            "PWD=root;" & _
            "useUnicode=true& characterEncoding=SJIS;"

    Set objConn = CreateObject("ADODB.Connection")
    objConn.ConnectionString = strConn
    objConn.open
    strSql = "SELECT * FROM test"
    Set objRs = objConn.Execute(strSql)

    Debug.Print objRs(1).Value


SQLサーバの設定はこんな感じです。
mysql>status
mysql  Ver 14.12 Distrib 5.0.18, for Win32 (ia32)

Connection id:          1
Current database:       sousakukan
Current user:           ODBC@localhost
SSL:                    Not in use
Using delimiter:        ;
Server version:         5.0.18-nt
Protocol version:       10
Connection:             localhost via TCP/IP
Server characterset:    sjis
Db     characterset:    sjis
Client characterset:    sjis
Conn.  characterset:    sjis
TCP port:               3306
Uptime:                 2 hours 16 min 20 sec

過去ログやら色々調べましたがギブアップです。スミマセンがどなたかご教授願います。