« Programmation VBScript/Application » : différence entre les versions
Contenu supprimé Contenu ajouté
Aucun résumé des modifications |
|||
Ligne 279 :
MsgBox calc(15,10,2.5)&vbcrlf&Abs(calc(10,20,30))
</source>
! Dans calc() Round retourne directement l'arrondi. A la ligne 5, le pipe s'effectue de la plus petite
= Classe d'objets =
Ligne 301 :
<source lang="vb">
'------------------------------------
'- ouvre une
'- place des articles dedans -
'- affiche l'article par
'------------------------------------
On Error Resume Next
Ligne 354 :
! On initialise et on termine une classe pour libérer la ressource apres usage. On declare plusieurs fonctions qui sont les methodes à appeler. Les Init et Termin sont en private car utile que dans la classe, en revanche toute autre function ou sub doit être public pour l'E/S hors classe.
Pour utiliser une classe :
*on initialise d'abord l'objet obj= new NomDeClass;
*on appele la methode dans l'objet obj.NomDeFonction([arg]);
*comme dans fonction ordinaire [arg] [var] [expr] < en parametre ;
*Voir cet [http://jerome.developpez.com/tutos/classesvbscript/ article]
Ligne 371 :
Response.Write("Le fichier a été supprimé.")
End If
filesys.CopyFile "c:\NouveauFichier.txt", "c:\NouvelAncienFichier.txt" ' Ecrase si existant
</source>
VBS peut aussi faire plus en utilisant
Pour lire et écrire dans un fichier, utiliser la méthode ''OpenTextFile()'' du ''FileSystemObject''<ref>http://msdn.microsoft.com/en-us/library/t5399c99%28v=vs.84%29.aspx</ref>.
= Bases de données =
Pour encapsuler du [[SQL]] dans du VBS pour Windows SQL server, créer une connexion {{w|ADOdb}}<ref>http://stackoverflow.com/questions/11143764/vbscript-and-sql-server-2008-questions</ref> :
<source lang=vb>
Set cnx = CreateObject("ADODB.Connection")
cnx.ConnectionString = "Provider=SQLOLEDB.1; Server=NomDuServeur; Database=NomDeLaBase; User ID=NomUtilisateur; Password=MotDePasse"
cnx.Open
Requete = "select Nom, Prenom from Utilisateur"
set recordset = cnx.execute(Requete)
msgbox recordset('Prenom') & " " recordset('Nom')
</source>
==Références==
|