Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
18/12/2011 00:10
Konu Sahibi
208319
Yorumlar
7
Okunma
1792
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

208319

Aktif Üye
Aktif Üye
SE.... CA....
 30
 212
 32
 08/03/2009
0
 Gaziantep
 
 Ofis XP
 20/09/2016,00:17
Çözüldü 
merhaba hayırlı geceler form da (suç no ver ve yeni kayıt ekle) butonları var ben bunların birleştirilmesini istiyorum. Yeni Kayıt Ekle butonuna bastığımda hem suç numarasını versin, hem yeni kayıt eklesin, yeni kayıt eklediğinde de imleç varsayılan sekme dizininde yansın kolay gelsin.


Ek Dosyalar
yeni kayıt ekleme ve suç no verme birleştirme.rar(84.42 KB)



Kullanici Avatari

alpeki99

Düşünmek en zor iştir...
Uzman
OL....
 38
 6.120
 162
 29/10/2008
 Bursa
 Yazılım Geliştirici
 Ofis 2010 32 Bit
 30/08/2018,18:18
Çözüldü 
Eğer elinizde iki işi yapan kod zaten varsa bunları birleştirmeniz yeterli olacaktır.


AccessTr.Net teknik konular içeren bir sitedir. Bu tip sitelerde en iyi şekilde yardım alabilmeniz için Site Kurallarını mutlaka okumanız ve buna göre hareket etmeniz lazım.

Kullanici Avatari

208319

Aktif Üye
Aktif Üye
SE.... CA....
 30
 212
 32
 08/03/2009
0
 Gaziantep
 
 Ofis XP
 20/09/2016,00:17
Çözüldü 
ben yapmaya çalıştım fakat hata aldım suç no içerisindeki formülü yeni kayıt ekleme formülünün içerisine ekledim başarılı olamadım belkide ben yanlış yapmış olabilirim doğrusunu sizlerden öğrenmek istiyorum.



Kullanici Avatari

mcmaho

Aktif Üye
Aktif Üye
MU.... ÖZ....
 198
 20
 09/12/2011
34
 Muğla
 
 Ofis 2003
 13/11/2017,23:09
Çözüldü 
access deki kodlardan pek anlamam ama.birde böyle bir bak. olmuşmu.
yeni kayıt butonuna aşağıdaki kodların hepsini yapıştır.

On Error GoTo Err_Komut96_Click
Dim ctrl As Control

DoCmd.GoToRecord , , acNewRec
For Each ctrl In Me.Controls
If ctrl.Tag = "A" Then
ctrl.Enabled = True
End If
Next
Me.SucNo = DMax("SucNo", "Tablo") + 1



Exit_Komut96_Click:
Exit Sub

Err_Komut96_Click:
MsgBox Err.Description
Resume Exit_Komut96_Click


<<< 10-HAGİ-10 >>>

Kullanici Avatari

208319

Aktif Üye
Aktif Üye
SE.... CA....
 30
 212
 32
 08/03/2009
0
 Gaziantep
 
 Ofis XP
 20/09/2016,00:17
Çözüldü 
sn. mcmaho bey olmuş fakat yeni kayda geldiğinde imleç yanmıyor tek sorun o imlecin s.no üzerinde yanması gerekiyor



Kullanici Avatari

mcmaho

Aktif Üye
Aktif Üye
MU.... ÖZ....
 198
 20
 09/12/2011
34
 Muğla
 
 Ofis 2003
 13/11/2017,23:09
Çözüldü 
en üstteki sucno yazan text kutusunda yanacak öylemi. eger öyleyse aşağıdaki kodları yapıştır...

On Error GoTo Err_Komut96_Click
Dim ctrl As Control

DoCmd.GoToRecord , , acNewRec
For Each ctrl In Me.Controls
If ctrl.Tag = "A" Then
ctrl.Enabled = True
End If
Next
Me.SucNo = DMax("SucNo", "Tablo") + 1
SucNo.SetFocus---> yanması için sadece bu kodu ekledim.


Exit_Komut96_Click:
Exit Sub

Err_Komut96_Click:
MsgBox Err.Description
Resume Exit_Komut96_Click



Ek Dosyalar
yeni kayıt ekleme ve suç no verme birleştirme.rar(113.97 KB)


<<< 10-HAGİ-10 >>>


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Yeni Kayıta Eski Verilerin Kopyalanması notrino 2 109 27/08/2018, 13:27
Son Yorum: notrino
Çözüldü Tek Seferde Alt Alta Kayıt Ekleme Sorunu Allback 4 102 25/08/2018, 08:26
Son Yorum: Allback
Çözüldü Alt Formda Yeni Kayıt Açma notrino 1 115 23/08/2018, 09:46
Son Yorum: notrino
Çözüldü Vcard İçin Resim Kayıt Zorunluluğu Olmasın access acemisi 2 98 16/08/2018, 23:47
Son Yorum: access acemisi
Çözüldü Veri Birleştirme mstfztrk 9 344 25/07/2018, 16:39
Son Yorum: ozanakkaya

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