Jump to content

SimpsoN_Bart

-=TNC.VIP=-
  • Posts

    712
  • Joined

  • Last visited

  • Days Won

    6

Posts posted by SimpsoN_Bart

  1. Selam,

    Uzantıları değiştirmiş olabilir misin? Bende jpg yaptığım zaman gayet güzel çalışıyor.

    #RequireAdmin
    #region ;**** Directives created by AutoIt3Wrapper_GUI ****
    #AutoIt3Wrapper_icon=..\test2.ico
    #endregion ;**** Directives created by AutoIt3Wrapper_GUI ****
    Dim $favDir = @DesktopDir & "\Wall\"
    
    Dim $cCounter = 0
    Dim $FindFile = FileFindFirstFile($favDir & '*.jpg')
    While 1
    	FileFindNextFile($FindFile)
    	If @error Then ExitLoop
    	$cCounter = $cCounter + 1
    WEnd
    FileClose($FindFile)
    
    $FindFile = FileFindFirstFile($favDir & '*.jpg')
    Dim $RandomNum = Random(1, $cCounter, 1)
    
    Dim $curFile
    For $i = 1 To $RandomNum
    	$curFile = FileFindNextFile($FindFile)
    	If $RandomNum = $i Then
    		ChangeDesktopWallpaper($favDir & $curFile)
    		ExitLoop
    	EndIf
    Next
    
    FileClose($FindFile)
    
    Exit
    
    Func ChangeDesktopWallpaper($bmp)
    	;===============================================================================
    	; Usage: _ChangeDesktopWallPaper(@WindowsDir & '\' & 'zapotec.bmp')
    	; Parameter(s): $bmp - Full Path to BitMap File (*.bmp)
    	; Requirement(s): None.
    	; Return Value(s): On Success - Returns 0
    	; On Failure - -1
    	;===============================================================================
    
    	If Not FileExists($bmp) Then Return -1
    	;The $SPI* values could be defined elsewhere via #include - if you conflict,
    	; remove these, or add if Not IsDeclared "SPI_SETDESKWALLPAPER" Logic
    	Local $SPI_SETDESKWALLPAPER = 20
    	Local $SPIF_UPDATEINIFILE = 1
    	Local $SPIF_SENDCHANGE = 2
    	Local $REG_DESKTOP = "HKEY_CURRENT_USER\Control Panel\Desktop"
    
    	;Don't tile -  just center
    	RegWrite($REG_DESKTOP, "TileWallPaper", "REG_SZ", 0)
    	RegWrite($REG_DESKTOP, "WallpaperStyle", "REG_SZ", 0)
    	RegWrite($REG_DESKTOP, "Wallpaper", "REG_SZ", $bmp)
    
    	DllCall("user32.dll", "int", "SystemParametersInfo", _
    			"int", $SPI_SETDESKWALLPAPER, _
    			"int", 0, _
    			"str", $bmp, _
    			"int", BitOR($SPIF_UPDATEINIFILE, $SPIF_SENDCHANGE))
    
    	Return 0
    EndFunc   ;==>ChangeDesktopWallpaper
    

     

    • Like 1
  2. $folder = "C:\Users\BART\Desktop\1\"
    If @error Then Exit
    
    $ico = "C:\Users\BART\Desktop\icon.ico"
    If @error Then Exit
    
    IniWriteSection($folder & "\" & "Desktop.ini", ".ShellClassInfo", _
    		"IconFile=" & $ico & @LF & _
    		"IconIndex=0" & @LF & _
    		"InfoTip=AutoIt RULEZZZ!")
    
    FileSetAttrib($folder & "\" & "Desktop.ini", "+H")
    FileSetAttrib($folder, "+R")

     

    • Like 1
  3. Hatalı kod aradınız hiçbir sonuç elde edemediniz ? İlgili exception array ve index ile ilgili alınan ve sıkıntılı bir hatadır. Programlamada şans eseri çalıştı diye de maalesef bişey yok :db: Visual Studio kafasına göre hata düzetlme yapmaz senin yazdığın kodun derleyicide hatasız görünmesini sağlar. Örneğin Herhangi bir interfaceden classa miras verdiğinde içindeki metotları implement etmesi için metotların içine aşağıdaki kodu yazması gibi. Bu bir hata düzetlmesi vs değildir :)

     

    public void FutureFeature()
    {
        // Not developed yet.
        throw new NotImplementedException();
    }
    • Thanks 1
  4. C# 6.0 da gelen bir özellik string.format methodunun yerine kullanılıyor geniş bir kullanımı var.

    https://docs.microsoft.com/tr-tr/dotnet/csharp/language-reference/tokens/interpolated
    http://www.ilkayilknur.com/c-sharp-6-string-interpolation

     

    • Like 1
  5. Selam @Pairs,

    String interpolation c# 6.0 da gelen güzel ve exception vermeyen bir özellik arkadaş daha düşük visual studio sürümü kullanıyorsa hata alabilir. String.Format ile de yazalım.

    string sorgu = string.Format("UPDATE Ayranci SET Ad = '{0}', Soyad = '{1}', Sehir = '{2}' WHERE Ad = '{3}'",  ad, soyad, sehir, deger);
                        
                           

    @korasoglu,

    Ufakt bir tips. Update ve Delete işlemlerinde string türlerine pek güven olmaz o yüzden mutlaka her tablonda int id sutünü primary key şeklinde olması hayat kurtarır. 

    • Like 2
  6. Muhtemelen kopyala yapıştır yaptığın için;

     

      if (MessageBox.Show("Seçili Ögeyi Silmek İstiyor Musunuz ?", "Dikkat", MessageBoxButtons.YesNo, MessageBoxIcon.Question) == DialogResult.Yes)
                    {
                        con.Open();
                        komut.Connection = con;
                        komut.CommandText = "DELETE FROM haluk WHERE Kimlik=@SNO";
                        komut.Parameters.AddWithValue("@SNO", dataGridView1.CurrentRow.Cells[0].Value.ToString());
                        komut.ExecuteNonQuery();
                        con.Close();
                        MessageBox.Show("Silme İşlemi Başarılı", "Silindi", MessageBoxButtons.OK, MessageBoxIcon.Information);
                        haluk();
                    }
                    else
                    {
                        MessageBox.Show("Silme İşlemi İptal Edildi");
                    }

     

    • Like 1
  7. Koddaki Image1.Source tipi nedir ? muhtemelen bir Stream olarak yada Byte dizi olarak kaydetmen gerekcek. Bunun içinde MemoryStream kullanman gerekir. Source u Serialize etmeyi dene yinede tam kodları görmenden dönüş tiplerini vs kesin birşey söylemek zor.

     

    https://stackoverflow.com/questions/8624071/save-and-load-memorystream-to-from-a-file
    https://stackoverflow.com/questions/10661967/saving-as-jpeg-from-memorystream-in-c-sharp

     

  8. Elbette var. :) Ben mesela format attığım windows 10 yada 7 USB sürücüsünü bilgisayarıma yüklüyorum ve aşağıda ki komutu CMD ye yapıştırıp çalıştırıyorum hemen kuruluyor.

    https://technet.microsoft.com/en-us/library/dn482069.aspx
    
    DISM /Online /Enable-Feature /FeatureName:NetFx3 /All /LimitAccess /Source:E:\sources\sxs
    
    Ben Yukarıda E sürücüsü için yazdım sen USB yada CD yansıma dosyasını hangi sürücüde ise ona yazarsan hemen yükleyebilirsin.Alternatif olarak program ekle kaldırdan da yapılabilir ama pek kullanmıyorum. :)

     

  9. Üstteki yazdığın koda istinaden şöyle değişiklik yaparsan istediğin gibi sonuç alabilirsin. 2. yazdığın kod işini gördüyse o şekilde olur tabi.

    Convert.ToDateTime(dataGridView1.Rows.Cells[6].Value.ToString()) <= DateTime.Now.ToString("dd-MM-yyyy HH:mm");

    Not: Bu arada saat formatinda eğer 24 saatlik görünmesini istiyorsan HH şeklinde kullanmak gerek hh öğleden önce öğleden sonra işlemlerinde kullanıyor yanlış hatırlamıyorsam ilk postta yazmıştım.

  10. Burada zaman desenleri var AM, PM şeklinde çevirmen gerekiyor;

    https://blogs.msdn.microsoft.com/kathykam/2006/09/29/net-format-string-102-datetime-format-string/

     

    Convert.ToDateTime(dataGridView1.Rows.Cells[6].Value.ToString()) <= DateTime.Now.ToString("dd/MM/yyyy HH:mm:ss");

     

     

    Use HH for 24 hour hours format:
    DateTime.Now.ToString("yyyy-MM-dd HH:mm:ss")

    Or the tt format specifier for the AM/PM part:
    DateTime.Now.ToString("yyyy-MM-dd hh:mm:ss tt")

     

  11. alter proc teslim (@ilce nvarchar(20))
    as
    if ISNULL( ilce,0)
    begin
    print 'böyle kayıtlı ilce yok'
    end

    else
    begin
    SELECT ilce,nerede from kargo Where ilce = @ilce and nerede = 'TESLİM EDİLDİ'

    end

    Aslında ISNULL ile yapılabilir bu işler için onu kullanır ama into ya atıp ordan da sorgulayabilirsin iş yerinde oracle kullandığım için syntax hatalı olabilir.

     ALTER PROC TESLIM(@ILCE NVARCHAR(20))
     SELECT COUNT(ilce) INTO ILCEVARMI FROM KARGO
     IF ILCEVARMI < 0
     BEGIN
     PRINT 'BOYLE BIR KAYITLI ILCE YOK'
     END
     ELSE
     BEGIN
     SELECT ilce,nerede from kargo Where ilce = @ilce and nerede = 'TESLİM EDİLDİ'
     END
            

    • Like 2
  12. Javayı katılımsız yaparken şu siteyi kullanmıştım bayağı faydalı olmuştu.

    https://www.java.com/en/download/help/silent_install.xml
    http://docs.oracle.com/javase/7/docs/webnotes/install/windows/jre-installer-options.html

    @Grameradam 'ın kurulum parametersine katılıyorum yeterli olacak. Kendi kullandığım reg kaydı;

    Windows Registry Editor Version 5.00
    
    [HKEY_LOCAL_MACHINE\SOFTWARE\JavaSoft\Java Update\Policy]
    "EnableJavaUpdate"=dword:00000000
    "EnableAutoUpdateCheck"=dword:00000000
    "NotifyDownload"=dword:00000000
    
    [HKEY_LOCAL_MACHINE\SOFTWARE\Wow6432Node\JavaSoft\Java Update\Policy]
    "EnableJavaUpdate"=dword:00000000
    "EnableAutoUpdateCheck"=dword:00000000
    • Like 2
  13. Senin için ufak bir örnek hazırladım fakat SQL Server kullandığım ve tc alanı ne tür olduğunu bilemediğim için parametre kullandım kendine göre düzenlersin. :db:

    	           SqlDataReader rdr = null;                
                    SqlConnection con = null;
                    SqlCommand cmd = null;                
                    ConnectionString cs = new ConnectionString(); //Buraya bağlantı bilgilerin olduğu class gelecek
                    con = new SqlConnection(cs.DBConn); //Buraya con string gelecek
                    con.Open();
                    string tc = "select tckimlikno from hastalar where tckimlikno=@find"; //Buraya sorgu gelecek
    
                    cmd = new SqlCommand(tc);
                    cmd.Connection = con;
                    cmd.Parameters.Add(new SqlParameter("@find", System.Data.SqlDbType.NChar, 30, "tckimlikno"));
                    cmd.Parameters["@find"].Value = txtTckimlikNo.Text;
                    rdr = cmd.ExecuteReader();
    
                    if (rdr.Read()) //Tc var mı ?
                    {
                        MessageBox.Show("Bu Kimlik Numarası Sistemde Bulunmaktadır!", "Hata", MessageBoxButtons.OK, MessageBoxIcon.Error);
                        txtTckimlikNo.Text = "";
                        txtTckimlikNo.Focus();
    
    
                        if ((rdr != null))
                        {
                            rdr.Close();
                        }
                        return;
                    }

    İşin mantığı ExecuteReader ile sorgudan gelen bir veri olup olmadığını kontrol etmek rdr.HashRow da kullanabilirsin. Ufak bir öneri daha sunalım textboxlardan gelen veriyi .text + ile sorguya bağlamak yerine yukarıda yazdığım gibi parameter.add deyip valueye textboxlarını eşitleyebilirsin. Bununla ilgili bir ara örnek hazırlayalım kolaylık sağlıyor :)

    cmd.Parameters.Add(new SqlParameter("@find", System.Data.SqlDbType.NChar, 30, "username"));
    cmd.Parameters["@find"].Value = txtUsername.Text;     
             

    • Like 3
  14. Kodlarını tam inceleyemedim abi ama [0] bir dizideki değişkenindeki ilk değeri getirir diyelim, UBound kodunu da dizi hesaplama ve dizi boyutunu döndürmek için kullanırız. Oradaki -1 verileri diziye doldurduktan sonra 0 değerinden önceki yani -1 değerini döndürmek için kullanılmış.

     

    Edit: Ufak bi açıklama daha diziler 0 dan başlar bu yüzden 10 haneli bir hücre hesaplamaya çalıştığımızda UBound ile -1 den başlatırız ve hesaplarız eğer 0 dan başlatırsak 9 tane satır döner. Umarım anlatabilmişimdir :)

    • Like 2
  15. KintaRo'nun yazdığı çalışıyor fakat case sensitive olayı yok yani büyük harfle yazdığı zaman istediğin gerçekleşmez. Hasta otomasyonu yazıyorsan sadece qwx harfleri değil diğer karakterlerde olmaması gerekir senin için ufak bişey yazdım kendine göre düzenlersin;

    Sadece Karaktere izin verir;

     

     private void textBox1_KeyPress(object sender, KeyPressEventArgs e)
            {
                const string NotAllowed = "qxwQXW1234567890~`@#$%^&*()_-+={[}]:;',!.><?/|\\";

                if (NotAllowed.IndexOf(e.KeyChar) == -1 == false)
                {
                    e.Handled = true;
                }
            }

    • Like 1
×
×
  • Create New...