Comment récupérer des valeurs de colonne dans vbscript

Question

Je souhaite récupérer les valeurs de colonne (login, mot de passe) de ma table de base de données mysql vers vbscript. Comment puis je faire ça? Je n'ai aucune expérience de VBScript, et je dois le faire dans le cadre de mon projet. Je réussis à me connecter à la table de base de données Mysql, mais je ne sais pas comment récupérer ces valeurs de colonnes (les deux sont dans varchar) dans vbscript. J'ai beaucoup cherché sur google, mais je n'ai reçu aucune aide. Quelqu'un pourrait-il m'aider s'il vous plaît?

Answer 1

Voici un exemple dans ASP, il devrait vous arriver où vous devez aller. Notez que cela donne une déconnexion recordset, ce qui est le meilleur moyen d'aller, car elle libère la connexion db à la piscine le plus rapidement possible:

<%@Language="VBScript"%> 
<!-- Include file for VBScript ADO Constants --> 
<!--#include File="adovbs.inc"--> 
<% 
    ' Connection string. 
    strCon = "Provider=sqloledb;Data Source=myServer;Initial Catalog=Northwind;User Id=myUser;Password=myPassword" 

    ' Create the required ADO objects. 
    Set conn = Server.CreateObject("ADODB.Connection") 
    Set rs = Server.CreateObject("ADODB.recordset") 

    ' Open the connection. 
    conn.Open strCon 

    ' Retrieve some records. 
    strSQL = "Select * from Shippers" 
    rs.CursorLocation = adUseClient 
    rs.Open strSQL, conn, adOpenStatic, adLockOptimistic 

    ' Disconnect the recordset. 
    Set rs.ActiveConnection = Nothing 

    ' Release the connection. 
    conn.Close 

    ' Check the status of the connection. 
    Response.Write("<BR> Connection.State = " & conn.State) 

    Set conn = Nothing 

    ' Use the diconnected recordset here. 
    Response.Write("Column1") 
    Response.Write("Column2") 

    ' Release the recordset. 
    rs.Close 
    Set rs = Nothing 
%> 

Vous pouvez obtenir le full contents of adovbs.inc here.

Answer 2

La réponse à cette question que je vous aide à arriver là où vous devez être Connect to mysql 5.0 database using pure vbscript?