idhttp get post

Delphi'de kod yazma ile ilgili sorularınızı bu foruma yazabilirsiniz.
Cevapla
jakarta2
Üye
Mesajlar: 74
Kayıt: 20 Nis 2015 06:51
İletişim:

idhttp get post

Mesaj gönderen jakarta2 »

Arkadaşlar bir web sitemin(siteyi ben yapmadım php bilgim yok yani) içerik alanlarını doldurmak için text alanına ve edit alanına formdaki edit ve memo alanlarını göndermek istiyorum. idhttp post ile ilgili dünya kadar örnek var ama hepsi eski. Kendi sitemde de işe yaramıyor.
Öncelikle illa bir web browser koymak zorundamıyım? Chrome'dan ya da Yandex'ten açtığım sayfaya göndermem mümkün müdür? ve ne yapmam gerekiyor.

Not: Çalışan bir örnek bile işimi görür uygulamayı görmek açısından (İnternette bulduklarımın hiçbiri çalışmıyor hepsinde ya siteler yok ya da güvenlik nedeniyle girilmiyor.
Lord_Ares
Üye
Mesajlar: 1070
Kayıt: 15 Eki 2006 04:33
Konum: Çorlu

Re: idhttp get post

Mesaj gönderen Lord_Ares »

Bulduğunuz örnekleri kendi sitenize göre düzenlemeniz gerekir.(webbrowser veya idhttp farketmez ikisinide kullanabilirsin ) Örnekte bilgi gönderilecek alanın adı deneme1 ise ve sizin sitenizde göndermek istediğiniz adı deneme2 ise haliyle çalışmaz örnek. Bu yüzden sitenizin kodlarını inceleyip göndermek istediğiniz alanların isimlerini bulun ve örnekleri buna göre değiştirin. Bu konu ile ilgili Mrmarmanın forumda çok güzel örnekleri var bunlardan yararlanabilirsiniz.
ertank
Kıdemli Üye
Mesajlar: 1650
Kayıt: 12 Eyl 2015 12:45

Re: idhttp get post

Mesaj gönderen ertank »

Merhaba,

Site linki ve şu ana kadar yazılan kod bilgisini paylaşabilir misiniz?
Lord_Ares
Üye
Mesajlar: 1070
Kayıt: 15 Eki 2006 04:33
Konum: Çorlu

Re: idhttp get post

Mesaj gönderen Lord_Ares »

Örneğin Mrmarman örneklerinden bir kaçı aşağıda. Dilerseniz de Forumda arama kısmına " siteye login olma", "webbrowser post", "html parse " gibi yazarak aratırsanız bir çok örnek çıkacaktır. Bu örneklerden herhangi birini kendi sitenizin kodlarına göre düzenleyebilirsiniz.

viewtopic.php?t=18498
viewtopic.php?f=2&t=28148&p=156346&hili ... te#p156346
viewtopic.php?f=2&t=20713
viewtopic.php?f=2&t=24889&hilit=webbrowser+post
jakarta2
Üye
Mesajlar: 74
Kayıt: 20 Nis 2015 06:51
İletişim:

Re: idhttp get post

Mesaj gönderen jakarta2 »

Yazdığım kodlar aşağıda ancak text area bölümüne yazdıramadım bir türlü. Php kodlarıda aşağıda... Etiketle bölümündeki edite yazdırıyor ama textarea bölümüne yazdırmıyor.





<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml"><head><meta http-equiv="Content-Type" content="text/html; charset=UTF-8"/>

<title>xxxx | Admin</title>

<link id="stylesheet" href="css/admin.css" rel="stylesheet" type="text/css"/>

<link rel="stylesheet" href="css/gritter.css" type="text/css" media="screen" charset="utf-8"/>
<link rel="shortcut icon" href="../favicon.ico"/>
<script type="text/javascript" src="js/general.js"></script>

<script type="text/javascript" src="js/jquery.min.js"></script>
<script type="text/javascript" src="js/jquery.persist.min.js"></script>
<link rel="stylesheet" type="text/css" href="css/styles.css"/>

<script type="text/javascript" src="fancybox/jquery.mousewheel-3.0.4.pack.js"></script>
<script type="text/javascript" src="fancybox/jquery.fancybox-1.3.4.pack.js"></script>
<link rel="stylesheet" type="text/css" href="fancybox/jquery.fancybox-1.3.4.css" media="screen" />
<script type="text/javascript" src="js/jquery.gritter.js"></script>
<script type="text/javascript" src="js/jquery.anchor.js"></script>
<script type="text/javascript" src="js/jquery.ajaxmanager.js"></script>
<script type="text/javascript" src="js/a_general.js"></script>
<script type="text/javascript" src="js/jquery-ui-1.7.1.custom.min.js"></script>
<script type="text/javascript" src="js/jquery.kalanKarakter.js"></script>


<script>
function confirmdelete(delurl) {
if (confirm("Silmek istediğinize emin misiniz?")) {
document.location = delurl;
}
}
</script>
<script type="text/javascript">
<!--
function MM_jumpMenu(targ,selObj,restore){ //v3.0
eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
if (restore) selObj.selectedIndex=0;
}
//-->
</script>

<script type="text/javascript" charset="utf-8">
$(document).ready(function(){
$("a#resim").fancybox();
});</script>

<!--[if lt IE 7]>
<style type="text/css" type="text/css" media="screen, projection">
.png {
background-image: expression(
this.runtimeStyle.filter = "progid:DXImageTransform.Microsoft.AlphaImageLoader(src=" + (this.tagName==\'IMG\' ? this[\'src\'] : this.currentStyle[\'backgroundImage\'].split(\'\"\')[1]) + ")",
this.runtimeStyle.backgroundImage = "none",
this.src = "images/pixel.gif",
this.width = this.style.width | this.clientWidth,
this.height = this.style.height | this.clientHeight
);
}

.pngbg {
behavior : url(iepngfix.htc);
}
</style><![endif]-->
<script type="text/javascript">
jQuery(function($){
$(document).ready(function(){
if(($.browser.msie)&(parseInt($.browser.version)<7)){
$("img[src$='.png']").each(function(){$(this).addClass("png");});
//$("span").each(function(){$(this).addClass("pngbg");});
}
});
});
</script>
<script>
// Javascript originally by Patrick Griffiths and Dan Webb.
// http://htmldog.com/articles/suckerfish/dropdowns/
sfHover = function() {
var sfEls = document.getElementById("sub_menu").getElementsByTagName("li");
for (var i=0; i<sfEls.length; i++) {
sfEls.onmouseover=function() {
this.className+=" hover";
}
sfEls.onmouseout=function() {
this.className=this.className.replace(new RegExp(" hover\\b"), "");
}
}
}
if (window.attachEvent) window.attachEvent("onload", sfHover);
</script>



<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentwidget ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=contentwidget';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentanasayfa ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=contentanasayfa';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentLeft ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=updateRecordsListings';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentust ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=contentust';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentalt ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=contentalt';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentdiger ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=contentdiger';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentdiger ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=contentdiger';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentsirala ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=guzelsozkategori';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>
<script type="text/javascript">
$(document).ready(function(){

$(function() {
$("#contentLeftmanset ul").sortable({ opacity: 0.6, cursor: 'move', update: function() {
var order = $(this).sortable("serialize") + '&action=updateManset';
$.post("updateDB.php", order, function(theResponse){

});
}
});
});

});
</script>


<script type="text/javascript">

$(document).ready(function(){



// title alanı için
$('input[name=seo_title]').kalanKarakter({
limit: 65,
mesaj: ' limit: #1',
kapsa: '<em></em>',
uyari: function(){

}
});
// seo_description alanı için
$('input[name=seo_description]').kalanKarakter({
limit: 160,
mesaj: ' limit: #1',
kapsa: '<em></em>',
uyari: function(){

}
});
// seo_description alanı için
$('input[name=seo_keyword]').kalanKarakter({
limit: 255,
mesaj: ' limit: #1',
kapsa: '<em></em>',
uyari: function(){

}
});

});

</script>
</head>
<body>

<div id="menu_header">
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tbody><tr>
<td width="78%">
<h1><a href="http:/xx.net/" target="_blank">xxxxxxxxx</a></h1>
<br/>
</td>

<td width="22%" align="right">&nbsp;</td>
</tr>
<tr>
<td colspan="2">
<div id="menu">
<ul>
<li><a href="index.php?modul=main" >Ana Sayfa</a></li>
<li><a href="index.php?modul=haber" >Haber</a></li>
<li><a href="index.php?modul=sarkisozu" >Şarkı Sözleri</a></li>
<li><a href="index.php?modul=ruya" >Rüya Tabirleri</a></li>
<li><a href="index.php?modul=guzel_sozlerid" >Güzel Sözler</a></li>
<li><a href="index.php?modul=siirler" >Şiirler</a></li>
<li><a href="index.php?modul=yemek" >Yemek Tarifleri</a></li>
<li><a href="index.php?modul=turkusozu" >Türkü Sözleri</a></li>
<li><a href="index.php?modul=oyunlar" >Oyunlar</a></li>
<li><a href="index.php?modul=fikralar" >Fıkralar</a></li>
<li><a href="index.php?modul=hikayeler" >Hikayeler</a></li>
<li><a href="index.php?modul=video" >Videolar</a></li>
<li><a href="index.php?modul=lsarkisozu" >Lyrics</a></li>
<li><a href="index.php?modul=kimdir" >Kimdir</a></li>
<li><a href="index.php?modul=nedir" >Nedir</a></li>
<li><a href="index.php?modul=astroloji" >Astroloji</a></li>

<li><a href="index.php?modul=siralamalar" >Sıralamalar</a></li>
<li><a href="index.php?modul=reklamlar" >Reklamlar</a></li>


<li><a href="index.php?modul=foto_galeri" >Foto Galeri</a></li>

<li><a href="index.php?modul=arkaplanhit" >Arka Plan Hit</a></li>

<li><a href="index.php?modul=kapak_resimleri" >Kapak Resimleri</a></li>
<li><a href="index.php?modul=wallpaper" >HD Resimler</a></li>
<li><a href="index.php?modul=tv_liste" >Canlı TV</a></li>
<li><a href="index.php?modul=fm_liste" >Radyo</a></li>
<li><a href="index.php?modul=aktuel" >Aktüel Ürünler</a></li>
<li><a href="index.php?modul=sarkisozu2" >Şarkı Sözü 2</a></li>
<li><a href="index.php?modul=faydali" >Bilgi Dünyası</a></li>
<li><a href="index.php?modul=resim_ler" >Resimler</a></li>
<li><a href="index.php?modul=resim_galerisi" >Resim Galerisi</a></li>

<li><a href="index.php?modul=resimli_sozler" >Resimli Sözler</a></li>

<li><a href="index.php?modul=quotes" >Quotes</a></li>
<li><a href="index.php?modul=fm_mobil" >Mobil Radyolar</a></li>


<li><a href="logout.php">Çıkış</a></li>






</ul>
</div> </td>
</tr>
</tbody></table>
</div>

<script type="text/javascript" src="ckeditor/ckeditor.js"></script>

<div id="sub_menu">
<li><a style="color:red" href="index.php?modul=guzel_sozler_ekle">Söz Ekle</a></li>
<li><a href="index.php?modul=guzel_sozler_ana">Güzel Sözler Anasayfa</a></li>
<li><a href="index.php?modul=guzel_sozler_sag">Sağ Menü</a></li>

<li><a href="index.php?modul=guzel_sozlerid">Güzel Sözler Son Eklenene Göre</a></li>
<li><a href="index.php?modul=guzel_sozler_kategori">Söz Kategorileri</a></li>
<li><a href="index.php?modul=guzel_sozler">Güzel Sözler Hite Göre</a></li>
<li><a href="index.php?modul=guzel_sozler_bot">Güzel Sözler Bot</a></li>
<li><a href="index.php?modul=guzel_sozler_arama">Arama Sorguları</a></li>
</div>
<div id="content">
<form method="post" action="index.php?modul=guzel_sozler_ekle&kat=266" enctype="multipart/form-data">
<input type="hidden" name="id" value="$id"> <table width="100%" border="0" cellpadding="5" cellspacing="1">
<tbody> <tr>
<td colspan="2"><h2>Yeni Güzel Söz Ekle</h2></td>
</tr>
<tr>
<td width="200">Kategori</td>
<td><select name="category" id="category">
<option value="0">Kategori Seçin</option>
<option value="203">100 Dilde Seni Seviyorum Sözleri</option>
<option value="80">8 Mart Dünya Kadınlar Günü Mesajları</option>
<option value="85">Abdülkadir Geylani Sözleri</option>
<option value="101">Ablaya Doğum Günü Mesajları</option>
<option value="86">Abraham Lincoln Sözleri</option>
<option value="51">Acı Sözler</option>
<option value="124">Acımasız Sözler</option>
<option value="88">Adam Fawer Sözleri</option>
<option value="177">Adam Gibi Sözler</option>
<option value="180">Af Dileme Sözleri</option>
<option value="206">Afilli Sözler</option>
<option value="117">Ağır Abi Sözleri</option>
<option value="183">Ağlatan Sözler</option>
<option value="165">Ahmet Haşim Sözleri</option>
<option value="254">Aile Sözleri</option>
<option value="253">Akıllı Sözler</option>
<option value="126">Alaattin Çağıl Sözleri</option>
<option value="166">Albert Camus Sözleri</option>
<option value="167">Albert Einstein Sözleri</option>
<option value="186">Aldatma Mesajları</option>
<option value="54">Aldatma Sözleri </option>
<option value="72">Alfred Capus Sözleri</option>
<option value="261">Altın Sözler</option>
<option value="133">Anlamlı Güzel Sözler</option>
<option value="5">Anlamlı Sözler</option>
<option value="1">Anneler Günü Mesajları</option>
<option value="103">Anneye Doğum Günü Mesajları</option>
<option value="168">Anton Çehov Sözleri</option>
<option value="6">Araba Arkası Yazıları</option>
<option value="158">Aret Vartanyan Sözleri</option>
<option value="105">Arkadaşa Doğum Günü Mesajları</option>
<option value="232">Arkadaşa Günaydın Mesajları</option>
<option value="233">Arkadaşa İyi Geceler Mesajları</option>
<option value="44">Arkadaşlık Sözleri</option>
<option value="73">Arzulamak Sözleri</option>
<option value="135">Aşık Edici Mesajlar</option>
<option value="119">Aşık Edici Sözler</option>
<option value="238">Aşk Acısı Sözleri</option>
<option value="255">Aşk Mesajları</option>
<option value="7">Aşk Sözleri</option>
<option value="161">Aşk Sözleri Komik Sözler</option>
<option value="2">Aşka Yön Veren Sözler</option>
<option value="55">Asker Sözleri</option>
<option value="136">Atarlı Sözler</option>
<option value="3">Atasözleri</option>
<option value="16">Atatürk Sözleri</option>
<option value="162">Attila İlhan Sözleri</option>
<option value="17">Ayrılık Sözleri</option>
<option value="196">Azeri Sevgi Sözleri</option>
<option value="130">Azim Sözleri</option>
<option value="18">Babalar Günü Mesajları</option>
<option value="106">Babaya Doğum Günü Mesajları</option>
<option value="74">Bağışlama Sözleri</option>
<option value="169">Banu Avar Sözleri</option>
<option value="228">Başarı Mesajları</option>
<option value="84">Başarısızlık Sözleri</option>
<option value="118">Başsağlığı Ve Taziye Mesajları</option>
<option value="8">Bayram Mesajları</option>
<option value="87">Bencillik Sözleri</option>
<option value="19">Beşiktaş Mesajları</option>
<option value="50">Bob Marley Sözleri</option>
<option value="198">Büyüleyici Mesajlar</option>
<option value="172">Cahit Arf Sözleri</option>
<option value="207">Can Alıcı Sözler</option>
<option value="175">Can Dündar Sözleri</option>
<option value="79">Can Yücel Sözleri</option>
<option value="204">Çekici Sözler</option>
<option value="159">Cemal Süreya Sözleri</option>
<option value="176">Cenap Şahabettin Sözleri</option>
<option value="208">Cesaret Sözleri</option>
<option value="201">Cezmi Ersöz Sözleri</option>
<option value="77">Charlie Chaplin Sözleri</option>
<option value="205">Çılgın Sözler</option>
<option value="131">Cömertlik Sözleri</option>
<option value="43">Cuma Mesajları</option>
<option value="36">Damar Sözler</option>
<option value="53">Davetiye Sözleri</option>
<option value="265">Değişik Sözler</option>
<option value="252">Delidolu Sözler</option>
<option value="137">Delikanlı Mesajları</option>
<option value="251">Derin Sözler</option>
<option value="104">Dini Sözler</option>
<option value="20">Doğum Günü Mesajları</option>
<option value="210">Dokunaklı Sözler</option>
<option value="145">Dost Kazığı Sözleri</option>
<option value="21">Dostluk Sözleri</option>
<option value="56">Dua Sözleri</option>
<option value="132">Düşünce Sözleri</option>
<option value="95">Düşündüren Sözler</option>
<option value="22">Duvar Yazıları</option>
<option value="258">Duygulu Mesajlar</option>
<option value="59">Duygusal Sözler</option>
<option value="97">Edebi Sözler</option>
<option value="200">Edip Cansever Sözleri</option>
<option value="57">Efsane Sözler</option>
<option value="89">Elif Şafak Sözleri</option>
<option value="107">Eşe Doğum Günü Mesajları</option>
<option value="23">Espirili Sözler</option>
<option value="24">Etkileyici Sözler</option>
<option value="151">Evlilik Teklifi Mesajları</option>
<option value="25">Evlilik Yıldönümü Mesajları</option>
<option value="121">Facebook Sözleri</option>
<option value="173">Farabi Sözleri</option>
<option value="202">Fatih Sultan Mehmet Sözleri</option>
<option value="96">Felsefi Sözler</option>
<option value="26">Fenerbahçe Sözleri</option>
<option value="231">Filozof Sözleri</option>
<option value="197">Fransızca Aşk Sözleri</option>
<option value="27">Galatasaray Sözleri</option>
<option value="28">Geçmiş Olsun Mesajları</option>
<option value="146">Giderli Sözler</option>
<option value="83">Gökhan Toktamış Sözleri</option>
<option value="223">Gözlerle İlgili Sözler</option>
<option value="259">Gülmek Sözleri</option>
<option value="29">Günaydın Mesajları</option>
<option selected value="266">Gurbet Sözleri</option>
<option value="127">Gurur Sözleri</option>
<option value="260">Güven Sözleri</option>
<option value="82">Güzel Aşk Sözleri</option>
<option value="138">Güzel Laflar</option>
<option value="9">Güzel Sözler</option>
<option value="179">Hacı Bektaşi Veli Sözleri</option>
<option value="153">Halaya Doğum Günü Mesajları</option>
<option value="58">Harbi Sözler</option>
<option value="122">Harika Sözler</option>
<option value="60">Hasret Sözleri</option>
<option value="211">Havalı Sözler</option>
<option value="4">Hayata Yön Veren Sözler</option>
<option value="250">Hoş Sözler</option>
<option value="212">Hüzünlü Sözler</option>
<option value="242">Hz. Adem Sözleri</option>
<option value="111">Hz. Ali Sözleri</option>
<option value="110">Hz. Muhammed Sözleri</option>
<option value="174">İbni Sina Sözleri</option>
<option value="61">İbretlik Sözler</option>
<option value="213">İhanet Sözleri</option>
<option value="30">İlginç Sözler</option>
<option value="31">İltifat Sözleri</option>
<option value="224">İntikam Sözleri</option>
<option value="76">İskender Pala Sözleri</option>
<option value="62">İslami Sözler</option>
<option value="139">İsyan Sözleri</option>
<option value="32">İyi Geceler Mesajları</option>
<option value="267">Kadınlar ile İlgili Sözler</option>
<option value="245">Kadir Gecesi Mesajları</option>
<option value="112">Kahraman Tazeoğlu Sözleri</option>
<option value="234">Kahve İle İlgili Sözler </option>
<option value="268">Kaliteli Sözler</option>
<option value="10">Kandil Mesajları</option>
<option value="214">Kanka Sözleri</option>
<option value="148">Kapak Laflar</option>
<option value="49">Kapak Sözler</option>
<option value="108">Kardeşe Doğum Günü Mesajları</option>
<option value="116">Kardeşlik Sözleri</option>
<option value="120">Karşılıksız Aşk Sözleri</option>
<option value="129">Kibir Sözleri</option>
<option value="269">Kırgınlık Sözleri</option>
<option value="140">Kısa Anlamlı Sözler</option>
<option value="222">Kısa Dini Sözler</option>
<option value="154">Kısa Süper Sözler</option>
<option value="215">Kıskançlık Sözleri</option>
<option value="63">Kızgınlık Sözleri </option>
<option value="33">Komik Sözler</option>
<option value="241">Kral Sözler</option>
<option value="67">Küçük İskender Sözleri</option>
<option value="155">Laf Sokucu Sözler</option>
<option value="181">Lokman Hekim Sözleri</option>
<option value="98">Manalı Sözler</option>
<option value="163">Mehmet Akif Ersoy Sözleri</option>
<option value="34">Mevlana Sözleri</option>
<option value="92">Mevlid Kandili Mesajları</option>
<option value="209">Muhteşem Sözler</option>
<option value="123">Müthiş Sözler</option>
<option value="100">Mutluluk Sözleri</option>
<option value="64">Mutsuzluk Sözleri </option>
<option value="35">Müzik İle İlgili Sözler</option>
<option value="37">Nasihat Sözleri</option>
<option value="78">Nazım Hikmet Sözleri</option>
<option value="141">Necip Fazıl Kısakürek Sözleri</option>
<option value="38">Nefret Sözleri</option>
<option value="230">Öğrenci Sözleri</option>
<option value="42">Öğretmenler Günü Mesajları</option>
<option value="182">Ömer Hayyam Sözleri</option>
<option value="199">Orhan Pamuk Sözleri</option>
<option value="264">Oturtan Sözler</option>
<option value="160">Özdemir Asaf Sözleri</option>
<option value="239">Özel Sözler</option>
<option value="39">Özlem Sözleri</option>
<option value="247">Özlü Aşk Sözleri</option>
<option value="14">Özlü Sözler</option>
<option value="147">Özür Sözleri</option>
<option value="263">Psikopat Sözler</option>
<option value="249">Ramazan Sözleri</option>
<option value="66">Romantik Sözler</option>
<option value="246">Sabır Sözleri</option>
<option value="191">Said Nursi Sözleri</option>
<option value="94">Sebastian Sözleri</option>
<option value="195">Şehit Sözleri</option>
<option value="240">Sempatik Sözler</option>
<option value="75">Şems-i Tebrizi Sözleri</option>
<option value="65">Seni Seviyorum Sözleri</option>
<option value="142">Serseri Sözleri</option>
<option value="257">Sert Sözler</option>
<option value="125">Sevenler İçin Güzel Sözler</option>
<option value="237">Sevgi Mesajları</option>
<option value="40">Sevgi Sözleri</option>
<option value="15">Sevgililer Günü Mesajları</option>
<option value="236">Sevgiliye Aşk Mesajları</option>
<option value="109">Sevgiliye Doğum Günü Mesajları</option>
<option value="157">Sevgiliye Günaydın Mesajları</option>
<option value="99">Sevgiliye Güzel Sözler</option>
<option value="156">Sevgiliye İyi Geceler Mesajları</option>
<option value="235">Sevgiliye Sözler</option>
<option value="256">Sevgiliye Uyku Mesajları</option>
<option value="187">Şeyh Bedreddin Sözleri</option>
<option value="188">Şeyh Edebali Sözleri</option>
<option value="262">Sihirli Sözler</option>
<option value="81">Sitem Sözleri</option>
<option value="143">Süper Sözler</option>
<option value="226">Tatlı Sözler</option>
<option value="149">Teklif Sözleri </option>
<option value="220">Terketme Sözleri</option>
<option value="194">Teröre Lanet Sözleri</option>
<option value="216">Teşekkür Mesajları</option>
<option value="171">Tevfik Fikret Sözleri</option>
<option value="152">Teyzeye Doğum Günü Mesajları</option>
<option value="68">Trabzonspor Sözleri</option>
<option value="184">Turgut Uyar Sözleri</option>
<option value="192">Ümit Yaşar Oğuzcan Sözleri</option>
<option value="128">Umut Sözleri</option>
<option value="11">Ünlülerin Aşka Dair Sözleri</option>
<option value="219">Üzücü Sözler</option>
<option value="217">Üzüntülü Sözler</option>
<option value="229">V For Vendetta Sözleri</option>
<option value="225">Vatan Sözleri</option>
<option value="93">Whatsapp Sözleri</option>
<option value="189">Yalçın Küçük Sözleri</option>
<option value="45">Yalnızlık Sözleri</option>
<option value="41">Yeni Yıl Mesajları</option>
<option value="113">Yılmaz Güney Sözleri</option>
<option value="190">Yılmaz Odabaşı Sözleri</option>
<option value="90">Yonca Ayas Sözleri</option>
<option value="144">Yunus Emre Sözleri</option>
<option value="221">Yürek Yakan Sözler</option>
<option value="170">Yusuf Hayaloğlu Sözleri</option>
<option value="227">Zaman Sözleri</option>
<option value="193">Zehir Sözler</option>

</select>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<input type="submit" name="submit" value="Kaydet" /></td>
</tr>

<td>Söz</td>
<td>
<textarea name="description" id="description">





</textarea>
<script type="text/javascript">
//<![CDATA[
CKEDITOR.replace('description', { filebrowserBrowseUrl: 'ckfinder/ckfinder.html'});
CKEDITOR.config.entities = false;
CKEDITOR.config.enterMode = Number(2);
//var editor = CKEDITOR.replace( 'description' );
//CKFinder.SetupCKEditor( editor, '/uploads/' );
//]]>
</script>

</td>
</tr>

<tr>
<td>Durum</td>
<td><input type="radio" name="status" value="1" checked /> Aktif <input type="radio" name="status" value="0"/> Pasif</td>
</tr>

<tr>
<td colspan="2"><h2>SEO (Optimizasyon)</h2></td>
</tr>
<tr>
<td>Etiket ("," virgül ile ayırmalısınız )</td>
<td><input type="text" name="etiketle" value="" size="100"></td>
</tr>
<tr>
<td colspan="2"><input type="submit" name="submit" value="Kaydet" /></td>
</tr>
</tbody></table>
</form>


</div>



<div id="footer">




</div>
</body></html>


procedure TForm1.btekleClick(Sender: TObject);
var iDoc: IHtmlDocument2;
i: integer;
ov: OleVariant;
iDisp: IDispatch;
iColl: IHTMLElementCollection;
iInputElement: IHTMLInputElement;
textField: IHTMLTextAreaElement;
field: IHTMLElement;
begin
WebBrowser2.ControlInterface.Document.QueryInterface(IHtmlDocument2, iDoc);
if not assigned(iDoc) then begin
ShowMessage(' !!!??? Nothing dowloaded ... ');
Exit;
end;
ov := 'INPUT';
IDisp := iDoc.all.tags(ov);
if assigned(IDisp) then begin
IDisp.QueryInterface(IHTMLElementCollection, iColl);
if assigned(iColl) then begin
for i := 1 to iColl.Get_length do begin
iDisp := iColl.item(pred(i), 0);
iDisp.QueryInterface(IHTMLInputElement, iInputElement);
if assigned(iInputElement) then begin
if iInputElement.Get_name = 'etiketle'
then iInputElement.Set_value(memo1.Lines[0]);
// if iInputElement.Get_name = 'description'
// password
// then iInputElement. Set_value('deneme deneme deneme deneme');
//Button.click
end;
// if iInputElement.Get_name = 'submit'
// then iInputElement.Get_form.submit;
//Webbrowser2.OleObject.Document.GetElementbyId('description').innertext:='DENEMEEE';
Caption := Webbrowser2.OleObject.Document.Title
end;
end;
end;
end;
Lord_Ares
Üye
Mesajlar: 1070
Kayıt: 15 Eki 2006 04:33
Konum: Çorlu

Re: idhttp get post

Mesaj gönderen Lord_Ares »

WebBrowser1.OleObject.Document.GetElementByname('etiketle').value:='DENEME'; olarak bir dene olmaz ise value yerine innertext olarak dene.
Eğer hala çözemezsen aşağıdakini mutlaka incelemeni tavsiye ederim.

viewtopic.php?f=2&t=27152&p=171582&hili ... me#p171583
buna bir bakarmısın. Mrmarman çok güzel anlatmış. Tam aradığın aslında linkteki kod.
jakarta2
Üye
Mesajlar: 74
Kayıt: 20 Nis 2015 06:51
İletişim:

Re: idhttp get post

Mesaj gönderen jakarta2 »

Lord_Ares Cevap için teşekkür ederim ancak.

etiketle bölümü textarea değil. Edit alan ve oraya
if iInputElement.Get_name = 'etiketle'
then iInputElement.Set_value(memo1.Lines[0]);

komutu yazdırıyor. Yazdıramadığım alan;


<td>Söz</td>
<td>
<textarea name="description" id="description">

</textarea>
<script type="text/javascript">
//<![CDATA[
CKEDITOR.replace('description', { filebrowserBrowseUrl: 'ckfinder/ckfinder.html'});
CKEDITOR.config.entities = false;
CKEDITOR.config.enterMode = Number(2);
//var editor = CKEDITOR.replace( 'description' );
//CKFinder.SetupCKEditor( editor, '/uploads/' );
//]]>
</script>

</td>
</tr>

yukarıdaki bölüm. Deneyip yazdıramadığım komutlar da bunlar. 3'ünüde denedim olmadı. Tıkandım resmen

* if iInputElement.Get_name = 'description'
then iInputElement. Set_value('deneme deneme deneme deneme');

*Webbrowser2.OleObject.Document.GetElementbyId('description').innertext:='DENEMEEE';

*Webbrowser2.OleObject.Document.GetElementbyId('description').value:='DENEMEEE';

Bu arada gönderdiğin Linkteki kodları kendime uyarladım ama o kodlar yazmadı hem edite hem de textare'ya alanları bulamadı bu şekilde...


var
Doc : IHTMLDocument2;
TumAlanlar : IHTMLElementCollection;
VeriGirisInput : IHTMLInputElement;
VeriGirisMemo : IHTMLTextAreaElement;
iSayac : Integer;
begin
if Assigned(WebBrowser2.Document) then // veya ( ... <> Nil ) şeklinde de sorabilirsiniz.
begin
Doc := WebBrowser1.Document as IHTMLDocument2;
TumAlanlar := Doc.body.all as IHTMLElementCollection;
if TumAlanlar <> Nil then // veya ( Assigned(...) ) şeklinde de sorabilirsiniz.
begin // listemiz hazır demektir.
for iSayac := 0 to TumAlanlar.Length - 1 do
begin
if ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ).TagName = 'INPUT' then
begin
VeriGirisInput := ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ) as IHTMLInputElement;
if VeriGirisInput.Name = 'etiketle' then VeriGirisInput.Value := memo1.Lines[0];
end;
if ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ).TagName = 'TEXTAREA' then
begin
VeriGirisMemo := ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ) as IHTMLTextAreaElement;
if VeriGirisMemo.Name = 'description' then VeriGirisMemo.Value := memo1.Lines[0];
end;
end;
end;
end;
jakarta2
Üye
Mesajlar: 74
Kayıt: 20 Nis 2015 06:51
İletişim:

