论坛的贴图时不时看不到?
以下是引用DANSON在2025-12-17 15:54:04的发言:
万能的吹版,我把您的代码精简了一下,便于无缝融合到我自己的代码里,经验证可行,是否可以发到这里供兄弟们切磋一下?
万能的吹版,我把您的代码精简了一下,便于无缝融合到我自己的代码里,经验证可行,是否可以发到这里供兄弟们切磋一下?
切磋是好事,无理由不可。
[此贴子已经被作者于2025-12-17 17:03编辑过]
[此贴子已经被作者于2025-12-18 18:04编辑过]
程序代码:
FUNCTION getHtmlText(cUrl, script_enabled)
ofw.print_msg("获取数据,请稍候......")
web.Settings(IS_SCRIPT_ENABLED, script_enabled)
LOCAL jsCode, txt
web.Navigate(cUrl, WAIT_TIMEOUT)
DOEVENTS
INKEY(0.5)
jsCode = "document.documentElement.outerHTML;"
web.ExecuteScript(jsCode, .t., WAIT_TIMEOUT)
RETURN web.returnExecuteScript
ENDFUNC
[此贴子已经被作者于2025-12-19 00:37编辑过]