Web And Application Developer & Oracle DBA
Hakan AK
Bu kullanıcı herhangi bir kişisel bilgi paylaşmamış
AnaSayfa: http://www.hakanak.com.tr/
Jabber/Gtalk: hakanak54@gmail.com
Hakan AK tarafından yayınlananlar
Web Sitelerinde PNG Optimizasyonu
25 Ağu
MErhaba arkadaşlar biliyoruz ki png resimlerinde transparanlık verdiğimizde IE6 gibi eski tarayıcalarda sorun oluşuyor.
sorun varsa çarede var .
ilk önce wev sayfanızda <head> ile </head> arasına ;
Kod:
<!--[if lt IE 7.]> <script defer type="text/javascript" src="pngfix.js"></script> <![endif]-->
sonrada aşağıdaki dosyayı sitenin ana dizinine yükleyin.
Dosyayı indirmek için buraya sağ tıklayın ve FARKLI KAYDET’i seçin.
kolay gelsin
iyi çalışmalar.
43 views
Namaz Vakitleri Çekme
25 Ağu
Merhaba ARkadaşlar şuanda yapmakta olduğum bir firma rehberinde lazım olmuştu.
hemen paylaşayım dedim.
çalışan halini görmek için www.adapazarinet.com
Kodu:
PHP- Kodu:
<%
Public Function VeriAl(strGelen)
Set objVeriAl = Server.CreateObject("Microsoft.XMLHTTP")
objVeriAl.Open "GET" , strGelen, FALSE
objVeriAl.sEnd
VeriAl = objVeriAl.Responsetext
SET objVeriAl = Nothing
End Function
strAdres = "http://www.vakitci.com/vakit.php?id=46"
strVeri = VeriAL(strAdres)
imsak=InStr(strVeri,"İmsak</td>" )
strImsak=Mid(strVeri,imsak+60,4)
gunes=InStr(strVeri,"Güneş</td>" )
strGunes=Mid(strVeri,gunes+61,4)
ogle=InStr(strVeri,"Öğle</td>" )
strOgle=Mid(strVeri,ogle+60,4)
ikindi=InStr(strVeri,"İkindi</td>" )
strikindi=Mid(strVeri,ikindi+61,5)
aksam=InStr(strVeri,"Akşam</td>" )
straksam=Mid(strVeri,aksam+60,5)
yatsi=InStr(strVeri,"value=""ezan.mp3""" )
stryatsi=Mid(strVeri,yatsi+92,5)
%>
İmsak: <%= strImsak %><br>
Güneş: <%= strGunes %><br>
Öğle : <%= strOgle %><br>
İkindi : <%= strikindi %><br>
Akşam : <%= straksam %><br>
Yatsı: <%= stryatsi %><br>
Kolay gelsin ..
56 views
Güncel Döviz Kurları
25 Ağu
Merhaba arkadaşlar
aşağıdaki örneğimizle
Dolar ve Euro dövizlerini sitemizde dinamik olarak gösterebiliriz…
PHP- Kodu:
<%
Public Function VeriAl(strGelen)
Set objVeriAl = Server.CreateObject("Microsoft.XMLHTTP" )
objVeriAl.Open "GET" , strGelen, FALSE
objVeriAl.sEnd
VeriAl = objVeriAl.Responsetext
SET objVeriAl = Nothing
End Function
strAdres = "http://www.tcmb.gov.tr/kurlar/today.html"
strVeri = VeriAL(strAdres)
iDolar=InStr(strVeri,"USD" )
strDolarAlis=Mid(strVeri,iDolar+39,10)
strDolarSatis=Mid(strVeri,iDolar+52,10)
iEuro=InStr(strVeri,"EUR" )
strEuroAlis=Mid(strVeri,iEuro+39,11)
strEuroSatis=Mid(strVeri,iEuro+52,11)
%>
Dolar Alış için; <%= strDolarAlis %>
Dolar Satış için; <%= strDolarSatis %>
EuroAlış için; <%= strEuroAlis %>
Euro Satış için; <%= strEuroSatis %>
kullanabilirsiniz…
kolay gelsin.
120 views
Asp’de Listeleme Yaparken Satır Renklendirme
25 Ağu
html de tablo yapısını biliyorsunuzdur.
PHP- Kodu:
<table>
başlık olan yeri oluşturuyoruz…
PHP- Kodu:
<tr>
<th>Başlık</th>
<th>işlem</th>
</tr>
evet başlığımız oluştu çıktısı
Başlık işlem
şimdi altında listelenecek yere sıra geldei. döngünün olacağı yer.
PHP- Kodu:
<tr>
<td><%= rec("Baslik") %></td>
<td><a href="sil.asp?id=<%= rec("id") %>">SİL</a></td>
</tr>
döngüde olan yerimizide belirttik
şimdi table bloğunu kapatıyoruz
PHP- Kodu:
</table>
bu kadar.
Not: baslik, id veritabanındaki alan adlarıdır.
yukarıdaki işlemlere görede;
<%
strMainDB = Server.MapPath(“DataCb/Data.mdb”)
Set Connection = Server.CreateObject(“ADODB.Connection”)
Connection.Open “DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=” & strMainDB
%>
<table>
<tr>
<th>Başlık</th>
<th>işlem</th>
</tr>
<%
Set rec = Nothing
Set rec = Server.CreateObject(“ADODB.RecordSet”)
rSQL = “Select Top 10 * From TabloAdi Order by id Desc” ‘ 10 yerine 20 yazarsan son 20′yi listeler // order by birincilAnahtarOlanAlanAdi Desc
rec.Open rSQL,Connection,3,3
Counter = 0
Do While (Not rec.Eof)
Counter = Counter + 1
‘ Satır Renklendirme
If Counter Mod 2 Then
CLR = “F1F6FF”
Else
CLR = “FCFDFF”
End If
%>
<tr>
<td style=”background-color:#<%= CLR %>“><%= rec(“Baslik”) %></td>
<td style=”background-color:#<%= CLR %>“><a href=”sil.asp?id=<%= rec(“id”) %>”>SİL</a></td>
</tr>
<%
rec.MoveNext : Loop
rec.Close
Set rec = Nothing
%>
</table>
aşağıdaki kod parçasıda satırlarımızı renklerndirir.
style=”background-color:#<%= CLR %>”
kolay gelsin.
159 views
