« Programmation VBScript/Application » : différence entre les versions

Contenu supprimé Contenu ajouté
Ligne 382 :
= Bases de données =
Pour encapsuler du [[SQL]] dans du VBS pour {{w|Microsoft SQL Server}}, créer une connexion {{w|ADOdb}}<ref>http://stackoverflow.com/questions/11143764/vbscript-and-sql-server-2008-questions</ref> :
<source lang="vb">
Dim Requete
Set cnx = CreateObject("ADODB.Connection")
cnx.ConnectionString = "Provider=SQLOLEDB.1; Server=NomDuServeur; Database=NomDeLaBase; User ID=NomUtilisateur; Password=MotDePasse"
Ligne 389 ⟶ 390 :
set recordset = cnx.execute(Requete)
recordset.MoveFirst
msgbox recordset.fields("Prenom") & " " & recordset.fields("Nom")
cnx.Close
</source>