iii :='<HTML>';
iii := iii + '<head><title>MessengerLogin</title></head>';
iii := iii + '<body onLoad="document.loginF.submit();">';
iii := iii + '<form name="loginF" method="post" action=http://mail.zettamail.net/a_biz/servlet/com.zettasoft.a_biz.MessengerLogin '+ '>';
iii := iii + '<input type="hidden" name="userid" value= kjbyn>';
iii := iii + '<input type="hidden" name="passwd" value=097800>';
iii := iii + '<input type="hidden" name="jump" value=''3''>';
iii := iii + '</form></body></html>';
ShellExecute(Handle, 'open', PChar('IEXPLORE.EXE'), PChar(iii), '', SW_SHOWNORMAL );
이렇게 하면 메일 인증하고 익스플로우가 실행되어야 하는데...
안되네요
iii파을 파일로 세이브한다음
ShellExecute(Handle, 'open', PChar('IEXPLORE.EXE'), PChar('c:\mailLogin.html'), '', SW_SHOWNORMAL );
이렇게 하면 되는데..
왜 string을 바로 하면 안되나요... 인증하고 메일보기로 들어가는 부분인데..
방법좀 알려조세요
오늘도 즐거운 하루되세요
IEXPLORE.EXE <파일명> 이러한 규칙에 의해
ShellExecute(Handle, 'open', PChar('IEXPLORE.EXE'), PChar('c:\mailLogin.html'), '', SW_SHOWNORMAL );
'mailLogin.html' 파일명이 파라메터로 전달되고, IEXPLORE.EXE 가 내부적으로 파일을 열어서 내용을 파싱하는 것인데요, <문자열>을 파라메터로 보내면 <문자열>을 이름으로 하는 파일이 있을리 없으니.. 오류납니다.
간단한 해결방법은
SList = TStringList.Create;
SList.Text := iii;
SList.SaveToFile('<경로를 포함한 파일명>');
SList.Free;
ShellExecute(Handle, 'open', PChar('IEXPLORE.EXE'), PChar('<경로를 포함한 파일명>'), '', SW_SHOWNORMAL );
와 같이 해보세요.