|
Bloglar / Kategorilerden Bağımsız |
|
|
<%tags = "kelime1 kelime2 kelim3e kelime4"tags2= split(tags," ")tagtane = ubound(tags2)for a=0 to tagtaneresponse.write "<a href='" & tags2(a) & ".html'>" & tags2(a) & "</a>,"next%>
Eğer veritabanından çektiğiniz bir kaç kelimeden oluşan bir veriyi kelime kelime tag lamak isterseniz
<%tags = db("cekilen_veri")tags2= split(tags," ")tagtane = ubound(tags2)for a=0 to tagtaneresponse.write "<a href='" & tags2(a) & ".html'>" & tags2(a) &am..devamı>> |
|
Aşağıdaki fonksiyonu sayfanızın başına yerleştirebilirsiniz veya bir sayfaya kayderek bu sayfayı diğer sayfalarınızın başına include edebilirsiniz.<%function karaktertemizle(veri)veri = Replace (veri ,"`","")veri = Replace (veri ,"=","")veri = Replace (veri ,"&","")veri = Replace (veri ,"%","")veri = Replace (veri ,"!","")veri = Replace (veri ,"#","")veri = Replace (veri ,"<","")veri = Replace (veri ,">","")veri = Replace (veri ,"*","")veri = Replace (veri ,"And","")veri = Replace (..devamı>> |
|
ASP sayfalarını HTML dosyaları gibi çaliştıramıyorsunuz malesef bunun için server da denemeniz lazım.Denediğiniz server'in da ASP destekli olmasi lazım.O yüzden yaptıklarımızı hemen IIS'de deneyebiliriz.Yaptığınız her değişikliktikten sonra server'a bağlanıp upload yapmak zorunda kalmayacaksınız.ASP dosyalarınızı eger IIS'i kurulumunda başka yere kurmadıysanız "C:\intepub\wwwroot" dizinine atacaksınız ve bakmak içinde Internet Explorer'ınızı çalıştırıp adres çubuğunuza "http://localhost" yazarsa..devamı>> |
|
Merhabalar.Yine geçende bir forumda soruldu ve yine cevabını buradan vermek istedim.Çünkü bizim amacımız herkese faydalı olabilmek.Olay çok basit.Bir form girişinde bir alan daha belirtiyorsunuz.Örneğin bir üye girişinde genelde 2 form alanı vardır.Kullanıcı Adı & şifre buna bir de Güvenlik alanı ekliyoruz ve diğer sayfada güvenlik şifresini kontrol ediyoruz.Uygulama 2 asp dosyasından oluşmakta.Kod üzerinde küçük oynamalarla kendinize göre düzenleyebilirsiniz.Form.asp________________________..devamı>> |
|
Bu işlemleri basit bir matematik işlemiyle halledebiliriz.<------------------------------ Kodun Başlangıcı ------------------------------><%Set conn = Server.CreateObject("ADODB.Connection")conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("Veritabani.mdb")set Rs = conn.execute("select * from tablo")i=1do while not Rs.eofresponse.write rs("Alan") & ", "if i mod 2 = 0 thenresponse.write "<br>"end ifi = i + 1Rs.movenextloop%><-----------------..devamı>> |
|
|
|
|
|