ブラウザで、自動で入力するには？
どうすればいいでしょうか？ページのIDとPASSに入力したいです。
#module #uselib "user32" #func GetClientRect "GetClientRect" int, int #func SetParent "SetParent" int, int #uselib "gdi32" #cfunc GetStockObject "GetStockObject" int #deffunc CreateTab int p1, int p2, int p3, int p4 winobj "systabcontrol32", "", , $52000000 | p4, p1, p2 hTab = objinfo(stat, 2) sendmsg hTab, $30, GetStockObject(17) TabID = p3 if TabID = 0 : TabID = 1 dim rect, 4 return hTab #deffunc InsertTab str p2 pszText = p2 : tcitem = 1, 0, 0, varptr(pszText) sendmsg hTab, $1307, TabItem, varptr(tcitem) GetClientRect hTab, varptr(rect) sendmsg hTab, $1328, , varptr(rect) bgscr TabID + TabItem, rect.2 - rect.0, rect.3 - rect.1, 2, rect.0, rect.1 SetParent hwnd, hTab TabItem++ return #deffunc ChangeTab gsel wID + TabID, -1 sendmsg hTab, $130B wID = stat gsel wID + TabID, 1 return #global title"" screen 0, ginfo(20),ginfo(21),,,,900,600 syscolor 15 : boxf pos 0,0 CreateTab ginfo(20),ginfo(21), 1 hTabControl = stat ////// InsertTab "エルソード" objsize 50,24 pos 0,0:button "戻る",*go_b_a pos 50,0:button "更新",*go_rel_a pos 100,0:button "進む",*go_f_a objsize 60,24 pos 150,0:button "Home",*go_home_a pos 0,24 axobj iean,"Shell.Explorer.2",900,600 ieean=stat tab_a="http://elsword.hangame.co.jp/" iean->"Navigate" tab_a gsel 1, 1 gsel oncmd gosub *notify, $4E stop *notify dupptr nmhdr, lparam, 12 if nmhdr.0 = hTabControl & nmhdr.2 = -551 { ChangeTab gsel } return *go_home_a iean->"Navigate" tab_a:goto *onloadfin *go_f_a iean->"GoForward":goto *onloadfin *go_b_a iean->"GoBack":goto *onloadfin *go_rel_a iean->"Refresh2" 3:goto *onloadfin *OnClose gsel 0,-1 delcom iean end *onloadfin onexit *exit stop *exit dialog "終了してよろしいですか？", 2, "確認" ; もし、[いいえ](stat=7)を選択したら何もせず。それ以外は[はい](stat=6) if stat = 7 : stop end
