ajax按钮用VBA如何模拟点击

[HClay]

浏览器源代码如下：

var $toolbar = jQuery('#ToolBarDiv').ligerToolBar({
toolbarShowInLeft: false,
items: [
{
text: '运行', id: 'qs0yx', click: function () {//icon: 'yx',

changeToolBtnBGC(this.id, 'qs0');
var accStr = '';
var modL = yx.length;
for (var i = 0; i < modL; i++) {
accStr += '<div title="' + yx[i].text + '"><div style=" height:7px;"></div>';
var chd = yx[i].children;
var chdL = chd.length;
for (var j = 0; j < chdL; j++) {
if (chd[j].facility == jQuery('#Facility option:selected').val()||chd[j].facility=="") {
if (chd[j].type == 'temp') {
accStr += '<a class="l-link" style="color:#913830;" href="javascript:f_addTab(\'doc_6_' + i + '_' + j + '\',\'' + chd[j].text + '\',\'' + chd[j].url + '\')">' + chd[j].text + '</a>';
} else if (chd[j].type == 'openwin') {
accStr += '<a class="l-link" style="color:#243966;" href="#" onclick="window.open(\'' + chd[j].url + '\')">' + chd[j].text + '</a>';
} else if (chd[j].type == 'hr') {
accStr += '<a class="l-link" style="color:#913830;" href="javascript:transhr(\'doc_6_' + i + '_' + j + '\',\'' + chd[j].text + '\',\'' + chd[j].url + '\')">' + chd[j].text + '</a>';
} else {
accStr += '<a class="l-link" style="color:#243966;" href="javascript:f_addTab(\'doc_6_' + i + '_' + j + '\',\'' + chd[j].text + '\',\'' + chd[j].url + '\')">' + chd[j].text + '</a>';
}
}
}
accStr += '</div>';
}

jQuery('#accordion1').remove();
jQuery('#lm').append('<div id="accordion1"></div>');
jQuery('#accordion1').html(accStr);

jQuery("#accordion1").ligerAccordion({
height: -20, speed: null
});
}
},
{ line: true },

[赵4老师]

http://www.autohotkey.com