bir formdan başka bir forma geçerken

[aksoyahmet1]

arkadaşlar bir formdan başka bir forma geçerken
açık olan formdaki id e göre diğer formda da aynı
id de açabilirmiyiz.mesela tckimlik nosu 12345678911
olan birinin o an aktifken başka formdada aynı tc kimlik
nosuyla başlayabilirmi yardımcı olursanız sevinirim.

 

[modalı]

Sayın aksoyahmet1,

Bu sorunun da cevabı var forumda. Ama maalesef kimse arama yapmıyor. deneme yapmıyor ve soruların cevaplarını hep hazır bekliyor. Neyse

Private Sub Tamam_Click()
Dim BulNo As Variant
Dim frm As Form
    On Error GoTo Gozardi
For Each frm In Forms
    If frm.Name = "açılacakformunadı" Then
        GoTo cikis
    End If
Next frm
cikis:
    BulNo = Val(Me![TCNonun bulunduğu alanadı])
    frm.RecordsetClone.FindFirst "[personelno]=" & Str(BulNo)
    frm.Bookmark = frm.RecordsetClone.Bookmark
    DoCmd.Close acForm, "açıkolanformadı"  'Eğerformu kapatmak istiyorsanız. 
Exit Sub
Gozardi:
    DoCmd.Close acForm, "façıkolanformadı"
End Sub

 

[aksoyahmet1]

çok teşekkürler söylediklerinizi tutucam

 

[aksoyahmet1]

utanarak bişi daha sorucam ama başka türlü
bi sonuca ulaşamıycam.
yukardaki kodda tckimlikno suna göre açtık
ama tclimlik yoksa yeni kayıttan başlamasını
nasıl sağlayabilirim.diğer tabloda yoksa kontrol
edip yeni bir sayfada açıp diğer formdaki
tckimlik nosunu oraya otamatik yazdırabilirmiyiz.
yardımcı olursanız çok sevinirim.

 

[aksoyahmet1]

aynı zamanda diğer formu açmıyor
açık olanı kapatıyor.beceremedim
herhalde

 

[modalı]

Sayın aksoyahmet1

Haklısınız. Form açma kodu yokki yazdığım kod da.


Ezbere yazınca öyle oluyor. Basitten bir örnek ekleyin onun üstünde yapayım.

İyi çalışmalar

 

[aksoyahmet1]

örnek ekte

örneği gönderiyorum.yukarda saydıklarımı uygulaya
bilirseniz sevinirim.

 

[modalı]

Sayın aksoyahmet1,

Tablo 1 formundaki düğümeye kliklerseniz tablo2 formu tablo1 formundaki kaydın tckimlik nosuyla açılır.

İyi çalışmalar:hey:

 

[aksoyahmet1]

Çok teşekkür ederim. formu kapatarak
açması mümkün değilmi

 

[modalı]

O zaman da aşağıdaki kodu ekleyin:

DoCmd.Close acForm, "Tablo1"

İyi çalışmalar