Delphi olarak etiketlenmiş yazılar

En iyi konuk defteri

En iyi konuk defteri

PHP- Kodu: <html> <head><**** name="GENERATOR" content="Microsoft FrontPage 5.0"><**** name="ProgId" content="FrontPage.Editor.Document"><**** **********="Content-Type" content="text/html; charset=windows-1254"><**** **********="Content-Language" content="tr"><title>Yeni Sayfa 4</title></head> <body> <p><!--webbot bot="PurpleText" preview="Konuk Defteri - web sitenizi ziyaret eden konukların tepkilerini öğrenmek için bu sayfayı kullanın. Kullanıcıların gönderdiği tüm açıklamalar, varsayılan olarak, aşağıya eklenen farklı bir sayfaya ('guestlog.htm' sayfasına) yönlendirilir. Açıklamaları toplamak için farklı bir dosya kullanmak istiyorsanız, Form Özellikleri iletişim kutusunda seçili Dosya Adı'nı ve formun altındaki Ekle bileşeninin Sayfa URL'sindeki Dosya Adı'nı değiştirin." --></p><hr><p>Web sitemiz hakkında ne düşündüğünüzü bilmek isteriz. Lütfen görüşlerinizi ortak konuk defterine yazın; böylece düşüncelerinizi diğer ziyaretçilerle paylaşabiliriz.</p><form method="POST" action="--WEBBOT-SELF--">  <!--webbot bot="SaveResults" u-file="guestlog.htm" s-format="HTML/DL" s-label-fields="TRUE" s-builtin-fields="Date Time REMOTE_USER" s-form-fields -->  <h2><strong>Açıklamalarınızı Ekleyin</strong></h2>  <p><textarea name="Aciklamalar" rows="8" cols="52"></textarea></p>  <p><a href="url%20yi%20yazınız"><input type="submit" value="Açıklamaları Gönder"></a>  <a href="url%20yi%20yazınız">  <input type="reset" value="Açıklamaları Temizle"></a><br>  <br>  <em>Açıklamalarınızı gönderdikten sonra, kütüğe eklediklerinizi görmek için bu   sayfayı tarayıcınızla yeniden yüklemeniz gerekir.</em></p></form><!--webbot bot="Include" tag="BODY" u-include="guestlog.htm" --><hr><h5>Yazar bilgileri buraya yerleştirilir.<br>Telif Hakkı © 2001 [Kuruluşun Adı]. Tüm Hakları Saklıdır.<br>Son düzeltme tarihi:<!--webbot bot="TimeStamp" s-type="Edited" s-format="%m/%d/%y %H:%M:%S %Z" -->.</h5> </body> </html> 

Çok güzel bir menü blogunuzda kullanabilirsiniz.

Çok güzel bir menü blogunuzda kullanabilirsiniz.

PHP- Kodu: <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd"><html><head><title>NonStop Eğlence</title><**** **********="content-type" content="text/html; charset=iso-8859-1"><**** name="generator" content="HAPedit 3.1"><style type="text/css">html,body{margin:0;padding:0}body{background: #FFF;    font: 70% Arial,sans-serif}div#menu{float:left;width: 100%;padding-top:120px;background: #002455}ul#nav,ul#nav li{list-style-type:none;margin:0;padding:0}ul#nav{margin-left: 100px;width:650px}ul#nav li{float:left;margin-right: 3px;text-align: center}ul#nav a{float:left;width: 8em;padding: 6px 0;text-decoration:none;color: #222}ul#nav a:hover{color: #000}ul#nav li.activelink a{background: #FFF}ul#nav li.activelink a,ul#nav a:hover{color: #000;font-weight:bold}li#home a{background: #FF749C}li#who a{background: #DF3694}li#prod a{background: #4D80FF}li#serv a{background: #80FF4D}li#cont a{background: #FFCB4D}</style><link rel="stylesheet" type="text/css" href="niftyCorners.css"><link rel="stylesheet" type="text/css" href="niftyPrint.css" media="print"><script type="text/javascript" src="niftycube.js"></script><script type="text/javascript">window.onload=function(){Nifty("ul#nav a","top");}</script></head><body><div id="menu">    <ul id="nav">        <li id="home" class="activelink"><a href="#">Anasayfa</a></li>        <li id="who"><a href="Resimler.html">Resimler</a></li>        <li id="prod"><a href="oyunlar.html">Oyunlar</a></li>        <li id="serv"><a href="videolar.html">video</a></li>        <li id="cont"><a href="mailto:bugra59@gmail.com">iletisim</a></li>    </ul></div></body></html> 

