回复 1# 病毒专收员
普及下把
;%E5%93%88%E5%93%88
Local $Url = '哈哈'
$name = _RunScript("", "encodeURI('"& $Url &"')");encodeURI
$name1 = _RunScript("", "encodeURIComponent('"& $Url &"')");encodeURIComponent
ConsoleWrite($name & @CRLF & $name1 & @CRLF)
Func _RunScript($The_code = "", $The_Function = "", $Language = "JavaScript")
Local $The_Result, $The_Objict
$The_Objict = ObjCreate("ScriptControl")
$The_Objict.language = $Language ;ScriptContro语言Language设定,可以为JavaScript,VBScript等
$The_Objict.AddCode($The_code)
$The_Result = $The_Objict.Eval($The_Function)
$JS_objict = 0 ;注销对象
Return $The_Result
EndFunc
|