Bu işi yapabilmen için bir asp dosyası oluşturacaksın ve programla o asp ye baglanacaksın yada index. asp dosyandaki kulalnıcı form unu kulalcaksın ben ornek ap yide vereyim bu kodları kendi sitene gore duzenleprogramla asp ye baglandıktan sonra asp de gerekli bilgiyi veritabanından sorgulaaycak programla direk veritabanına bağlanamazsın cunku site buna izin vermez.. rnek asp<%@ Language=VBScript %><%Kadi = Request. Form ' burada programdan gonderdigimiz edit1 icindeki bilgiyi Kadi isimli degiskene aliyoruzsifre = Request. Form 'sifreyi aliyoruz FUNCTION fixQuotes 'string icin tirnak koyduruyoruz function fixQuotes = REPLACE END FUNCTION'veritabani Baglantisini AcSet con = Server. CreateObject con. Open "driver= ;" &_ "dbq=" & Server. MapPath ' MapPath functinu fiziksel yolu dondurur isersek direk yoluda yazabiliriz 'Tablomuzu seciyoruzsqlString = "SELECT FROM UserList "sqlString = sqlString & "WHERE KullaniciAdi='" & fixQuotes & "'"sqlString = sqlString & " AND Sifre='" &fixQuotes & "'" 'Kayit Setini AçSet RS = Server. CreateObject RS. ActiveConnection = conRS. Open sqlStringRS. Closecon. Close %>// asp de hatalar olabilir tam asp bilmiyorum :)Buda delphi kodları 2 label 2 edit 1 webbrowser 1 tanede butonunit main;interfaceuses Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, OleCtrls, SHDocVw, ExtCtrls;type TForm1 = class Button1: TButton; Edit1: TEdit; LKad: TLabel; Lsifre: TLabel; Tarayici1: TWebBrowser; Edit2: TEdit; procedure Button1Click ; private public end;var Form1: TForm1;const ASP_Dosya = 'deneme'; Net_Adres = 'http://127.0.0.1/'; // 'http://www.websitesiAdresi.com/'implementationuses WinInet, HTTPApp, ActiveX; //... function isOnline: boolean; // internete baglımı degilmivar connect_status: dword;begin connect_status := 2 + 1 + 4; //2 := lan 1 := modem 4 := proxy result := InternetGetConnectedState(@connect_status, 0);end;//... procedure TForm1. Button1Click ;varEncodedDataString: string;PostData: OleVariant;Headers: OleVariant;I: Integer;sifre : String ;begin Sifre := Edit2. Text ; // Internete bagli olup olmadini kontrol ediyoruz Yerel makinada calistirmayacaksan // Bu kodu Etkin yap if isOnline = false then begin //Internet Baglantisini Kontrol Et ShowMessage ; exit ; end; } EncodedDataString := 'kuladi=' + HTTPEncode(Edit1. Text) + '&' + 'password=' + HttpEncode(sifre ) ; PostData := VarArrayCreate( , varByte); for I := 1 to Length do PostData := Ord ; Headers := 'Content-Type: application/x-www-form-urlencoded' + #10#13; Tarayici1. Navigate ;end;end. umarım işini goruru hadi kolay gelsin Imzam Yok Barnak Bassam Olmamı?

bende delphiyle uğraşıyorumda şu geldi aklaıma <form method="POST" action="giris. php"> <input type="text" name="user" size="30" value="90"> <input type="text" name="pass" size="30" value="90"> <input type="submit" value="Yolla" name="yolla"> </form> Burdan login. php?user=edit1. text&pass=edit2. texttarzı bir olayla yaklaşıp web browserdan birşeyler yapamaz mıyız?edit: ne saçmalıyorsun var zaten diyeceksiniz. Demek istediğim şu cookieleri falanda delphiyle ayarlasak. Yani bir nevi sohbet programı tarzı birşey olur mu?

şimdi ben bi form hazırlıcam bi webbrowser butonlar vs vs. Bunu firefox gibi yani internet tarayıcısı gibi kullanıcam ok. Mesela tbtye girdim sol tarafta ne var kullanıcı adı şifre ve giriş butonu. Burtadaki alanlara editlerdeki stringleri veya değişkenlerdeki verileri aktarıp giriş butonunada basıp siteye login olmak istiyorum. Yani button1 e basdığımda siteye login olmalıyım. istediğim şey tam olarak bu.

