Hakan ŞEN Kişisel Günce - Kategori : Makale / http://www.hakansen.com

Ağustos 7

ASP inStr fonksiyonu

Yorumlar (1) Tarih : 7 Ağustos 2007 Salı Saat: 20:40:26
Kategoriler : Makale, Programlama
Etiketler : instr, asp, vb, function, fonksiyon

ASP de çok sık kullanılan fonksiyonlardan bir tanesi inStr`dir.

Kod:
InStr ([Kaçınıcı Harften,] Neyinİçinde, Neyi, Nasıl)


Bir string ifade içindeki aranacak olan başka bir string ifadenin kaçıncı pozisyonda olduğunu belirler.

Kullanımı;
Kod:
InStr (Başlangıç, aranacak ifade, aranan_ifade)


Örneğin;
HAKAN ŞEN kelimesi içinde ş harfinin kaçıncı pozisyonda olduğunu bulalım;
Kod:
Deger=InStr (1, "HAKAN ŞEN", "Ş")

Geri dönen değer 7 dir. Burada HAKAN ŞEN ifadesi içinde 1. harfden başlayarak Ş harfinin kaçıncı eleman olduğunu bulduruyoruz.

Ağustos 7

İller ve İlçeler Veritabanı (MS Access & Mysql)

Yorumlar (5) Tarih : 7 Ağustos 2007 Salı Saat: 01:32:07
Kategoriler : Referanslar, Makale, Programlama, Diğer
Etiketler : ms access, mysql, türkiye, iller, il, ilçeler, ilçe, veritabanı

Hazıylayacağım bir site için iller ve ilçelerin bulunacağı bir veritabanına ihtiyaç duydum, ve araştırmalarım sonucunda bir veritabanı oluşturdum.

Veritabanını http://www.hakansen.com/Kod/il-ilce-veritabani.asp adresinde bulabilrisiniz.

Hem Mysql hemde mdb mersiyonu mevcuttur.

Ağustos 6

xmlHTTP ile url kontrolü

Yorumlar (1) Tarih : 6 Ağustos 2007 Pazartesi Saat: 21:14:49
Kategoriler : Makale, Programlama
Etiketler : xml, xmlhttp, asp, url kontrolü, fonksiyon,

xmlHTTP Kullanarak sorgulanmak istenen URL`nin var olup olmadığını kontrol etmek mümkündür.

kayit.kisaltiyor.us adresinde kısaltılacak urller girildiğinde öyle bir adresin var olup olmadığını kontrol etmek için kullanıyordum, bir yerlerde işinize yarayabilir.

Kod:
    Function GETHTTP(adres)

               On Error Resume Next 

          Set StrHTTP = Server.CreateObject("MSXML2.ServerXMLHTTP") 

               StrHTTP.Open "GET" , adres, False 

               StrHTTP.sEnd 

                    If Err.Number = -2147012889 Then 

                    Mesaj =   "<font style=""color:red;"">DNS Yanıt vermiyor, Siteye ulaşılamadı</font>"

                    ElseIf Err.Number = -2147012867 Then 

                    Mesaj =   "<font style=""color:red;"">Url Bulunamadı</font>"

                    Else

                    Mesaj = "Url Bulundu Çalışıyor"

                    End If

               GETHTTP = Mesaj 

          Set StrHTTP = Nothing 

     End Function 





strUrl = Request("url")

If strUrl = "" Then strUrl = "www.hakansen.com"

If Mid(strUrl,1,7) <> "http://" Then strUrl = "http://"&strUrl



Veri = GETHTTP(strUrl)

Response.Write Veri


strUrl değişkenini request("url") nesnesi ile aldık ama bunu başka bir siteden input değeri ile post veya get methodu ile bir formdan gönderip de işlem yapabilirsiniz.

Ağustos 6

BinaryToString Fonksiyonu

Yorumlar (0) Tarih : 6 Ağustos 2007 Pazartesi Saat: 20:12:05
Kategoriler : Makale, Sorun Giderme, Programlama
Etiketler : BinaryToString, xmlhttp, binary, string, fonksiyon, asp

