Vai al contenuto principale

Guida di VBScript

Suggerimento per il debug: prova a utilizzare la funzione MsgBox di VBScript per visualizzare il valore corrente di una variabile e ottenere un riscontro durante l'esecuzione del codice. Ad esempio: MsgBox("Questo messaggio viene visualizzato in una finestra di dialogo")

Per una guida alle funzioni avanzate di VBScript e alla sintassi:

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

Ecco un breve codice di esempio per aiutarti a iniziare:



Codice di esempio

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)

Il codice sopra riportato esegue (riga per riga):

  1. | Imposta CommonVar #1 su 5,5 (potrebbe essere necessario che "FORMULAATT" faccia riferimento a questa variabile al momento dell'esecuzione)2. | Esegue la formula VBScript per l'attributo "FORMULAATT" del master "MASTER1" e restituisce il risultato alla variabile rEstimatedEror3. | Ricerca il campo «Errore stimato» della voce in questione e lo moltiplica per rTemp, quindi assegna il risultato a rEstimatedError4. | Legge il campo «Coverage Factor» dell'elemento in questione e lo assegna alla variabile rCoverageFactor5. | Legge il campo «Sensitivity Coeff.» dell'elemento in questione e lo assegna alla variabile rSensCoeff6. | Divide rEstimatedError per rCoverageFactor, poi moltiplica il risultato per rSensCoeff e assegna il risultato alla variabile rStandardUncert7. | Imposta il risultato di VBScript su rStandardUncert (sempre l'ultimo passaggio)