從字符串VBS運行代碼

Question

我有一個字符串存儲十六進制數據（\ xEA \ x ...）。無論如何，使用vbs運行該代碼？也許做一些類型的函數指針或類似的轉換。

C版本的什麼，我試圖做的是：

unsigned char opcode[] = "\xc0\x...." 
main() 
{ 
    int (*run)() = (int(*)())opcode; 
    run(); 
} 

太謝謝你了。

Answer 1

可以使用函數指針（或函數引用）與GetRef功能：

dim fp : set fp = GetRef("ShowMessage") 
call fp("Woosh") 

function ShowMessage(msg) 
    msgbox msg 
end function 

爲了使這一工作與功能的命名通常非法字符的字符串（如在十六進制數據反斜線），你可以使用方括號在你的函數聲明：

dim fp : set fp = GetRef("99 problems") 
call fp() 

' note: functions normally cannot start with a digit or contain spaces 
function [99 problems]() 
    msgbox "but this aint one" 
end function 

您不能使用唯一的字符是一個右括號：]