vb如何获取网页中javascript里内容的焦点?
找出了代码,VB如何获取那个【代码模式】的焦点?然后模拟CLICK确认,求救高手,谢谢!<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN"
"http://www.
<!-- saved from url=(0064)http://www. -
->
<HTML lang=zh-CN xmlns="http://www.
<META content=TRUE name=MSSmartTagsPreventParsing>
<META http-equiv=MSThemeCompatible content=Yes><LINK href="favicon.ico"
rel="SHORTCUT ICON"><LINK id=css href="新闻快报-发表帖子[嘉亿论坛].files/default.css"
type=text/css rel=stylesheet><LINK id=css
href="新闻快报-发表帖子[嘉亿论坛].files/dv_wnd.css" type=text/css rel=stylesheet>
<SCRIPT language=javascript src="新闻快报-发表帖子[嘉亿论坛].files/dv_wnd.js"
type=text/javascript></SCRIPT>
<SCRIPT language=javascript src="新闻快报-发表帖子[嘉亿论坛].files/main.js"></SCRIPT>
<SCRIPT language=javascript
src="新闻快报-发表帖子[嘉亿论坛].files/dv_savepost.js"></SCRIPT>
<SPAN><TEXTAREA id=body style="PADDING-RIGHT: 0px; DISPLAY: none; PADDING-LEFT:
0px; PADDING-BOTTOM: 0px; MARGIN: 0px; WIDTH: 100%; BORDER-TOP-STYLE: none; PADDING-
TOP: 0px; BORDER-RIGHT-STYLE: none; BORDER-LEFT-STYLE: none; HEIGHT: 330px; BORDER-
BOTTOM-STYLE: none" name=body></TEXTAREA></SPAN>
<DIV style="MARGIN: 0px">
<SCRIPT>
var Dvbbs_Mode=parseInt('3');
var edit_mode_,toolbar_;
var plus_cc="";
var dveditconfig={
textarea_id:'body',
edit_height:'302px',
edit_mode:edit_mode_,
toolbar:toolbar_,
use_ubb:2==Dvbbs_Mode,
is_show_status:Dvbbs_Mode>0
};
function dvloadarea(){
if ('function'==typeof DvEdit){
dvtextarea=new DvEdit(dveditconfig);
}else{setTimeout('dvloadarea()',0)}
}
dvloadarea();
var dv_signal_click=null;
function Dv_Signal_Do(token,param,value){
var s='';
if (param)
{
s='['+token+'='+param+']'+value+'[\/'+token+']';
}else{
s = "["+token+']'+value+'[\/'+token+']';
}
dvtextarea.insert(s);
}
</SCRIPT>
以上代码生成.html文件即可
