Arama Motoru
PHP & ASP bölümde Arama Motoru konusu, //search.asp dosyası------------------------------------------------------------------------------
<%
'Optimize eden varlık=Toygar Dundaralp
'e-Mail= [Linkleri kayitli üyeler görebilir. Kayit olmak için Tıklayin... ]
%>
<% option ...
| |
| |||||
| Kayıt ol | Arama | Bugünki Mesajlar |
| 27.03.08, 22:41 | #1 |
| | Arama Motoru //search.asp dosyası------------------------------------------------------------------------------ <% 'Optimize eden varlık=Toygar Dundaralp 'e-Mail=[Linkleri kayitli üyeler görebilir. Kayit olmak için Tıklayin...] %> <% option explicit %> <body bgcolor=336699> <style type=text/css> a{color:white;font-family:tahoma;font-size:12;font-weight:bold} a:hover{color:#990000} </style> <font color=orange face=tahoma size=2><b> <% dim sol,sag,sayi,connobj,rsobj,sql,ara,sayiand,soland, sagand set connobj=server.createobject("adodb.connection") connobj.open("Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("denek.mdb")) set rsobj=server.createobject("adodb.recordset") ara=request.form("ara") if instr(ara,"'") then ara=replace(ara,"'","") end if if instr(ara," and ") then ara=replace(ara," and ","|") sayiand=instr(ara,"|") soland=left(ara,sayiand-1) sagand=mid(ara,sayiand+1) sql="select site,bilgi from denek where kelime1 like '"&soland&"' or kelime2 like '"&soland&"' or " &_ "kelime3 like '"&soland&"' or kelime4 like '"&soland&"' or kelime1 like '"&sagand&"' or " &_ "kelime2 like '"&sagand&"' or kelime3 like '"&sagand&"' or kelime4 like '"&sagand&"'" elseif instr(ara,"*") then sol=left(ara,1) sag=right(ara,1) sayi=len(ara)-1 if left(ara,1)="*" then ara=mid(ara,2) sql="select site,bilgi from denek where kelime1 like '%"&ara&"' or kelime2 like '%"&ara&"' or " &_ "kelime3 like '%"&ara&"' or kelime4 like '%"&ara&"'" elseif right(ara,1)="*" then |
| Cevap Yaz |
Arama Motoru
PHP & ASP bölümde Arama Motoru konusu, //search.asp dosyası------------------------------------------------------------------------------
<%
'Optimize eden varlık=Toygar Dundaralp
'e-Mail= [Linkleri kayitli üyeler görebilir. Kayit olmak için Tıklayin... ]
%>
<% option ...
« önceki Konu
|
sonraki Konu »
| ||||
| Konu | Konuyu Başlatan | Forum | Cevaplar | Son Mesaj |
| -->**motoru Kaputa SiĞmayanlar** | audi tt | Motorlu Araçlar Dünyası | 1 | 07.02.08 19:59 |
| Css arama motoru | kralex | Teknoloji Haberleri | 0 | 02.02.08 22:29 |
| Kendinize arama motoru yapın(resimli) | GAMZELİ | PC-Program | 0 | 02.01.08 21:17 |
| Ses Hızını 10 Kat Aşan Jet Motoru | spettro | Teknoloji Haberleri | 0 | 14.08.07 11:07 |
| Dünyanın En Hızlı Motoru | AKGÜN | Motor Dünyası | 0 | 13.07.07 12:03 |
Forum Zaman Ayarları GMT +3 olarak ayarlanmıştır.
Şu Anki Saat: 02:03 .
Şu Anki Saat: 02:03 .
