Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
01/01/2012 22:25
Konu Sahibi
serdar_20
Yorumlar
4
Okunma
1442
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy

serdar_20

Uzman
Kullanici Avatari
Uzman
S....
190
03/12/2011
52
Erzurum
Memur
Ofis 2007
11/02/2018,19:58
Çözüldü 
Herkese iyi akşamlar. Arkadaşlar yeni bir çalışma yapmaya çalışıyorum. Bir konuda takıldım ve yardımcı olursanız sevinirim. Konuya gelince de araç bilgilerinin bulunduğu bir üst form ve buna ait işlemlerin olacağı bir alt form var. Bazı işlemlere uzun notlar girmem gerekiyor buda alt formda fazla yer kaplayacağı için bu notları farklı bir formdan girmek istiyorum. Şuan belgeno hanesini çift tıklayınca açıklama formunu açıyor ve notları yazabiliyorum. Ama benim tam anlamıyla yapmak istediğim ise; alt formda belge no girince aynı belge numarasının açıklama formunda otomatik oluşması ve alt formda belgenoya çift tıklayınca aynı kayda gitmesi. İlgilenenirseniz memnun olurum.
Ek Dosyalar
not ekleme.rar
[34.53 KB]


Cevapla

ozanakkaya

sledgeab
Kullanici Avatari
Kurucu
O.... A....
10.607
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Bugün,12:09
Çözüldü 
belgeno çift tıklama olayındaki kodu aşağıdaki kod ile değiştir.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
    DoCmd.DoMenuItem acFormBar, acRecordsMenu, 5, , acMenuVer70
    strSQL = "SELECT * FROM açıklama "
    Set rstkayit = New ADODB.Recordset
    rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
        With rstkayit
        .Find "[belge]=" & Me![belgeno]
            If Not rstkayit.EOF Then
                .Fields("belge") = Me.belgeno
                .Update
             Else
                .AddNew
                .Fields("belge") = Me.belgeno
                .Update
             End If
        End With
DoCmd.OpenForm "açıklama", acNormal, , "[belge]=" & "'" & Me![belgeno] & "'"


Cevapla

serdar_20

Uzman
Kullanici Avatari
Uzman
S....
190
03/12/2011
52
Erzurum
Memur
Ofis 2007
11/02/2018,19:58
Çözüldü 
Sayın sledgeab çok teşekkür ederim sorunum çözüldü.


Cevapla

Yandemir

Only Office 2003
Kullanici Avatari
Onursal Üye
M.... Y....
1.440
26/08/2009
487
Tekirdağ
Yazılım
Ofis 2003
10/02/2018,21:42
Çözüldü 
böyle birşey istiyorsunuz sanırım. sondaki buton içindeki kod ile çağırıyor. me.openargs ile parametre olarak belge no yollanıyor.

Ek Dosyalar
not ekleme.rar
[22.4 KB]
iki ayrı yol ile pişti olduk ozan, kod isteyen senin yöntemi kullansın kodsuz çözmek isteyen benimkini Img-grin


Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)

+rep Yollar biter Access bitmez. +rep
Cevapla

serdar_20

Uzman
Kullanici Avatari
Uzman
S....
190
03/12/2011
52
Erzurum
Memur
Ofis 2007
11/02/2018,19:58
Çözüldü 
Sayın Yandemir her iki örnekte işimi görüyor. Sona buton koymak biraz daha mantıklı.İlginiz için teşekkür ederim.


Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü Forma Ve Tabloya Ondalıklı Veri Girişi cevahir1 5 165 03/04/2018, 13:04 cevahir1
Çözüldü Farklı Tabloya Aktarma Hk. serkan1985 3 100 21/03/2018, 22:54 ozanakkaya
Çözüldü İki Farklı Tablodaki Verileri Karşılaştırma Nasıl Yapılır? seadelikur 6 171 01/03/2018, 17:38 seadelikur
Çözüldü Rapor Açmayı İptal Edilince Program Kitleniyor Ve Raporu Farklı Şekilde Açmak hegu 3 103 01/03/2018, 11:59 hegu
Çözüldü Sorgunun Sadece Boş Alanlar İçin Çalışması ertans 2 75 27/02/2018, 13:06 ertans

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.
 
 
Forum use Krzysztof "Supryk" Supryczynski addons.