【已解决】网页填表问题：不填表的时候，可以执行提交；填表之后，不会提交了

阿帅

import win.ui;
import web.form;
import web.json;
import inet.http;
import win.mm;
import win.util.tray;
import key.hook;
import fsys.file;
import fsys;
import web.form.util;
import math;
import com;
import key;
import winex;
import console;

/*DSG{{*/
var winform = win.form( bottom=674;scroll=1;text="aardio Form";right=1044;parent=...)
winform.add(  )
/*}}*/
winform.wndproc = function(hwnd,message,wParam,lParam){  
     select(message) {//털뙤句口잚謹  
        case 0x205/*_WM_RBUTTONUP 柑깃塘숩뎐폅，뎐놔꽉데*/{  
         }  
         else{                 
         }  
     }  
     
}  

var wb = web.form(winform )
  
  
main =  function() {
wb.NewWindow2=function( ppDisp, Cancel) {　 return owner.openproxy /*?建代理?口捕??址?在?前?口打?*/    return ppDisp, true; /*第二?返回?如果??，?取消新?口*/ /*新建的web??，??application作?返回?，?在?web?口中打?*/ return ppDisp, Cancel}
wb.showMsg=function(text/*信息*/,caption/*??*/){    closeDlg_t = function(title) {          import winex;          var hwnd,hctr =   winex.waitActive(title, ,"#32770","Button");             winex.click(hctr);     }    thread.create(closeDlg_t,caption/*??????程*/ )    return true; /*返回false?不?示???*/}   //打?目??站wb.write("<script>alert('?好?')</script>"
wb.noScriptErr=true;//禁止脚本??

//Get_Title&Titileleft20
title=string.load("F:\Macro9\xls\Subject 01.txt")
titileleft20=string.left(title,20)
//Get_Body
body=string.load("F:\Macro9\xls\Comment 01.txt")
//Get_Excel_Hwnd
Excel_Hwnd=win.find("XLMAIN")
//Open_Web_From
url="http://www.baidu.com/"
wb.go(url)
winform.show(0x3/*_SW_MAXIMIZE*/)  
wb.wait("",30000);

//Get_Web_Hwnd
Web_Hwnd=win.find(,"World aardio Form")
//Max_Web
win.show(Web_Hwnd,0x3)
win.delay( 1000 )






For_Number=1
//Start_For
for(i=1;For_Number;1){

//Get_Url
//Max_Excel
win.setForeground(Excel_Hwnd)
win.delay( 1000 )
win.show(Excel_Hwnd,0x3)
win.delay( 1000 )
//Crtl_C
key.combine( "CTRL","C" )
win.delay(1000)
//Min_Excel
win.show(Excel_Hwnd,0x6)
win.delay( 1000 )
//Go_Url
import win.clip
url=win.clip.read()
wb.go(url)
//Wait_Write_Page_Open
wb.wait("",30000);
win.delay(1000)
//??跨域支持
web.form.util.crossDomain()
//遍?所有?架
for(i=2;wb.document.frames.length ){
    wb.getDoc(i-1).Body.InnerHTML   = "跨域操作?架"
}

//Mark_Now_UIrl
Url1=wb.location





//Start_Try_Write_Source

//Name
try{wb.getEle("name").value = "8272"}
try{wb.getEle("userName").value = "8272"}
try{wb.getEle("user_nm").value = "8272"}
try{wb.getEle("writer_name").value = "8272"}
try{wb.getEle("wr_name").value = "8272"}
try{wb.getEle("wname").value = "8272"}
try{wb.getEle("user_name").value = "8272"}
try{wb.getEle("writer").value = "8272"}
try{wb.getEle("board_name").value = "8272"}
try{wb.getEle("").value = "8272"}
try{wb.getEle("").value = "8272"}
try{wb.getEle("").value = "8272"}
try{wb.getEle("").value = "8272"}
//Password
try{wb.getEle("passwd").value = "qqq111"}
try{wb.getEle("userPw").value = "qqq111"}
try{wb.getEle("pass").value = "qqq111"}
try{wb.getEle("user_pw").value = "qqq111"}
try{wb.getEle("password").value = "qqq111"}
try{wb.getEle("wr_password").value = "qqq111"}
try{wb.getEle("user_pass").value = "qqq111"}
try{wb.getEle("pwd").value = "qqq111"}
try{wb.getEle("board_password").value = "qqq111"}
try{wb.getEle("").value = "qqq111"}
try{wb.getEle("").value = "qqq111"}
try{wb.getEle("").value = "qqq111"}
//Email
try{wb.getEle("email").value = "asd123@hotmail.com"}
try{wb.getEle("emailAddress").value = "asd123@hotmail.com"}
try{wb.getEle("user_email").value = "asd123@hotmail.com"}
try{wb.getEle("writer_email").value = "asd123@hotmail.com"}
try{wb.getEle("wr_email").value = "asd123@hotmail.com"}
try{wb.getEle("board_email").value = "asd123@hotmail.com"}
try{wb.getEle("").value = "asd123@hotmail.com"}
try{wb.getEle("").value = "asd123@hotmail.com"}
try{wb.getEle("").value = "asd123@hotmail.com"}
try{wb.getEle("").value = "asd123@hotmail.com"}
//Homepage
try{wb.getEle("homePage").value ="dasd-1231.blogspot.com"}
try{wb.getEle("wr_homepage").value ="dasd-1231.blogspot.com"}
try{wb.getEle("board_homepage").value ="dasd-1231.blogspot.com"}
try{wb.getEle("").value ="dasd-1231.blogspot.com"}
try{wb.getEle("").value ="dasd-1231.blogspot.com"}
try{wb.getEle("").value ="dasd-1231.blogspot.com"}
try{wb.getEle("").value ="dasd-1231.blogspot.com"}
//Title
try{wb.getEle("subject").value = title}
try{wb.getEle("title").value = title}
try{wb.getEle("wnwp") .value = title}
try{wb.getEle("wr_subject") .value = title}
try{wb.getEle("board_subject") .value = title}
try{wb.getEle("") .value = title}
try{wb.getEle("") .value = title}
try{wb.getEle("") .value = title}
try{wb.getEle("") .value = title}
//Change_Html&Txt
try{wb.getEle("_ID_MODE_AUTO_contents").click()}
//Body
try{wb.getEle("comment").value = body}
try{wb.getEle("sodyd").value = body}
try{wb.getEle("editor_textarea_1").value = body}
try{wb.getEle("_contents_texteditor").value = body}
try{wb.getEle("content").value = body}
try{wb.getEle("wr_content").value = body}
try{wb.getEle("message_text").value = body}
try{wb.getEle("memo").value = body}
try{wb.getEle("cdiv").value = body}
try{wb.getEle("ided_wr_content").value = body}
try{wb.getEle("board_body").value = body}
try{wb.getEle("CONTENTS").value = body}
try{wb.getEle("").value = body}
try{wb.getEle("").value = body}
try{wb.queryEles(  parent="editor_iframe_1";tagName="BODY"  ).innerHTML=body}
try{wb.queryEles(  parent="_contents_htmleditor";tagName="BODY"  ).innerHTML=body}
try{wb.queryEles(  tagName="BODY";className="xed"  ).innerHTML=body}
try{wb.queryEles(  tagName="IFRAME"  ).innerHTML=body}
try{wb.queryEles(  id="iView" ; scrolling="YES" ; style="width: 650px; height: 300px;"  ).value=body}
try{
doc = wb.getDoc("iView")
doc.body.innerHTML = body
}



//Send
try{wb.getEle("bt_submit_int").click()}
try{wb.queryEles(  tagName="INPUT";className="button"  ).click()}
//key.combine("ALT","S")
try{wb.getEle("btn_submit").click()}
//src="/img/btn_ok.gif"
//wb.queryEles(  tagName="INPUT";src="@tn_wri.gif"  )
//wb.queryEles(  tagName="IMG";src="@review.gif"  )
//wb.queryEles(  tagName="INPUT";src="@onfirm.gif"  )
//wb.queryEles(  tagName="INPUT";src="@_yes01.gif"  )

//wb.queryEles(  tagName="IMG";src="@oardok.gif"  )
//wb.queryEles(  tagName="INPUT";src="@riteok.gif"  )
//wb.queryEles(  tagName="IMG";src="@ve_btn.gif"  )
try{wb.queryEles(  tagName="IMG";src="@g/save.gif"  ).click()}
if(string.find(source ,"@javascript:ck_form") )
try{wb.queryEles(  innerHTML="?厘";href='@javascript:ck_form("save");';tagName="^A$"  ).click()}
try{wb.queryEles(  type="submit";accesskey="s";value="殿?"  ).click()}
try{wb.queryEles(  tagName="IMG";src="@submit.gif"  ).click()}
if(string.find(source ,"submit1") )
try{wb.getEle("submit1").click()}
if(string.find(source ,"post_now(document.f1)") )
wb.queryEles(  tagName="INPUT"  ).click()
try{wb.queryEles(  tagName="IMG";src="@riteok.gif"  ).click()}
try{wb.queryEles(  tagName="INPUT";src="@_write.gif"  ).click()}
try{wb.queryEles(  tagName="INPUT";src="@onfirm.gif"  ).click()}
source = wb.document.documentElement.outerHTML
if(string.find(source ,"post_now(document.f1)") )
wb.queryEles(  tagName="INPUT"  ).click()
if(string.find(source ,"@javascript:ck_form") )
try{wb.queryEles(  innerHTML="?厘";href='@javascript:ck_form("save");';tagName="^A$"  ).click()}

}
}






