Yazılım Geliştirme Uzmanı & İnşaat Mühendisi
Logo Go/Tiger, Iphone, Desktop, Web, VBA Uygulamaları
Tel : 0 534 797 31 21 , Mail : baranseren@gmail.com

Bayi Ağı Arama Bölümüne JQuery ile Preloader Eklentisi 27.04.2011

Bsd Bayi Ağı içerisinde bulunan arama paneline JQuery ile Preloader uygulamasını ekledim.

Birkaç küçük bug vardı onları da düzenledim güzel işçilik oldu





Tags :


Su Damlacıkları Tamamdır 27.04.2011

Sinan Dayı gecikme için kusura bakma valla bi türlü fırsatım olmadı :)

Su Damlacıkları Anaokulu için Hazırladığım tasarım yayında...





Tags :


Bsd Otomotiv Ana Sayfasına Nivo Entegrasyonu 16.04.2011


Bsd otomotiv ana sayfasında bulunan orta kısımdaki resmin slide gösterisi şekline getirilmesi için çalışmayı tamamladım artık nivo slider destekli şekilde ana sayfada duyurular veritabanından gelecek şekilde ayarlanmıştır.




Tags :


Yönetim Panelinde Düzenleme 16.04.2011


Yönetim panellerine tiny mce editörünü ekledim. :) yazılar daha güzel olsun maksadı ile tabiki




Tags :


İşlerini en iyi yapanlar, en iyi bildikleri işi yapanlardır 15.04.2011

….İşlerini en iyi yapanlar, en iyi bildikleri işi yapanlardır…..




Tags :


Windows 2000 / 2003 e Php için ionCube Kurulumu 14.04.2011


Yapmanız gereken sadece ioncube`un setup dosyalarını indireceksiniz ileri ileri diyerek kurulumu tamamlayın c:\windows\php.ini dosyasının son satırına gelip zend extension taglarını alttaki gibi yapıştırın. [Zend] zend_extension_ts = "C:\Program Files\SWsoft\Plesk\Additional\Php\extensions\ioncube_loader_win_4.3.dll" Yüklediğiniz yerdeki ioncube_loader_win_4.3.dll nin bilgisayardaki yerini göstermeniz gerekiyor. IIS i restart edin , yapabiliyorsanız server`a reset atın. hepsi bu kadar.




Tags :


ios Programlama Kaynak Siteleri 08.04.2011

Diyarbakırda IOS programlama ve IOS Tescilli Geliştirici Firma başvurularımız tamamlanmıştır.


http://sree.cc/category/iphone


Taglar : IOS programlama , Iphone Yazılım , Diyarbakır


Tags :


PSC - NSLookup For Asp 08.04.2011

Türkticaret.NEt te iken yazmış olduğum Planet Source Code`da yayınlanan NSLOOKUP fonksiyonunu Asp içerisinden kullanmaya yarayan Fonksiyonum.


`##################################################
`NsLookup Fonksiyonumun Başlangıcı

Private Function NSlookup(strHost)
    Set oShell = Server.CreateObject("Wscript.Shell") `Shell Objecti yaratalım

    oShell.Run "%ComSpec% /c nslookup " & strHost & "> C:\" & strHost & ".txt", 0, True

    Set oFS = Server.CreateObject("Scripting.FileSystemObject")  `geçici txt belgesini açarak verileri kontrol edelim
    Set oTF = oFS.OpenTextFile("C:\" & strHost & ".txt")   `Okunan txt belgesini okuyalılm
    tempData = Null   `Verileri Null olarak ayarlıyalım
    Data = Null   `Veriler Null olarak ayarlansın
    i = 0 `Döngü için i=0 ile başlatıcaz
    Do While Not oTF.AtEndOfStream `Dosyanın Sonuna gelene Kadar devam edecek
        Data = Trim(oTF.Readline) `Sağından solundan boşluklarını alalım
            If i > 2 Then `2 kerede 2 ip numarası bize yeterli olacaktır.
                databoyut = len(data)
                data = mid(data,9,databoyut)
                IF data then
                tempData = tempData & Data & "
