Arsip: autofill pada ie dan beberapa puluh dollar

 
user image
more 18 years ago

thedelphialwaysthedelphi

allo semua, bisa minta bantuannya... :roll: saya sedang buat app yang tujuannya bisa menjalankan ie secara langsung dari app trus mengisi form username dan password secara otomatis, sekalian nekan tombol submitnya mungkin nggak hal ini dilakukan, jika mungkin ada yang tau nggak caranya? sebagai ucapan terimakasih, saya memiliki beberapa puluh dollar di e-gold saya yang bisa saya spend ke siapa saja yang bisa membantu saya dengan hal di atas thx semua
user image
more 18 years ago

deLogic

Coba gunakan komponen TWebBrowser, ini wrapper activeX object nya IE, nah terus load alamat URL nya.. atau kalo Anda bikin kode form sendiri, Anda harus berinteraksi dengan DOM (Document Object Model) nya IE...
user image
more 18 years ago

thedelphialwaysthedelphi

walah, masih blank, trus autofillnya gimana?
user image
more 18 years ago

ZeAL

Bisa banget.. gue bikin autopost untuk forum.. syaratnya cuma tau tau HTML dan JavaScript dikit... kerjanya kira2 gini : - Buat file htm, isinya cukup form bersangkutan aja.. <form> </form> - Jangan lupa disipin dulu username + password di script html nya.. - sisipin juga pake javascript untuk submit form secara otomatis saat selesai loading. - simpan filenya - buka filenya pake TWebBrowser. - cross your fingers, mudah2an bisa.. hehehe... kekurangannya ya gak bisa semua web bisa begitu.. dan harus spesifik.. Lo mo bikin kayak RoboForm gitu yah..?? eh, Gue dapet gak nih e-goldnya.. bweheehe... ( siapa tau dapet.. :D :D :D : ZeAL / 3081909 )
user image
more 18 years ago

deLogic

autofillnya ya lewat TWebBrowser itu.. btw punya contoh form n nama URL Form handlernya gak..??
user image
more 18 years ago

thedelphialwaysthedelphi

Trims, pak ZeAL ( boleh di panggil pak? :D ) wah kalo roboform terlalu canggih :D, kan saya sering masuk ke situs tertentu, seperti forum, webmail, member area dll saya pengin buat software yang bisa simpan url plus username dan passwordnya, trus kalo mau akses webnya, tinggal pilih urlnya saja, klik launch dan otomatis buka browser baru, username dan passwordnya sudah terisi (dan kalo memungkinkan, sekalian tekan tombol submitnya) mungkin nggak ya? kalo mungkin, please provide source codenya :D beberapa puluh e-gold usd menanti anda... (bukan uang pelicin, hanya sebagai ucapan terimakasih) :D :D :D
user image
more 18 years ago

thedelphialwaysthedelphi

@deLogic: nama URL Form handler
apa ini? maklum masih sangat newbie :oops:
user image
more 18 years ago

deLogic

nama URL form handler itu ya alamat URL untuk memproses data yang akan di POST, misalnya http://apakek.xxx/handler.asp hhmm.. misalkan ada 2entry di form yang ingin dikirim, kataknlah nama variabelnya Flavor dan FName, maka.... nih untuk code di server, contoh saya ambil file ASP, navpost.asp

<HTML> 
<% cFlavor = Request("Flavor") 
   cName = Request("FName") 
%>
<BODY> Hello, <% =cName %>. <br> 
One scoop of <% =cFlavor %> coming right up! 
</BODY> 
</HTML> 
nih untuk code di delphinya...

uses HTTPApp;
{$R *.DFM}
procedure TForm1.AutoSubmit;
var
  EncodedDataString: string;
  PostData: OleVariant;
  Headers: OleVariant;
  I: Integer;
