folder Tahribat.com Forumları
linefolder Visual Basic - Basic - PicBasic ve Türevleri
linefolder Vb6 Da Access Deki Herhangi Bir Veriyi Almak ?



Vb6 Da Access Deki Herhangi Bir Veriyi Almak ?

  1. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ZodoR
    ZodoR's avatar
    Kayıt Tarihi: 26/Ocak/2010
    Erkek

    vb6 da mdb ile bağlantı kurdum verilerin tümünü alabiliyorum yazma işlemi yapabiliyorum ama mesela 5 tane satır 5 tane stun var tabloda ben bu verilerin içinde 1 tane değeri almak istiyorum mesela 1. satır 1.stundaki veriyi yazdırmak istiyorum nasıl yapabilirim ?

  2. KısayolKısayol reportŞikayet pmÖzel Mesaj
    wking
    wking's avatar
    Kayıt Tarihi: 28/Mart/2010
    Erkek

    Mantık şu olacak;

    "select top 1 tablo_fieldı from tablo_adı"

    Bu sorgudaki tablo_fieldı yerine almak istediğin kolon adını tablo_adı yerine veriyi çekmek istediğin tablonun adını yazacaksın. İstersen sonuna where koşulu da eklersin...

  3. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ZodoR
    ZodoR's avatar
    Kayıt Tarihi: 26/Ocak/2010
    Erkek

    deniyorum takıldığım yer olursa tekrar yazarım

  4. KısayolKısayol reportŞikayet pmÖzel Mesaj
    nurk
    nurk's avatar
    Üstün Hizmet Madalyası
    Kayıt Tarihi: 15/Eylül/2006
    Erkek

    "select * top 5 from tabloadi where sutun_adi=" &" 'Sütündaki veri' "

    örnekle gösterirsek ;

    "select * top 5 from uyeler where isim=" &" 'Ahmet' "

    üyeler tablosunun isim sütünündaki ahmet ismindeki elemanların 5 tanesini çeker.


    [22817//kaanabak]
  5. KısayolKısayol reportŞikayet pmÖzel Mesaj
    31 yaşında emekli
    ajan1111
    ajan1111's avatar
    Kayıt Tarihi: 25/Ağustos/2005
    Erkek

    hocam daha yolun başındasın anlaşılan vazgeç.

    vb6+access kadar lanet bişey yok. delphi veya .net filan öğren daha iyi.

    benim pc programcılığını bırakmamın nedeni bu ikilidir yaa...


    Kayalardan kayarım yoktur benim ayarım (;
  6. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ZodoR
    ZodoR's avatar
    Kayıt Tarihi: 26/Ocak/2010
    Erkek

    arkadaşlar biyerde daha takıldım yardım lütfen daha anlattığınız yerlere bile gelemedim :S

     

    Öğrenme amaçlı değil ilk defa uğraşıyorum bi arkadaşım için muhasebe yazılımı gibi bişey kodları vereyim alta hatayı göstericem

    ilk vb ile uğraşım eğer saçma sapan hatalar varsa maruz görün :D

     

    Private Sub Command1_Click()
    Adodc1.Recordset!tarih = fatura_tarih.Text     ' Burda hata alıyorum. boş satır eklenemiyor satırda en az 1 stun olması gerekiyo diyo ama benim mdb de stun varr
    Adodc1.Recordset!no = fatura_no.Text
    Adodc1.Recordset!fis = fis_no.Text                   fatura_tarih yani sağdakiler benim database deki stun isimlerim doğrumu yazdım bilmiyorum.
    Adodc1.Recordset!tutar = Tutarı.Text
    Adodc1.Recordset!kdv = kdv.Text
    Adodc1.Recordset!toplam = toplam.Text
    Adodc1.Recordset!alacak = alacak.Text
    Adodc1.Recordset!borc = Borç.Text
    Adodc1.Recordset!bakiye = bakiye.Text
    Adodc1.Recordset!acıklama = Açıklama.Text
    Adodc1.Recordset!odemesekli = odeme_sekli.Text

    Adodc1.Recordset.Update
    End Sub


    Private Sub Command2_Click()
    Adodc1.Recordset.Delete
    End Sub


    Private Sub Command3_Click()
    Adodc1.Recordset.AddNew
    End Sub

    Private Sub Command4_Click()

    kdv.Text = Val(tutar.Text) * 0.18
    toplam.Text = (Val(tutar.Text) * 0.18) + Val(tutar.Text)
    bakiye.Text = (Val(tutar.Text) * 0.18) + Val(tutar.Text) + Val(alacak.Text) - Val(borc.Text)

    End Sub

    Private Sub Form_Activate()
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Users\****\Desktop\database.mdb;Persist Security Info=False"
    Adodc1.CommandType = adCmdText
    Adodc1.RecordSource = "SELECT * FROM sirket"
    Adodc1.Refresh
    End Sub


  7. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ZodoR
    ZodoR's avatar
    Kayıt Tarihi: 26/Ocak/2010
    Erkek

    cevap yokmu konu up !!

  8. KısayolKısayol reportŞikayet pmÖzel Mesaj
    aksata
    aksata's avatar
    Kayıt Tarihi: 28/Aralık/2009
    Erkek

    gene vb6 klasiği C#.net tavsiyemdir:)


    Bazıları özgürlüğü sadece kendileri gibi düşünenlere reva görüyor...
  9. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ZodoR
    ZodoR's avatar
    Kayıt Tarihi: 26/Ocak/2010
    Erkek

    üstteki sorunu çözdüm.

     

    sizin dediğiniz gibi yaptığımda istediğim veriyi alabiliyorum ama ben son kayıtın isim kolununu seçmek istiyorum . Son kayıtı nasıl seçtircen ?

  10. KısayolKısayol reportŞikayet pmÖzel Mesaj
    ZodoR
    ZodoR's avatar
    Kayıt Tarihi: 26/Ocak/2010
    Erkek

    konu up yokmu cevap !!

  11. KısayolKısayol reportŞikayet pmÖzel Mesaj
    31 yaşında emekli
    ajan1111
    ajan1111's avatar
    Kayıt Tarihi: 25/Ağustos/2005
    Erkek

    ZodoR bunu yazdı:
    -----------------------------

    konu up yokmu cevap !!


    -----------------------------

    önce

    adodc1.recordset.movelast

    edit:

    ewet bu komut son kayıda götürüyo.

    movefirst -> ilk kayıt

    movenext -> sonraki kayıt

    moveprevius -> önceki kayıt


    Kayalardan kayarım yoktur benim ayarım (;
Toplam Hit: 5159 Toplam Mesaj: 12