web

[kamuran48]

selam
herhangi bir web sayfasındaki bir edit'e WSDL kullanmadan bilgi göndermek mümkünmüdür.
iyi çalışmalar

[aLonE CoDeR]

Selamlar.
Öncelikle belirtmeliyim ki, başlığınız sorunuzu neredeyse hiç çağrıştırmıyor, konuyu özetleyen bir başlık seçmeniz, gerek forum kurallarına uymak adına, gerekse daha kısa zamanda çözüm bulunması için önemlidir..

Sorunuza gelince;

Kod: Tümünü seç

procedure EditValueExport;
  var 
     Doc: IHTMLDocument2; 
     i: Integer; 
     Element: OleVariant; 
     Elements: IHTMLElementCollection; 
begin 
  Doc := WebBrowser1.Document as IHTMLDocument2; 
  Elements := Doc.All; 
  for I := 0 to Elements.length - 1 do 
  begin 
    Element := Elements.item(I, varEmpty); 
    if (Element.tagName = 'INPUT') and (Element.type = 'text') then 
      Element.value := 'email@aaa.aaa'; 
  end;//for
end;//EditValueExport

Burada sayfadaki herhangi bir bileşene ulaşmak için name, type vb.özelliklerini kullanabilirsiniz..Örnekte ikisi birlikte verilmiştir, siz birini kullanabilirsiniz.

Kolay gelsin..