Re: idhttp get post

Mesaj gönderen jakarta2 »

Denemediğim kod kalmadı. textarea bölümüne yazdıramıyorum. <textarea name="description" id="description"> görünüyor. ID'de, name'de aynı görünüyor ama hiç bir kod yazdırmıyor oraya delireceğim. En üstteki ile Method 'GetElementsByName' not supported by automation object hatası alıyorum.
WebBrowser2.OleObject.Document.GetElementByid('description').textfield:='memo1.Lines[0]';
WebBrowser2.OleObject.Document.GetElementByid('description').Value:='memo1.Lines[0]';
WebBrowser2.OleObject.Document.GetElementByid('description').innerhtml:='memo1.Lines[0]';
WebBrowser2.OleObject.Document.GetElementByid('description').innertext:='memo1.Lines[0]';

WebBrowser2.OleObject.Document.GetElementByname('description').innertext:='memo1.Lines[0]';
kodu ile yine Method 'GetElementsByName' not supported by automation object hatası alıyorum.

Aşağıdaki kod türü kodlar ilede yazmıyor sbmit çalışıyor, input type çalışıyor ama textarea çalışmıyor

procedure TForm1.Button5Click(Sender: TObject);
var
Doc : IHTMLDocument2;
TumAlanlar : IHTMLElementCollection;
VeriGirisInput : IHTMLInputElement;
VeriGirisMemo : IHTMLTextAreaElement;
iSayac, kac : Integer;
begin
if Assigned(WebBrowser2.Document) then
begin
Doc := WebBrowser2.Document as IHTMLDocument2;
TumAlanlar := Doc.body.all as IHTMLElementCollection;
if TumAlanlar <> Nil then
begin
kac := TumAlanlar.Length - 1;
for iSayac := 0 to TumAlanlar.Length - 1 do
begin
if ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ).TagName = 'INPUT' then
begin
VeriGirisInput := ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ) as IHTMLInputElement;
if VeriGirisInput.Name = 'etiketle' then VeriGirisInput.Value := memo1.Lines[0];
end;
if ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ).TagName = 'TEXTAREA' then
begin
VeriGirisMemo := ( TumAlanlar.Item(iSayac, EmptyParam) as IHTMLElement ) as IHTMLTextAreaElement;
if VeriGirisMemo.Name = 'description' then VeriGirisMemo.value := memo1.Lines[0];
end;
end;
end;
end;
end;




