Asp ile yazdığım oyun sitemdeki
http://www.siteadi.com/oyunuoyna.asp?Oyunid=87
şelindeki url adreslerini
http://www.siteadi.com/zuma-oyunu.html
şu şekilde nasıl yapabilirim?
yardımcı olacak arkadaşlara şimdiden teşekkür ederim...
Asp ile Sef link nasıl yapılır?
6
●4.266
- 17-08-2010, 23:36:52Eposta Aktivasyonu Gerekmekte<%Function Bulut(strmiz)
Str = strmiz
Str = Replace(Str, Chr(199), "C" ,1,-1,0)
Str = Replace(Str, "Ç", "c" ,1,-1,0)
Str = Replace(Str, Chr(208), "G" ,1,-1,0)
Str = Replace(Str, "G", "g" ,1,-1,0)
Str = Replace(Str, Chr(214), "O" ,1,-1,0)
Str = Replace(Str, "O" , "o" , 1,-1,0)
Str = Replace(Str, "Ö", "o" ,1,-1,0)
Str = Replace(Str, Chr(220), "U" ,1,-1,0)
Str = Replace(Str, "Ü", "u" ,1,-1,0)
Str = Replace(Str, Chr(221), "I" ,1,-1,0)
Str = Replace(Str, "I", "i" ,1,-1,0)
Str = Replace(Str, Chr(222), "S" ,1,-1,0)
Str = Replace(Str, "S", "s" ,1,-1,0)
Str = Replace(Str, Chr(231), "c" ,1,-1,0)
Str = Replace(Str, "ç", "c" ,1,-1,0)
Str = Replace(Str, Chr(240), "g" ,1,-1,0)
Str = Replace(Str, "g", "g" ,1,-1,0)
Str = Replace(Str, Chr(246), "o" ,1,-1,0)
Str = Replace(Str, "ö", "o" ,1,-1,0)
Str = Replace(Str, Chr(252), "u" ,1,-1,0)
Str = Replace(Str, "ü", "u" ,1,-1,0)
Str = Replace(Str, Chr(253), "i" ,1,-1,0)
Str = Replace(Str, "i", "i" ,1,-1,0)
Str = Replace(Str, Chr(254), "s" ,1,-1,0)
Str = Replace(Str, "s", "s" ,1,-1,0)
Str = Replace(Str, "<span>", "" ,1,-1,0)
Str = Replace(Str, "</span>", "" ,1,-1,0)
Str = Replace(Str, " ", "-" ,1,-1,0)
Str = Replace(Str, "+", "" ,1,-1,0)
Str = Replace(Str, "'", "" ,1,-1,0)
Str = Replace(Str, "´", "" ,1,-1,0)
Str = Replace(Str, ",", "" ,1,-1,0)
Str = Replace(Str ,";","" ,1,-1,0)
Str = Replace(Str ,":","" ,1,-1,0)
Str = Replace(Str ,"(","" ,1,-1,0)
Str = Replace(Str ,")","" ,1,-1,0)
Str = Replace(Str ,"[","" ,1,-1,0)
Str = Replace(Str ,"]","" ,1,-1,0)
Str = Replace(Str ,"/"," " ,1,-1,0)
Str = Replace(Str ,"\","" ,1,-1,0)
Str = Replace(Str ,"`","" ,1,-1,0)
Str = Replace(Str ,"=","" ,1,-1,0)
Str = Replace(Str ,"-"," " ,1,-1,0)
Str = Replace(Str ,"&","" ,1,-1,0)
Str = Replace(Str ,"%","" ,1,-1,0)
Str = Replace(Str ,"+","" ,1,-1,0)
Str = Replace(Str ,"!","" ,1,-1,0)
Str = Replace(Str ,"#","" ,1,-1,0)
Str = Replace(Str ,"<","" ,1,-1,0)
Str = Replace(Str ,">","" ,1,-1,0)
Str = Replace(Str ,"*","" ,1,-1,0)
Str = Replace(Str ,"And","" ,1,-1,0)
Str = Replace(Str ,"'","" ,1,-1,0)
Str = Replace(Str ,Chr(34),"" ,1,-1,0)
Str = Replace(Str ,Chr(39),"" ,1,-1,0)
Str = Replace(Str ,".","" ,1,-1,0)
Str = Replace(Str ,"?","" ,1,-1,0)
Str = Replace(Str ,",","" ,1,-1,0)
Str = Replace(Str ," ","-" ,1,-1,0)
Str = Replace(Str ,"__","-" ,1,-1,0)
Str = Replace(Str ,"--","-" ,1,-1,0)
Str = Replace(Str ,"'" , "-",1,-1,0)
Bulut = Str
End Function%>
<%
<a href="oyunuoyna.asp?Oyunid=<%=data("id")%>&<%=Bulu t(data("oyunadi"))%>">Oyun Linki</a>
%> - 18-08-2010, 00:08:09Üyeliği durdurulduÜstteki mesajla alakası yok...
2 metot geçerli şu an bu iş için.
404 hata sayfaları ile yapabilirsin. Yazımın sonunda 1-2 kod atacağım.
Ya da siten windows 2008 server üzerinde kuruluysa, hosting sağlayıcından bedava olan url rewrite'ı iis.net'ten indirip kurmasını isteyebilirsin.
-----
Plesk panel kullanıyorsan, hosting ayarlarından hata sayfaları seçeneği var en altta, onu işaretle. Sonra filemanagerdan hata sayfalarını bul. Yukarıda tab olarak sıralanıyor normalde. Oradan 404leri url seçeneğini seçerek /404.asp olarak ayarla.
<% Dim strURL Dim strBolum Set strURL = Request.ServerVariables("QUERY_STRING") strBolum = Split(strURL,"/") If strBolum("3") = "asp" Then 'göster ElseIf strBolum("3") = "sql" Then 'göster ElseIF strBolum("3") = "odbc" Then End If %>Deneyerek görebilirsin.
Sunucu sana aitse daha kolay yaparsın.
Takılırsan bu konuda sana detaylı şekilde yardımcı olacağım. - 18-08-2010, 00:17:12Eposta Aktivasyonu GerekmektePhantasm adlı üyeden alıntı: mesajı görüntüle
Alakasımı yok ? Kullanıyorum şuanda.Önemli olan linkin adının - lerle yazılması ise yukardaki işlemde geçerlidir.
404 hata sayfasıyla yapmakta doğrudur ama onu herkes yapamıyor.Arkadaşın ikinci mesaj olarak ben bunu beceremedim diye dönmemesi için bunu yazdım.Kolay gelsin. - 18-08-2010, 02:41:46Üyeliği durdurulduAdres = Request.ServerVeriables("QUERY_STRING")
Burada Adres isimli değişkene eşitlediğim kod, Bize o anki sayfanın adresini verecektir.
404;http://localhost/ diye bir çıktı verir. Eğer localhost/oyun.htm gibi bir link vermişsek o zamanda sonuna /oyun.htm yazacaktır.
Burada mantık, Split kullanarak " / " (taksim) karakterlerini bölüp "x" den başlayarak ne olduğunu bulmamızdır. Split kullanımını biliyorsanız çok kolay bir şekilde yapabilirsiniz. Örnek olması için:
Adres = Request.ServerVeriables("QUERY_STRING")
strTaksim = split(adres,"/") ' burada taksim işaretlerini bölüdük. Adresimiz şöyle olsun:
404;http://localhost/oyun.htm
Kırmızı kısım strTaksim(0) 'dır.
Kahverengi olan / işareti strTaksim(1) 'dir
Mavi Olan yer strTaksim(2) 'dir
Siyah olan yer strTaksim(3) 'dür.
Bizim işimiz 3. den (x) sonra başlıyor. Bundan sonra if - else - endif döngüsünü kullanacağız. Devam Edelim.
if strTaksim(3) = "oyun.htm" then ' Eğer 3. / den sonra oyun.htm varsa
Response.write "Oyun Bölümü" 'bunu yaz dedik. Burayı include file="xxxx.asp" ile belirtebiliriz.
elseif strTaksim(3) = "Anasayfa" then 'yine 3. / dan sonra Anasayfa diye birşey varsa
response.write "anasayfa burası" 'bunu yaz dedik. Bunun linkide http://localhost/Anasayfa gibi olur
elseif strTaksim(4) = "Oyna" then 'burda 4. taksimi kullandım. Linkimiz http://localhost/deneme/Oyna ise yani 4.nün Oyna olması gerek
response.write "oyna bölümü"
else
Response.write "Hiçbiri değilsede Bu uyarıyı göster
end if
___________________________________
Eğer, veritabanı ile işlem yapıyorsak değişecek kısım sadece SQL sorgusudur. Linkimiz, /oyun/12 olsun (12, veritabanındaki ID değeri). O zaman 404 sayfamıza:
if strTaksim(3) = "oyun" then
<!--#include file="oyunsayfasi.asp"--> oyunsayfasi.asp yi include ettik.
bu sayfada ise,
' veritabanı bağlantısı yaptıktan sonra (Baglanti isimli değişken)
set rs = server.createobject("ADODB.recordset")
SQL = "select * from tablon where id="&strTaksim(4)&""
rs.open sql,baglanti,1,3
' ve sayfaya yazdıracakların.
Kırmızı olarak belirttiğim yerde biz genel olarak "id" yazarız. Anlamadığın yer olursa konu altından sorabilirsin. Umarım açıklayıcı olmuşumdur