So rufen Sie eine Javascript-Funktion in VB-Skript

Question

Ich habe eine Java-Skript-Funktion, um natürliche Sortierung zu tun.

Aber ich habe keine Ahnung, wie dieses Java-Skript aufgerufen wird und Rückgabewerte von js in HP UFT mit VB Script.

function alphanum(a, b) { 
    function chunkify(t) { 
    var tz = [], x = 0, y = -1, n = 0, i, j; 

    while (i = (j = t.charAt(x++)).charCodeAt(0)) { 
     var m = (i == 46 || (i >=48 && i <= 57)); 
     if (m !== n) { 
     tz[++y] = ""; 
     n = m; 
     } 
     tz[y] += j; 
    } 
    return tz; 
    } 

    var aa = chunkify(a); 
    var bb = chunkify(b); 

    for (x = 0; aa[x] && bb[x]; x++) { 
    if (aa[x] !== bb[x]) { 
     var c = Number(aa[x]), d = Number(bb[x]); 
     if (c == aa[x] && d == bb[x]) { 
     return c - d; 
     } else return (aa[x] > bb[x]) ? 1 : -1; 
    } 
    } 
    return aa.length - bb.length; 
} 

Bitte lassen Sie mich wissen, wie js aufrufen?

Answer 1

Ich baute eine Funktion zum Aufruf, wenn ich UFT einige Javascript ausführen müssen; hier ist es:

Public Function MISC_ExecuteJavascript(byVal oPage, byVal sJavaScript) 
    Dim JSEntry 
    Set JSEntry = oPage.object.documentelement.parentnode.parentwindow   
    On Error Resume Next   
    MISC_ExecuteJavascript = JSEntry.eval(sJavaScript)  
    On Error Goto 0 
End Function 

Sie den Browser().Page() Objekt passieren, dass Sie die Javascript erforderlich ausgeführt auf, und die tatsächliche Javascript ausgeführt werden soll, nennen. Die Funktion führt sie dann gegen die Seite aus. Hoffe das hilft dir