<td>Söz</td>
<td>
<textarea name="description" id="description">

</textarea>
<script type="text/javascript">
//<![CDATA[
CKEDITOR.replace('description', { filebrowserBrowseUrl: 'ckfinder/ckfinder.html'});
CKEDITOR.config.entities = false;
CKEDITOR.config.enterMode = Number(2);
//var editor = CKEDITOR.replace( 'description' );
//CKFinder.SetupCKEditor( editor, '/uploads/' );
//]]>
</script>

</td>
</tr>
ertank
Kıdemli Üye
Mesajlar: 1650
Kayıt: 12 Eyl 2015 12:45

Re: idhttp get post

Mesaj gönderen ertank »

Merhaba,

İnternette aşağıdaki gibi bir örnek buldum.
http://www.delphipages.com/forum/showth ... p?t=201952

Kod: Tümünü seç

var
  i, j: Integer;
  FormItem: Variant;
begin
  if VarIsNull(WebBrowser.OleObject.Document) or
     VarisEmpty(WebBrowser.OleObject.Document) then
    Exit();

  for i := 0 to WebBrowser.OleObject.Document.Forms.Length -1 do
  begin
    FormItem := WebBrowser.OleObject.Document.Forms.Item(I);
    for j := 0 to FormItem.Length-1 do
    begin
      if SameText(FormItem.Item(j).Name, 'aaa') then
        FormItem.Item(j).Value := 'text';
    end;
  end;
