KİMLİK formunun kapandığında olay yordamına ;
PHP Kod:
If IsNull(ID) Then
Else
If MsgBox("Ekrandaki veriler LOG_ZİYARET Altformuna aktarılsın mı ?", vbYesNo, "Onay") = vbYes Then
Forms!ZİYARET![LOG_ZİYARET Altform]!Ziyaretci_Ad_Soyad = IIf(IsNull(Ziyaretci_Ad_Soyad), Forms!ZİYARET![LOG_ZİYARET Altform]!Ziyaretci_Ad_Soyad, Ziyaretci_Ad_Soyad)
Forms!ZİYARET![LOG_ZİYARET Altform]!TC_No = IIf(IsNull(TC_No), Forms!ZİYARET![LOG_ZİYARET Altform]!TC_No, TC_No)
Forms!ZİYARET![LOG_ZİYARET Altform]!Belge_Turu = IIf(IsNull(Belge_Turu), Forms!ZİYARET![LOG_ZİYARET Altform]!Belge_Turu, Belge_Turu)
Else
End If
End If