Binary verileri stringlere çevirmeye yarayan bir fonksiyon, xmlHTTP ile veri çektiğimizde gelen binary verileri süzmemize yarayacaktır.

Kod:
Private  Function BinaryToString(Binary) 

     Dim  cl1, cl2, cl3, pl1, pl2, pl3 

     Dim  L 

        cl1 = 1 

        cl2 = 1 

        cl3 = 1 

        L = LenB(Binary) 

 

     Do  While cl1<=L 

          pl3 = pl3 &  Chr(AscB(MidB(Binary,cl1,1))) 

          cl1 = cl1 + 1 

          cl3 = cl3 + 1 

          If  cl3>300  Then 

                     pl2 = pl2 & pl3 

                     pl3 = "" 

                     cl3 = 1 

                     cl2 = cl2 + 1 

                      If  cl2>200  Then 

                             pl1 = pl1 & pl2 

                              pl2 = "" 

                              cl2 = 1 

                      End  If 

                  End If 

     Loop 

     BinaryToString = pl1 & pl2 & pl3 

 End Function

Ağustos 6

Regsvr32 Kullanımının ve Hata İletilerinin Açıklaması

Yorumlar (2) Tarih : 6 Ağustos 2007 Pazartesi Saat: 19:37:06
Kategoriler : Makale, Sorun Giderme, Programlar
Etiketler : regsvr32, regsvr32.exe, component yükleme, hata iletileri, kullanım

Kendi kendini kaydedebilen dinamik bağlantı kitaplığı (DLL) veya ActiveX Denetimi (OCX) dosyaları gibi nesne bağlama ve katıştırma (OLE) denetimlerini kaydettirmek veya kaydını silmek için Regsvr32 aracını (Regsvr32.exe) kullanabilirsiniz. Bu işlem Windows, Microsoft Internet Explorer veya diğer programlarda sorun giderme için gerekli olabilir.

Regsvr32.exe Kullanımı
RegSvr32.exe`de aşağıdaki komut satırı seçenekleri bulunmaktadır:

Kod:
Regsvr32  [/n] [/i[:komut_satırı]] dll_adı



   /u - Sunucu kaydını kaldır<BR/>

   /i - DllInstall'u isteğe bağlı [komut_satırı] geçirerek çağır;

        /u ile kullanıldığında DllUninstall'u çağırır

   /n - DllRegisterServer'ı çağırma; bu seçenek

        /i ile birlikte kullanılmalıdır

                    
Regsvr32.exe`yi kullandığınızda, bileşeni belleğe yüklemeyi ve bileşenin DLLSelfRegister işlevini çağırmayı dener. Bu deneme başarılı olursa, Regsvr32.exe aracı başarılı olunduğunu gösteren bir iletişim kutusu görüntüler. Deneme başarısız olursa, Regsvr32.exe bir hata iletisi döndürür; bu ileti bir Win32 hata kodu içerebilir.

Regsvr32.exe Hata İletileri
Aşağıdaki liste, RegSvr32 hata iletilerini ve olası nedenleri içermektedir.

Tanınmayan bayrak: /geçersiz_bayrak

Geçersiz bir bayrak veya anahtar birleşimi yazdınız (bu makaledeki "Regsvr32.exe Kullanımı" bölümüne bakın).

DLL adı belirtilmedi.

.dll dosyası adını yazmadınız (bu makaledeki "Regsvr32.exe Kullanımı" bölümüne bakın).

Dll adı yüklendi ancak DllRegisterServer veya DllUnregisterServer giriş noktası bulunamadı.

Dll adı bir .dll veya .ocx dosyası değil. Örneğin, regsvr32 wjview.exe komutunun yazılması bu hata iletisine neden olur.

Dll adı yürütülebilir bir dosya değil ve bu dosya türü için kaydettirilmiş kayıt yardımcısı yok.

Dll adı yürütülebilir bir dosya (.exe, .dll veya .ocx) değil. Örneğin, regsvr32 autoexec.bat komutunun yazılması bu hata iletisine neden olur.