winform.show()
main()
win.loopMessage()
return winform;
//return winform,wb;
//return winform.wb;

阿帅

//name，//password，//email。//homepage 这些去掉提交就可以的 否则提交好像没有效果了 看了好久 也没看出来问题 也没报错。。。

阿帅

try{wb.queryEles(  parent="_contents_htmleditor";tagName="BODY"  ).innerHTML=body}

这句的问题，删除了就好了，不过不知道为什么。。。。

落伍者

第一次见到用那么多try的
getele是 获取元素对象 你判断下 如果获取到元素 再对他操作不好么

落伍者

越看越蛋疼

阿帅

落伍者 发表于 2012-3-1 15:11
第一次见到用那么多try的
getele是 获取元素对象 你判断下 如果获取到元素 再对他操作不好么

win.msgbox("Send6","aardio")
if(string.find(source ,"submit1") )
wb.getEle("submit1").click()

win.msgbox("Send7","aardio")
if(string.find(source ,"post_now(document.f1)") )
wb.queryEles(  tagName="INPUT"  ).click()

呵呵，偷懒了。。。

阿帅

落伍者 发表于 2012-3-1 15:11
第一次见到用那么多try的
getele是 获取元素对象 你判断下 如果获取到元素 再对他操作不好么

还有别的判断方法吗。。。我只会用源码判断 应该有更好 更常用的吧。。。

落伍者

ele=wb.getEle("id")
if(ele){
        ele.value="就是这样的"
}

阿帅

落伍者 发表于 2012-3-1 16:37
ele=wb.getEle("id")
if(ele){
        ele.value="就是这样的"

好的！！！学习到了！！！谢谢！！！