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.
Not girişi için farklı bir form oluşturma
belgeno çift tıklama olayındaki kodu aşağıdaki kod ile değiştir.
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] & "'"
Sayın sledgeab çok teşekkür ederim sorunum çö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.
iki ayrı yol ile pişti olduk ozan, kod isteyen senin yöntemi kullansın kodsuz çözmek isteyen benimkini
iki ayrı yol ile pişti olduk ozan, kod isteyen senin yöntemi kullansın kodsuz çözmek isteyen benimkini
Murat YANDEMİR ( PyramiD YAZILIM Uluslar Arası Nakliye Programları )
Bilgisayar Programcısı (1989'dan beri)
Bilgisayar Programcısı (1989'dan beri)
Yollar biter Access bitmez.
Son Düzenleme: 02/01/2012, 00:10, Düzenleyen: Yandemir.
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.
Konuyu Okuyanlar: 1 Ziyaretçi