tamamda sitedeki user editinin adresi ne. nası bulcaz onu

şimdi olayı biraz aç hoca ble pek bişi anlaşılmamış :S sırıtma la.

Cevap yazmim dedim yine yaziyorum...1-Elbette olur ama bu soruyu sorduguna gore nasil olacagini yapacagini buyuk ihtimalle bilmiyorsun... onuda soracan, bende sana git delphi ogren diyecem. Login adli bir modul hazirlaman gerekecek ki once bunun alt yapisinida olusturman gerek, yani bir kullanicilara ait bir veritabanin olacakki bu login ekraninda 2 adet sorgunu ni giris butonuna bastiginda veritabanindan sorgulayabilmelisin... Zaten bunu yaptigin zaman istedigin sey ortaya cikar... Hep denedin. Hep yenildin. Olsun yine dene, yine yenil ama daha iyi yenil!

Diğer konuyuda belki senin gibiler için açtım ha :P neyse ben o kunu hakkında compuye pm attım kurcalama boşver.

: bende delphiyle uğraşıyorumda şu geldi aklaıma Burdan login. php?user=edit1. text&pass=edit2. texttarzı bir olayla yaklaşıp web browserdan birşeyler yapamaz mıyız?edit: ne saçmalıyorsun var zaten diyeceksiniz. Demek istediğim şu cookieleri falanda delphiyle ayarlasak. Yani bir nevi sohbet programı tarzı birşey olur mu? tabiki yapılabilir neden web üzerinden istiyorsunki socket kullanmak daha mantıklı değil mi? Ne zaman birşey ğrenmek istesem, Birden Vaktim Kalmıyor?

Arkdaşlar şimdi forma bi webbrowser bide buton koycam butona basdığımda sitedeki kullanıcı adı ve şifresi alanlarını doldurup gir butonuna bastırmam lazım acaba olurmu ble bişey.

kullanıcı bilgilerini xml olarak tutmanı tavsiye ederim aynı zamanda kullanıcı adı ve şifrenin yanında form da girilen textboxların isimlerinide tutman gerekebilir... Mühendis kahveyi projeye dnüştüren bir insan evladıdır.

varname, pass, url, gelen:string;beginname := 'isim';pass :='sifre';url := format('http://www.deneme.com.tr/Login. asp?Username=%s&Password=%s&LType=1', );Gelen := IdHttp1. Get ;sanırım bu tarz bişey yapman gerekecek biraz kasmak lazım çalışırmı emin değilim bir denemende fayda var sırıtma la.

3mr3 nin dediği gibi nce string tipinde değişkenler kurmalısın mesela bu site içinvarts:tstringlist;begints:=ts. create;ts. items. add ;ts. items. add ;idhttp1. post ; end;//kodları kafadan yazdım, tam yazman için delphi yardım eder :D Ne zaman birşey ğrenmek istesem, Birden Vaktim Kalmıyor?

Bunun sylediği webbrowserdaki nesnelere erişip ordaki değerleri değiştirip sonrada submitlemek. 3-5 satır kodla olacak şey değil bu. Delphi ve webbrowser bileşeni arasındaki kprü zayıf. Sırf bunun üstüne oturup uğraşmak gerek. Eğer kendi sitene giriş yapacaksan emrenin verdiği tarzda querystringlerle kolayca yapabilirsin. Daha basit birşeyler düşünürsek senin olaya. nce girdiğin sayfanın tüm html kodunu pcye kaydedersin. Sonra içerisine formu otomatik submit eden kod eklersin. Textboxların isimleri siteye gre değişebilir o sorun olabilir. Birde sorduğun sorunun mesafesini lç. Bunu sorsam ne kadar sürede cevap alırım. Kaç kişi cevap verebilir düşün. Diğer açtığın konu hoşuma gitmedi açıkçası.

Eğer TWebBrowser Componenti iLe Yapacaksanız ;Form'a WeBBrowser'ı ve 1 Button, 2 Editbox Ekleyin Button'un OnClick Olayına ;WebBrowser1. OleObject. All. Item . Value = Edit1. TextWebBrowser1. OleObject. All. Item . Value = Edit2. TextWebBrowser1. OleObject. All. Item . ClickForm Value Değerlerine Post Yapacağınız Sitenin Kaynak Kodundan Alabilirsiniz..