http://www.nhic.or.kr/wbl/wblz/wblz_0100_i.jsp
위 사이트에서 로그인할때
1.
아래처럼... html 코드가 inline frame에 들어있는경우...
<IFRAME WIDTH="670" HEIGHT="500" FRAMEBORDER="no" SCROLLING="no" SRC="/wby/wbya/wbya_0110_r.jsp" MARGINWIDTH="0" MARGINHEIGHT="0" NAME="a" HSPACE="0" VSPACE="0"></IFRAME>
2.
<td width="381"><input type="image" border="0" style="border-style:none;" name="imageField" src="/images/searchbu2.gif" width="58" height="17"></td>
for m := 0 to Document.forms.length - 1 do
begin
ovElements := Document.forms.item(m).elements;
for i := 0 to ovElements.Length - 1 do
begin
try
if (compareText(ovElements.item(i).type, 'text') = 0) and
(compareText(ovElements.item(i).name, 'USER_ID') = 0) then
ovElements.item(i).value := '11';
except
end;
if (compareText(ovElements.item(i).type, 'image') = 0) or
(compareText(ovElements.item(i).name, 'imageField') = 0)
then
ovElements.item(i).click;
except
end;
위의 imagefield 버튼을 클릭하기 위해서 했는데..... USER_ID는 잘되는데..
왜 image를 찾는 부분은 if문 안으로 들어가질 않는지.....알려주세요...
어떻게 아이디와 비밀번호를 넣고 login 버튼을 누를수 있는지....좀.....
자세히 알려주시면 감사하겠습니다.....
제가 초보중의 왕초보라.......죄송합니다.........제발 자세히 자세히 .......제발.....
.... MSHTML;
Self.WebBrowser1.OleObject.Document.All.USER_ID.value := Self.Edit2.Text;
Self.WebBrowser1.OleObject.Document.All.PASSWD.value := Self.Edit3.Text;
procedure TForm1.Button2Click(Sender: TObject);
var
iDoc2 : iHTMLDocument2;
iW2 : iHTMLWindow2;
begin
try
iDoc2 := Self.WebBrowser1.DefaultInterface.Document as iHTMLDocument2;
iW2 := iDoc2.parentWindow;
iW2.execScript('document.myForm.submit()','JavaScript');
except
end;
end;