formlar arası veri taşıma
Tarih
13/04/2010 15:59
Konu Sahibi
numanbayulken
Yorumlar
7
Okunma
3032
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
numanbayulken
Üye
Kullanici Avatari
Üye
27
5
17/03/2010
0
İstanbul
Ofis 2007
12/09/2011,11:58
Çözüldü 
Merhaba arkadaşlar ,

3 form arasında ileri geri yapmak istiyorum .

frmGİRİŞ ile TCKİMLİK giriyorum düğmeye basınca
frmGENEL ile ad soyad giriyorum düğmeye basınca
frmÖZEL işe yaş ve cinsiyet giriyorum .

frmÖZEL de bir hata farkedersem GENEL düğmesi ile frmGENEL formuna dönmesini istiyorum .

Ekteki dosya evet dönüyor ama ilk kayda dönüyor. Ben o an üzerinde çalıştığım tckimlik numaralı kayda dönmesini istiyorum ?

docmd.GoToRecord oması lazım sanırım ama yapamdım . YArdım ederseniz sevinirim .


2003 te olması gerekliliğinde dolayı üzerinde çalıştığım veritabanı harici bir örnek hazırlayım ekledim .


Ek Dosyalar
.rar   yazılı değere gitmesi.rar (Dosya Boyutu: 23,67 KB / İndirme Sayısı: 25)
numanbayulken, 17-03-2010 tarihinden beri AccessTr.neT
Cevapla

C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.910
29/10/2008
916
Ankara
Ofis 2010 32 Bit
Bugün,02:42
Çözüldü 
Sponsor Reklam
Ne yapmak istediğini tam bilmiyorum ama sanırım aşağıdaki kodlar işini görecektir bu kodları temel bilgiler isimli butona ekle
bukodlar ile tc noya göre genel forma döner ,kodları istedğin yerde kullanabilirsin,kolay gelsin

Dim rs As Object
DoCmd.OpenForm "frmGENEL"
Set rs = Forms!frmGENEL.recordset.Clone
rs.FindFirst "[TC_KİMLİK ]=" & Me![TC_KİMLİK ]
If Not rs.EOF Then Forms!frmGENEL.Bookmark = rs.Bookmark
DoCmd.Close acForm, Me.Name
Cevapla

numanbayulken
Üye
Kullanici Avatari
Üye
27
5
17/03/2010
0
İstanbul
Ofis 2007
12/09/2011,11:58
Çözüldü 
Sn CELOYCE teşekkür ederim .

istediğim son 1 olgu dışında çalışıyor kodlarınız .
Eğer bulamaz ise yeni kayıt açmasını nasıl yazabiliriz ?
numanbayulken, 17-03-2010 tarihinden beri AccessTr.neT
Cevapla

C*e*l*o*y*c*e
Celosoft Yazılım
Kullanici Avatari
Uzman
M.... B....
2.910
29/10/2008
916
Ankara
Ofis 2010 32 Bit
Bugün,02:42
Çözüldü 
Sponsor Reklam
Yine söylüyorum ne yapmak istedğinizi tam analmadım,böyle ayrı ayrı tablolar yaparak neden birbiri üstene kayıt yaparak gidiyorsunuz burayı açıklayın özel bir nedeni yoksa belki daha kısa ve güzel bir yol ile yapılabilir açıklayın isterseniz,birde aşağdaki kodu hata iletisi bölümüne ekleyerek sanırım açmasını sağlarsınız,ama bence eklemeden önce bir açıklama yapın acces derslerini okuyun ,sonrasında örneğinizi tekrar gözden geçirin derim .birde aşağıdaki kodları diğeri ile bir değiştirip deneyin..kolay gelsin
On Error GoTo Err_Command12_Click
Dim rs As Object
DoCmd.OpenForm "frmGENEL"
Set rs = Forms!frmGENEL.recordset.Clone
rs.FindFirst "[TC_KİMLİK ]=" & Me![TC_KİMLİK ]
If Not rs.EOF Then Forms!frmGENEL.Bookmark = rs.Bookmark
DoCmd.Close acForm, Me.Name
Exit_Command12_Click:
Exit Sub
Err_Command12_Click:
DoCmd.OpenForm "frmGENEL", acNewRec
Resume Exit_Command12_Click
Cevapla

numanbayulken
Üye
Kullanici Avatari
Üye
27
5
17/03/2010
0
İstanbul
Ofis 2007
12/09/2011,11:58
Çözüldü 
istediğim kısaca şudur ;

formlar arası geçiş yaparken eğer açılacak formda o KİMLİK NUMARASI mevcut ise o değere gitsin. mevcut değil ise yeni kayıt açsın .

tek istediğim bu cümlenin kod hali Img-grin
numanbayulken, 17-03-2010 tarihinden beri AccessTr.neT
Cevapla

numanbayulken
Üye
Kullanici Avatari
Üye
27
5
17/03/2010
0
İstanbul
Ofis 2007
12/09/2011,11:58
Çözüldü 
Sponsor Reklam
bir örnekte biri şu mantığu kullanmış

Kod:
1
2
3
4
5
6
7
8
9
10
11
12
13
If DCount("[Event ID]", "tables![Confirmation]", "='Me![EventID]'") = 0 Then
DoCmd.OpenForm "Multi-Confirmation", acNormal, , , acFormAdd
Forms![Multi-Confirmation]![Event ID] = Me![EventID]
Else
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "Multi-Confirmation"

stLinkCriteria = "[Event ID]=" & Me![EventID]
DoCmd.OpenForm stDocName, , , stLinkCriteria

End If
End Sub


saydırıyor ve eğer 0 ise kayıt açıyor
ELSE durumunda kayıda gidiyor .
Ama tam yapamamış uğraşan kişide o yüzden örnek alamadım .

DCount üzerine araştırıyoum çözümü bulursam yazarım

numanbayulken, 17-03-2010 tarihinden beri AccessTr.neT
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Sad İki Tarih Arası Sorgu Problemi AloneX 13 239 26/05/2017, 11:14 ozanakkaya
  Tablolar Arası Aktarma Sorunu kübrashn 6 146 12/05/2017, 15:22 kübrashn
Çözüldü tablolar arası veri kopyalama moskovic 6 1.162 10/04/2017, 11:11 atoz112
  İki Tarih Arası Sorgu Ve Toplama kadirba72 14 378 22/02/2017, 15:42 kadirba72
  Excel Tablosunda Tekrarlayan Kayıtları Access'e Taşıma dralioner 17 305 17/02/2017, 00:55 dralioner


Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2017 MyBB Group.
DMCA.com Protection Status