3 Nisan 2014 Perşembe

Visual Basic 6.0 ile XMLHTTP Request

Private Sub Command1_Click()
    Dim sHTML
    sHTML = RequestText("http://www.tcmb.gov.tr/kurlar/today.xml")
   
    Text1.Text = sHTML
End Sub

Private Function RequestText(sURL, Optional sMethod = "GET")
    Dim XMLHTTP
    Set XMLHTTP = CreateObject("microsoft.XMLHTTP")
    sMethod = UCase(sMethod)
    XMLHTTP.Open sMethod, sURL, False
    XMLHTTP.send (Null)
    RequestText = XMLHTTP.responseText
    Set XMLHTTP = Nothing
End Function

3 Mart 2014 Pazartesi

Linux ulimit hard ve soft limit ayarlaması

1. aşağıdaki satır /etc/security/limits.conf dosyasına eklenir
kullanıcı_adı hard nofile 65536

2. daha sonra kullanıcı_adı ile login olunur

.bashrc ve .bash_profile dosyalarına aşağıdaki satırlar eklenir

echo "ulimit -n 65536" >> .bashrc ; echo "ulimit -n 65536" >> .bash_profile

3. logout ve login işlemi sonrasında yeni ulimit değerleri set edilmiş olacaktır