Site içi arama motoru

Site içi arama motoru

PHP- Kodu: <HTML><HEAD><TITLE>z-arama-motoru(site-ici)-1</TITLE><SCRIPT LANGUAGE="JavaScript"><!-- Original:  Dion (admin_tr_06@hotmail.com) --><!-- Web Site:  www.clup.6te.net --> <!-- Beginvar item = new Array(); /* Here is where all the magic happens.      Just enter as many additional pages that    that you want to search, then fill in the    additional listings for each page.*/ // "Page Name","path","Page Title","Many,Key,Words","Descriptive Comments" c=0; item[c]=new Array("index.html","","DemoSite","index,main,start,home,front","Demonstration search engine data about an imagined but probable internet site.");c++; item[c]=new Array("about.htm","","About Me","about,author,contact,email,who","Contact details and general information about the creator of the site and what the site is about.");c++; item[c]=new Array("links.htm","","Links page","links,more,where,similar,friends","Links to my favourite sites which I find interesting. Other friends sites which have similar interests to my own.");c++; item[c]=new Array("main.htm","main/","Main Page","content,main,focus","The main part of my site which contains what you have come to see. Lots of stuff like that and more great things. All in a sub directory.");c++; item[c]=new Array("logo.jpg","main/images/","Link Logo","link,image,logo,graphic","The logo.jpg is just a small image which you can place on your site as a link to me. It''''s in a second level subdirectory."); page="<html><head><title>Search Results</title></head><body bgcolor=''''white''''><center><table border=0 cellspacing=10 width=80%>"; function search(frm) {win = window.open("","","scrollbars");win.document.write(page);txt = frm.srchval.value.split(" ");fnd = new Array(); total=0;for (i = 0; i < item.length; i++) {fnd[i] = 0; order = new Array(0, 4, 2, 3);for (j = 0; j < order.length; j++)for (k = 0; k < txt.length; k++)if (item[i][order[j]].toLowerCase().indexOf(txt[k]) > -1 && txt[k] != "")fnd[i] += (j+1);}for (i = 0; i < fnd.length; i++) {n = 0; w = -1;for (j = 0;j < fnd.length; j++)if (fnd[j] > n) { n = fnd[j]; w = j; };if (w > -1) total += show(w, win, n);fnd[w] = 0;}win.document.write("</table><br>Toplam Sonuç: "+total+"<br></body></html>");win.document.close();}function show(which,wind,num) {link = item[which][1] + item[which][0]; line = "<tr><td><a href=''''"+link+"''''>"+item[which][2]+"</a> Score: "+num+"<br>";line += item[which][4] + "<br>"+link+"</td></tr>";wind.document.write(line);return 1;}//  End --></script> </HEAD><BODY> <center> <form method=get action="javascript:void(0)" onsubmit="search(this); return false;"><tr><td><input type=text name=srchval value="" size="20"><input type=submit value="Ara"></td></tr></form> </center> <p><font face="Tahoma" size="2">Örnek olarak index, about, links, focus, image kelimelerini deneyebilirsiniz.</font></p> </BODY></HTML> 

Sayfa yükleniyor.

Sayfa yükleniyor.

PHP- Kodu: <SCRIPT language=VBScript><!-- Dim Bar, Line, SPBar = 0 Line = "|"sP = 100 Function Window_onLoad()Bar = 95sP = 10END Function Function Count()If Bar < 100 ThenBar = Bar + 1Window.Status = "Yükleniyor: " & Bar & "%" & " " & String(Bar, Line)setTimeout "Count()", SPElseWindow.Status = "Yükleme Bitti"Document.Body.Style.Display = "" End If End Function Call Count() --></SCRIPT> 

renk kodları

renk kodları