Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
13/04/2010 15:59
Konu Sahibi
numanbayulken
Yorumlar
7
Okunma
3640
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

numanbayulken

Üye
 37
 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

Kullanici Avatari

C*e*l*o*y*c*e

Uzman
ME.... B.....
 46
 3.167
 67
 29/10/2008
982
 Ankara
 Yazılım
 Ofis 2010 32 Bit
 Bugün,16:27
Çözüldü 
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



Kullanici Avatari

numanbayulken

Üye
 37
 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

Kullanici Avatari

C*e*l*o*y*c*e

Uzman
ME.... B.....
 46
 3.167
 67
 29/10/2008
982
 Ankara
 Yazılım
 Ofis 2010 32 Bit
 Bugün,16:27
Çözüldü 
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



Kullanici Avatari

numanbayulken

Üye
 37
 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

Kullanici Avatari

numanbayulken

Üye
 37
 27
 5
 17/03/2010
0
 İstanbul
 
 Ofis 2007
 12/09/2011,11:58
Çözüldü 
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


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Bir Veri Kutusunun Değerini, Başka Bir Veri Kutusuna Bağımlı Yapabilir Miyim ? A_day 10 194 18/11/2018, 22:24
Son Yorum: A_day
Çözüldü Alanlar Arası Veri Aktarma kübrashn 8 339 30/07/2018, 18:14
Son Yorum: kübrashn
Çözüldü İki Tarih Arası Rapor Almak m_demir 6 404 22/07/2018, 21:00
Son Yorum: m_demir
Çözüldü Formlar Arası Belirli Bilgilerin Aktarımı ALTANs 1 248 01/07/2018, 03:36
Son Yorum: myAccess
Çözüldü Tablolar Arası Sorguyla Toplam Ve Fark İşlemi Yapma Hk. Mr.Midnight 4 253 28/05/2018, 17:16
Son Yorum: Mr.Midnight

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2018 MyBB Group.
123444