Se connecter à mysql 5.0 base de données à l'aide de pure vbscript?

J'ai essayé le script ci-dessous, mais j'obtiens une erreur:

dim cn, rs

set cn = CreateObject("ADODB.Connection")
set rs = CreateObject("ADODB.Recordset")
cn.connectionstring = "Provider=MysqlProv; Data Source=Adonis; User Id=mysqluser; Password = mysqlpass;"
cn.open
rs.open "select * from Countries", cn, 3
rs.MoveFirst
while not rs.eof
    wscript.echo rs(0)
    rs.next
wend
cn.close
wscript.echo "End of program"

Ses donner le message d'erreur suivant:

C:\mysql.vbs(6, 1) ADODB.Connection: Provider cannot be found. It may not be pro
perly installed.

Quand j'ai googlé pour un connecteur odbc je suis venu jusqu'à cette page où j'ai pu télécharger le odbc 5.1 connecteur. Vous vous demandez si cela est suffisant pour se connecter à un serveur mysql 5.0 base de données...?

OriginalL'auteur deostroll | 2009-09-02

  1. 6

    Installer MySQL Connector/ODBC et l'utilisation d'un chaîne de connexion comme suit

    connectionString = "Driver={MySQL ODBC 5.1 Driver};Server=yourServerAddress;" & _
                   "Database=yourDataBase;User=yourUsername;" & _
                   "Password=yourPassword;"
    non cela ne fonctionne pas...j'ai installé le 5.1 connecteur correctement.
    Quel est le message d'erreur?
    la même chose...
    Il a travaillé. Je suis désolé...mon mauvais. Au lieu de "Pilote", j'ai tapé "Fournisseur".
    va "load data local infile ......... "commande fonctionne dans le même code ?? merci de m'aider

    OriginalL'auteur Anton Hansson

  2. 1

    J'ai fait des petites modifications pour le script ci-dessus et fonctionne bien: 

    dim cn, rs

i = 0

set cn = CreateObject("ADODB.Connection")
set rs = CreateObject("ADODB.Recordset")

connectionString = "Driver={MySQL ODBC 5.1 Driver};Server=localhost;" & _
                   "Data Source=dsn_hb; Database=TP; User=root; Password=***;"

cn.Open connectionString
rs.open "select * from test.Login", cn, 3
rs.MoveFirst

'msgbox rs(0)'

while not rs.eof
    msgbox rs.Fields(0)
    rs.MoveNext
wend

cn.close

MsgBox "End of program"
    la variable i et la variable connectionString ne sont pas définis

    OriginalL'auteur Venu Gopi