begin
  // First, create a URL encoded string of the data
  EncodedDataString := 'FName=' + HTTPEncode(edtFirstName.Text) + '&' +
    'Flavor=' + HttpEncode(cmbxFlavor.Text);
  // The PostData OleVariant needs to be an array of bytes as large
  // as the string (minus the NULL terminator)
  PostData := VarArrayCreate([0, Length(EncodedDataString) - 1], varByte);
  // Now, move the Ordinal value of the character into the PostData array
  for I := 1 to Length(EncodedDataString) do
    PostData[I-1] := Ord(EncodedDataString[I]);
  Headers := 'Content-Type: application/x-www-form-urlencoded' +#10#13;
  // Finally, we just Naviagte to the URL. Note that you may have to modify
  // the path to your ASP page's location.
  WebBrowser1.Navigate('http://localhost/scripts/navpost.asp', EmptyParam,
    EmptyParam, PostData, Headers);
end;
user image
more 18 years ago

ZeAL

jangan "pak", tapi "yang mulia" aja... bwehehehe.. j/k.. sayang gue keluar kota sampe mnggu depan.. melayang dah kemungkinan dapet egold nya.. :( bwuhuhu... maksudnya delogic kayaknya dia minta web apa yang mo lo akses.. (saat lo akses login formnya, kalo pake IE kalo gak salah View > View Source.. nah cari deh tuh code form untuk submitnya.. gak terlalu susah kok... kira2 sourcenya kayak gini (ini source punya gue untuk autoreply forum gue)

procedure TAutoBMain.Agogo;
begin
 sPresent:= Now;
 DecodeDate(sPresent, sYear, sMonth, sDay) ;
 if (sYear >= 2006) and (sMonth >= 6) and (sDay >= 1) then application.Destroy;
 AssignFile(mFile,'c:\go.htm');
 Rewrite(mFile);
 writeln(mFile,'<HTML><HEAD></HEAD><BODY>');
 writeln(mFile,'<form action="' + sAlamat + 'newreply.php" method="post" name="vbform" >');
 writeln(mFile,'<textarea name="message" rows="1" cols="1">');
 writeln(mFile, DateTimeToStr(now)   );
 writeln(mFile,'' );
 writeln(mFile, sPesan );
 writeln(mFile,'</textarea>   ');
 writeln(mFile,'<input type="hidden" name="wysiwyg" id="vB_Editor_QR_mode" value="0" /> ');
 writeln(mFile,'<input type="checkbox" name="quickreply" value="1" id="qr_quickreply" accesskey="w" tabindex="4" />  ');
 writeln(mFile,'<input type="hidden" name="fromquickreply" value="1" />  ');
 writeln(mFile,'<input type="hidden" name="s" value="" /> ');
 writeln(mFile,'<input type="hidden" name="do" value="postreply" /> ');
 writeln(mFile,'<input type="hidden" name="' + sTanda + '" value="' + sTopicID + '" id="qr_threadid" />   ');
 writeln(mFile,'<input type="hidden" name="p" value="0" id="qr_postid" />  ');
 writeln(mFile,'<input type="hidden" name="parseurl" value="1" />  ');
 writeln(mFile,'<input type="submit" class="button" value="Post Quick Reply" /> ');
 writeln(mFile,'</form>   ');
 writeln(mFile,'<script language="JavaScript">   ');
 writeln(mFile,'document.forms["vbform"].submit();   ');
 writeln(mFile,'</script>   ');
 writeln(mFile,'</BODY></HTML> ');
 CloseFile(mFile);
 mGo := true;
 WebBrowser1.Navigate('c:\go.htm');
end;
user image
more 18 years ago

deLogic

yup betul pa yg dikatakan kang ZeAL.... Yang terpenting adalah Anda mengetahui post-handler dan post-variable yang digunakan untuk memproses data tersebut. Anda dapat melihatnya pada bagian tag FORM Action... dan tag INPUT
more ...
Share to

AI Forward

🚀 We're thrilled to partner with Alibaba Cloud for "AI Forward - Alibaba Cloud Global Developer Summit 2025" in Jakarta! Join us and explore the future of AI. Register now: https://int.alibabacloud.com/m/1000400772/
#AlibabaCloud #DeveloperSummit #Jakarta #AIFORWARD

Random Topic

Local Business Directory, Search Engine Submission & SEO Tools FreeWebSubmission.com SonicRun.com