Açılan Kutuda veri yoksa eklesin istiyorum, yapamadım...
Tarih
03/01/2009 18:45
Konu Sahibi
assenucler
Yorumlar
13
Okunma
4103
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.053
31/10/2008
63
İstanbul
-
14/02/2017,20:46
Çözüldü 
Sponsor Reklam
Açılan Kutuda veri yoksa eklesin istiyorum, yapamadım...

Değer forum dostları ve hocalarım;

Herkese tekrar MUTLU YILLAR...

"YonetimGiderleri" formundan aynı adlı tabloya kayıt ekliyorum. Bu formun "HizmetVerenKişi" açılan kutusu içerisinde aranan kişi yoksa, bu açılan kutuya çift tıklanınca, "HizmetVerenler" formu açılsın; Bu form aracılığı ile "Yeni Kişi" "Kaydını Eklemek" ya da "Silme" işlemini gerçekleşsin istiyorum.

Bunu 3-4 saattir yapamayınca, yeterli zamanım olmadığı için, sizlerin yardımını bekliyorum.

İlgi ve yanıtınız için teşekkürler.

İyi hafta sonları.

Selam ve sevgiler.


Ek Dosyalar Ekran Görüntüleri
   

.rar   Yardım.rar (Dosya Boyutu: 21,43 KB / İndirme Sayısı: 25)

esrefigit

Kullanici Avatari
Onursal
598
30/10/2008
359
Konya
Ofis 2003
31/01/2017,13:59
Çözüldü 
bu kodu aynen yaz
Private Sub HizmetVerenKişi_NotInList(NewData As String, Response As Integer)
Dim strSQL As String
Dim i As Integer
Dim Msg As String

If NewData = "" Then Exit Sub

Msg = "'" & NewData & "' listenizde yok." & vbCr & vbCr
Msg = Msg & "Eklemek ister misiniz?"

i = MsgBox(Msg, vbQuestion + vbYesNo, "Bilinmeyen Hizmetveren...")
If i = vbYes Then
strSQL = "Insert Into HizmetVerenler ([HizmetVerenAdı]) " & _
"values ('" & NewData & "');"
CurrentDb.Execute strSQL, dbFailOnError
Response = acDataErrAdded
Else
Response = acDataErrContinue
End If
End Sub

kişi listede yokssa sen liste içine yaz o seni uyarıp eklemek istiyormusun diye soracak eve diyince artık eklenmiş ve ve tabloya kaydedilmiş olacak
meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz

Bilgisayarcı
Atçalı
Kullanici Avatari
Onursal
657
29/01/2008
410
Antalya
Ofis 2003
01/11/2011,15:17
Çözüldü 
Sponsor Reklam
strSQL = "Insert Into HizmetVerenler ([HizmetVerenAdı]) " & _
"values ('" & NewData & "');"

Img-grin
nihayet strsql=strsql&... yazmaktan vazgeçtiğinize sevindim Eşref Bey Lol
Bana işe yarayan bir müdür göster,sana dünyayı yerinden oynatayım.
                                                                                        Descartes



esrefigit

Kullanici Avatari
Onursal
598
30/10/2008
359
Konya
Ofis 2003
31/01/2017,13:59
Çözüldü 
bu kod hazırdı zaten ah önce benim daha önce eklediğim kod deposuna bakmak aklına gelmiş olsydı
meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz

assenucler

Kullanici Avatari
Onursal
A.... S.... Ş....
2.053
31/10/2008
63
İstanbul
-
14/02/2017,20:46
Çözüldü 
Sponsor Reklam
Sayın esrefigit;

Yakın ilgi ve yanıtınız için teşekkürler.

İyi akşamlar ve hafta sonları.

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.750
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
13/02/2017,02:22
Çözüldü 
Bir metin veya açılan kutuya çift tıklayarak hazırdaki bir formu açmak neden bu kadar zor olsun ki? Arkadaş

"HizmetVerenKişi" açılan kutusu içerisinde aranan kişi yoksa, bu açılan kutuya çift tıklanınca, "HizmetVerenler" formu açılsın; Bu form aracılığı ile "Yeni Kişi" "Kaydını Eklemek" ya da "Silme" işlemini gerçekleşsin istiyorum"

demiş. Oysa siz istenen veri yoksa ekleyeyim mi diye soran ve evet deyince ekleyen bir kod yazmışsınız. Bu, duruma göre sıkıntıya sebep olacaktır. Mesela kişi eğer kaydın eklenmesi için ayrı bir form açarak bu işi manuel yapmak istiyorsa ve genel olarak şahsın olup olmadığını comboya girerek kontrol ediyorsa, kodlar sıkıcı olacaktır. Ne dersiniz?
İnadına, ille de Accesstr.net...


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Formunda Birden Fazla Bulunan Comboboxların Harflerle Açılmasını İstiyorum burhanb 6 94 16/02/2017, 11:38 burhanb
  Formumda açılan kutu içinde seçtiğim değere dayalı kayıt bul misak70 6 218 30/01/2017, 15:17 misak70
  açılan kutudaki veriyi rapora yansıtma hknct 2 99 25/01/2017, 19:25 hknct
  İl / İlçe benzeri Açılan Kutuları birbiri ile ilişkilendirme Nasimi Isgandarov 6 257 17/01/2017, 11:19 atoz112
Sad Açılan Kutu Sorunu fantali35 1 107 04/01/2017, 20:05 ozanakkaya


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