Dll adı yüklendi ancak DllRegisterServer veya DllUnregisterServer giriş noktası bulunamadı.

Dll adı verilmemiş olabilir veya Dll adı`nın bozuk bir sürümü bellekte yüklü olabilir. Dosyayı algılayıp kaldırmak için Pview aracını kullanmayı düşünün.

Dll adı kendini kaydettirebilir değil veya bozuk bir sürümü bellekte yüklü.

Örneğin, regsvr32 icwdial.dll komutunun yazılması, Icwdial.dll kendini kaydettirebilir olmadığından bu hata iletisini döndürür. Dll adı`nın bozuk bir sürümünün bellekte yüklü olduğundan şüpheleniyorsanız, bilgisayarınızı yeniden başlatmayı veya dosyanın özgün sürümünü yeniden ayıklamayı deneyin. Windows NT çalıştırıyorsanız Microsoft Windows NT Server 4.0 Resource Kit`teki Kill veya Pview aracını kullanmanız gerekebilir.

OleInitialize başarısız oldu (veya OleUninitialize başarısız oldu).

Regsvr32 aracının gerekli COM kitaplığı işlevlerini çağırmadan önce COM kitaplığını başlatması ve kapanırken kitaplığı kapatması gerekir. COM kitaplığını başlatma veya kapatma denemesi başarısız olursa bu hata iletileri oluşur. Örneğin, Ole32.dll dosyası bozulmuş veya sürümü yanlış olabilir.

LoadLibrary("Dll adı") başarısız oldu. GetlastError`ün döndürdüğü: 0x00000485

Winerror.h`deki 0x00000485 = 1157 (ERROR_DLL_NOT_FOUND) hata kodu "Bu uygulamayı çalıştırmak için gereken kitaplık dosyalarından biri bulunamıyor" anlamına gelir. Örneğin, regsvr32 olmayan.dll komutunun yazılması, Olmayan.dll dosyası bulunamazsa bu hata iletisini döndürür.

LoadLibrary("Dll adı") başarısız oldu. GetlastError`ün döndürdüğü: 0x00000002

Winerror.h`deki 0x00000002 = 2 (ERROR_FILE_NOT_FOUND) hata kodu "Sistem belirtilen dosyayı bulamıyor" anlamına gelir. Başka bir deyişle, bağımlı DLL bulunamamıştır. Örneğin, Tapi32.dll (bağımlılık) eksikken regsvr32 icwdial.dll komutunun yazılması bu hata iletisine neden olur.

LoadLibrary("dskmaint.dll") başarısız oldu. GetlastError`ün döndürdüğü: 0x000001f

Winerror.h`deki 0x000001f = 31 (ERROR_GEN_FAILURE) hata kodu "Sisteme bağlı bir aygıt çalışmıyor" anlamına gelir. Bir Win16 .dll dosyasını kaydettirmeye çalışırsanız bu davranış oluşabilir. Örneğin, regsvr32 dskmaint.dll komutunun yazılması bu hata iletisine neden olur.

DllRegisterServer (veya DllUnregisterServer) Dll adı başarısız oldu. Dönüş kodu: dize

Winerror.h`de dizeyi arayın.
Üste

Regsvr32.exe ve Bağımlılıklar
RegSvr32.exe aracı Kernel32.dll, User32.dll ve Ole32.dll dosyalarına (ve Windows NT`de Msvcrt.dll ve Advapi32.dll dosyalarına) bağımlıdır. Regsvr32.exe aracı kaydettirmeye veya kaydını silmeye çalıştığınız dosyayı tüm bağımlılıklarıyla birlikte yükler. Gereken bir dosya eksik veya bozuksa işlem başarısız olabilir.

Kaydettirmeye veya kaydını silmeye çalıştığınız dosyanın bağımlılıklarını belirlemek için Depends.exe`yi kullanabilirsiniz. Depends.exe Microsoft Windows 98 Kaynak Seti ve Microsoft Windows NT 4.0 Resource Kit destek araçlarında bulunmaktadır.


eXTReMe Tracker