vfb运行js
2021-02-05 13:16
阅读：524
标签：int isp class ima Once rip 姓名 load htm 利用mshtml在visual free basic里执行js. 运行结果： vfb运行js 标签：int isp class ima Once rip 姓名 load htm 原文地址：https://www.cnblogs.com/FanXiaoLei/p/13125674.html
#include once "Afx/CDispInvoke.inc"
DIM pdom AS CDispInvoke = "HTMLFILE"
IF pdom.DispPtr = NULL THEN END Else Print "成功运行"
DIM oWin AS CDispInvoke = pdom.Invoke("parentWindow")
IF oWin.DispPtr THEN
oWin.Invoke("execScript","var a=1+2;var js={""姓名"":""刘德华"",""年龄"":59},nm=js[‘姓名‘];")
Print owin.get("a")
Print cwstr(owin.get("nm"),CP_UTF8)
END IF
上一篇：ThinkPHP6安装
评论
亲，登录后才可以留言！