end;
Lord_Ares
Üye
Mesajlar: 1070
Kayıt: 15 Eki 2006 04:33
Konum: Çorlu

Re: idhttp get post

Mesaj gönderen Lord_Ares »

ilk dikkatimi çeken, java ile ulaşıma bir müdahale olduğu. Kodda görünene bakarak html body elamanına değil ckeditör elamanına yazdırmaya çalışıyorsunuz. Bu yüzden ulaşamıyor olabilirsiniz. İlgili java koduna işi yaptırmaya çalışıp deneyin.

Kod: Tümünü seç

<script type="text/javascript">
//<![CDATA[
CKEDITOR.replace('description', { filebrowserBrowseUrl: 'ckfinder/ckfinder.html'});
CKEDITOR.config.entities = false;
CKEDITOR.config.enterMode = Number(2);
//var editor = CKEDITOR.replace( 'description' );
//CKFinder.SetupCKEditor( editor, '/uploads/' );
//]]>
</script>
değer yazdırmak değilde değer almayı bir deneyin. Eğer değeri okuyorsanız htlm elemana ulaşıyorsunuz sorunu başka yerde aramak gerekir.
jakarta2
Üye
Mesajlar: 74
Kayıt: 20 Nis 2015 06:51
İletişim:

Re: idhttp get post

Mesaj gönderen jakarta2 »

Lord_Ares orası benim de dikkatimi çekti, acaba burası yüzünden mi yazdıramıyorum diye ama java koduna iş nasıl yaptırılıyor delphiden? Onu bir araştırayım. Çok teşekkür ederim kardeşimsin...
Lord_Ares
Üye
Mesajlar: 1070
Kayıt: 15 Eki 2006 04:33
Konum: Çorlu

Re: idhttp get post

Mesaj gönderen Lord_Ares »

Webbrowserda şöyle çalıştırıyorduk

Kod: Tümünü seç

WebBrowser1.Navigate( WideString('javascript:fonksiyon_adi();') );
Veya şu linktekini bir dene
http://delphi.about.com/od/adptips2006/ ... script.htm
Cevapla