yeni kayıt ve s.no birleştirme
Tarih
18/12/2011 00:10
Konu Sahibi
208319
Yorumlar
7
Okunma
1406
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



208319
Aktif Üye
Kullanici Avatari
Aktif Üye
S.... C....
212
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]
Cevapla


alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
5.977
29/10/2008
Ordu
Ofis 2013 32 Bit
Bugün,15:11
Çö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.
Cevapla


208319
Aktif Üye
Kullanici Avatari
Aktif Üye
S.... C....
212
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.
Cevapla


mcmaho
Aktif Üye
Kullanici Avatari
Aktif Üye
M.... Ö....
196
09/12/2011
34
Muğla
Ofis 2003
20/09/2016,22:03
Çö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 >>>
Cevapla


208319
Aktif Üye
Kullanici Avatari
Aktif Üye
S.... C....
212
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
Cevapla


mcmaho
Aktif Üye
Kullanici Avatari
Aktif Üye
M.... Ö....
196
09/12/2011
34
Muğla
Ofis 2003
20/09/2016,22:03
Çö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 >>>
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Liste kutusu çift tıklama ile yeni form açmak nightashes 18 236 02/12/2016, 20:04 nightashes
  Mükerrer Kayıt Hk. Serkan Çevik 2 73 01/12/2016, 22:37 Serkan Çevik
  Form Açıldığında Yeni Kayda Gitme Problemi ferhatozge 6 200 30/11/2016, 15:53 ferhatozge
  Aynı Kişi adı ile Yeni Kayıt eklemek Mesut Kaytan 6 225 29/11/2016, 13:49 Mesut Kaytan
  Aynı Ürün Koduna ait kaydın son alanındaki değeri,yeni kayıtta ilk alanına yazdırmak yenginoglu 2 63 23/11/2016, 08:49 yenginoglu


Türkçe Çeviri: MCTR, Forum Yazılımı: MyBB, © 2002-2016 MyBB Group.
DMCA.com Protection Status
© Desing by XSTYLED| Develops by ozanakkaya