" `veriyi çıktı verecek şekilde ayarlıyalım.
                End IF
            End If `Koşulsonu
        i = (i + 1) `saglamaz ise i yi arttır
             `Dön
             `Kapat
    oFS.DeleteFile "C:\" & strHost & ".txt" `Sil
    Loop
    oTF.Close
    Set oFS = Nothing `Yok et
    NSlookup = tempData     `Sonuc tempdata
End Function `Fonksiyon biter .
`################################################################





Private Function whoisResult(whoisURL, strMethod, strCheckString)  
     Dim objXMLHTTP                
     Dim strWhoisResultString      
     Set objXMLHTTP = Server.CreateObject("Microsoft.XMLHTTP" )  
        objXMLHTTP.Open strMethod, whoisURL, False  
        objXMLHTTP.SEnd  
        strWhoisResultString = objXMLHTTP.ResponseText  
          
        If InStr(1,strWhoisResultString,strCheckString,vbTextCompare) Then  
             whoisResult = "Boşta"  
        ElseIf InStr(1, strWhoisResultString, "Error" , vbTextCompare) Then  
             whoisResult = "Hata!"  
        Else  
              whoisResult = "Dolu"  
        End If
             Set objXMLHTTP = Nothing
End Function  




Tags :


PSC - Database Finder 08.04.2011

Planet Source Code ` da yayınlanan klasördeki veritabanlarını bulmak için yazdığım Fonksiyon.

`**************************************

` Name: Database Finder
` Description:This code finds out the database files in folders and lists them.
` It is an open source code and can be improved.
` By: Baran SEREN
`
` Inputs:None
` Returns:Database name `Assumes:None
`
`**************************************
`#######################################
`#######################################
`# Bu Script Baran SEREN tarafından webdersleri.com üyelerinin Asp eğitimleri bölümünde Dosya #
`# Sistem Nesnesinin Kullanımını örneklemek için Molly e verilen ödev olan Veritabanını bulan bir #
`# Fonksiyon yazma Ödevinin cevap dosyasıdır. Uygulama da kullanılan tüm kodlar örnek olarak #
`# yazılmıştır. Genel olarak File System i açıklayan bu örnek orjinal haliyle eğitim materyali olarak #
`# Kullanılabilinir. #
`#######################################

Function VeritabanisimleriniGosteren(Klasoryolu)
Set FileSystemObject=Server.CreateObject("Scripting.FileSystemObject")
Set Klasor=FileSystemObject.GetFolder(Server.Mappath(Klasoryolu))
Set KlasordekiDosyalar=Klasor.files
For Each Dosya in KlasordekiDosyalar
If UCase(FileSystemObject.GetExtensionName(Dosya))="MDB" Then
DatabaseName = (Dosya.Name)
Response.Write DatabaseName & "
End iF 
Next 
Set KlasordekiDosyalar=Nothing 
Set Klasor=Nothing 
Set FileSystemObject=Nothing 
End Function



Tags :


Fenni Muayene İşkencesi 07.04.2011


Fenni Muayene Çilesini de atlattık 2013 e kadar rahatız.

Gereklilikler konusunda yazı ekleyebilirim ama şehir içinde 120 km yol yaptıran TÜV e helal olsun diyorum
- Vergi Borcunuz olmayacak
- Tüp varsa sızdırmazlık için aracınızın tüp markası neyse oradan iyicene sızdırma konusunda baktırın
- Fren balatalarınızı değiştirin
- Farlarınızı ayarlattırın.
- Trafik Sigortanız yoksa yaptırın.

Mühendisler Odasına gidip tüp sızdırmazlık belgesi alıyorsunuz ( 25 YTL )
Muayene için gecikme zammı ile birlikte ( 180 TL )
Bakım felan filan için ( 300 TL )
Toplamda : 600 TL civarı gidiyor bilgilerinize.




Tags :