Aller directement au contenu principal

Aide VBScript

Astuce de débogage : essayez d'utiliser la fonction MsgBox de VBScript pour afficher la valeur actuelle d'une variable et obtenir ainsi un retour d'information en cours d'exécution. Par exemple : MsgBox("Ce message s'affiche dans une boîte de dialogue")

Pour consulter la documentation sur les fonctions avancées de VBScript et leur syntaxe :

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/script56/html/vbscripttoc.asp

Voici un petit exemple de code pour vous aider à démarrer :



Exemple de code

SetCommonVarNumeric(1, 5,5)

rTemp = LookupMasterAttribute("MASTER1", "FORMULAATT", nil)

rEstimatedError = rTemp * LookupNumericField("UNCERTBUDGETLINEITEMS", "ESTIMATED_ERROR")

rCoverageFactor = LookupNumericField("UNCERTBUDGETLINEITEMS", "ITEM_DIVISOR")

rSensCoeff = LookupNumericField("UNCERTBUDGETLINEITEMS", "SENSITIVITY_COEFFICIENT")

rStandardUncert = (rEstimatedError / rCoverageFactor) * rSensCoeff

SetResult(rStandardUncert)

Le code ci-dessus effectue (ligne par ligne) :

  1. | Définit la variable CommonVar n° 1 sur 5,5 (la fonction « FORMULAATT » pourrait avoir besoin de faire référence à cette variable lors de son exécution)2. | Exécute la formule VBScript associée à l'attribut « FORMULAATT » du modèle « MASTER1 » et renvoie le résultat à la variable « rEstimatedError »3. | Récupère la valeur du champ « Estimated Error » de l'élément concerné, la multiplie par rTemp, puis stocke le résultat dans rEstimatedError4. | Lit le champ « Coverage Factor » de l'élément concerné et l'enregistre dans la variable rCoverageFactor5. | Lit le champ « Sensitivity Coeff. » de l'élément concerné et l'enregistre dans la variable rSensCoeff6. | Divise rEstimatedError par rCoverageFactor, puis multiplie le résultat par rSensCoeff, et attribue le résultat à la variable rStandardUncert7. | Définit le résultat VBScript sur rStandardUncert (toujours la dernière étape)