Programmation VBScript/Opérateurs

Programmation VBScript

• Introduction
• Opérateurs
• Fonctions
• Objets
• Constantes
• Codes d'erreur
• Application

+	addition
-	soustraction
*	multiplication
^	puissance
/	division à float
\	division entière
mod	modulo - reste de la division entière
<	plus petit
<=	plus petit ou égal
>	plus grand
>=	plus grand ou égal
<>	différent
not	non logique
and	et logique
or	ou logique
xor	xor logique
eqv	equivalence
imp	implication
&	concaténation

Déclarations

Contrairement à beaucoup d'autres langages, le vbs n'est pas sensible à la casse.

---

• LÉGENDE

src - source

nm - nom

var - variable

expr - expression

ins - instruction

arg - argument

cond - condition

---

• Déclaration

option explicit - force déclaration de toutes variables dans scr

dim nm(src) - variable

redim [preserve] var(src)

const nm=expr - constante

• Procédure - execute instructions

sub nm(arg1,arg2,...)

[ins]

[exit sub]

[ins]

end sub

• Fonction - retourne une valeur en sortie à nm

function nm(arg1,arg2,...)

[ins]

[nm=expr]

[exit function]

[ins]

[nm=expr]

end function

• Get - comme fonction simple

property get nm(arg1,arg2,...) as [type]

...

[ins]

[nm=expr]

end property

• Let - comme fonction simple

property let nm(arg1,arg2,...)

...

[ins]

end property

• Set - comme fonction simple

property set nm(arg1,arg2,...)

...

[ins]

end property

• Classe - retourne initialize || terminate

class ClassName

[var]

Private Sub Class_Initialize()

[ins]

End Sub

Private Sub Class_Terminate()

[ins]

End Sub

Public Function NomMethode([arg])

[ins]

End Function

end Class

---

nota : const/sub/function/property sont déclarables en [public [default] | private]

Exemple 1

  public function nm(args)  ' pour tout le fichier

Exemple 2

sub nm(args)
  private const=expr  ' n'est déclarée et n'est valable que dans la procédure
end sub

Instructions de contrôle

• TEST

If cond Then [ins] Else [ins]

If cond1 Then
 [ins]
Elseif cond2 Then
 [ins]
Else
 [ins]
Endif

Select Case expression
 Case expr1
  [ins]
 Case expr2
  [ins]
 Case Else
  [ins]
End Select

• BOUCLE

For cpt = début To fin [Step pas]
 [ins]
 [Exit For]
 [ins]
Next [cpt]

For Each élément In groupe
 [ins]
 [Exit For]
 [ins]
Next

Do [{While | Until} condition]
 [ins]
 [Exit Do]
 [ins]
Loop

Do
 [ins]
 [Exit Do]
 [ins]
Loop [{While | Until} condition]

While condition
 [ins]
Wend

• APPELS

With obj
 [ins]
End With

Call nom [args]

• ERREURS

On Error Resume Next
On Error Goto 0

• REMARQUES

Rem

• AFFECTATION DE REFERENCES

Set objvar=[obj expr | New classname | Nothing ]

• ASSOCIATION DE REFERENCE

Set object.eventname=GetRef(procname)