शुद्ध vbscript का उपयोग कर mysql 5.0 डेटाबेस से कनेक्ट करें?

Question

मैं नीचे स्क्रिप्ट की कोशिश की है, लेकिन मैं एक त्रुटि हो रही है:

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" 

इसकी निम्न त्रुटि दे रही है:

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

जब मैं एक ODBC कनेक्टर के लिए googled मैं this पेज जहां पास आया मैं odbc 5.1 कनेक्टर डाउनलोड कर सकता था। आश्चर्य है कि यह एक MySQL सर्वर 5.0 डेटाबेस से कनेक्ट करने के लिए पर्याप्त है ...?

Answer 1

स्थापित MySQL Connector/ODBC और एक connection string निम्नलिखित

connectionString = "Driver={MySQL ODBC 5.1 Driver};Server=yourServerAddress;" & _ 
        "Database=yourDataBase;User=yourUsername;" & _ 
        "Password=yourPassword;" 

Answer 2

तरह का उपयोग मैं ऊपर स्क्रिप्ट के लिए छोटे परिवर्तन किए हैं और ठीक काम कर रहा है:

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"