Metin kutusuna tıklanınca liste kutusunun seçili olması
Tarih
26/04/2014 17:43
Konu Sahibi
akdemir1
Yorumlar
6
Okunma
1590
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



akdemir1
Aktif Üye
Kullanici Avatari
Aktif Üye
T.... S....
189
05/06/2011
11
Erzurum
Ofis XP
13/10/2016,21:30
Çözüldü 
Merhaba,

Uygulamanın F_URUN formunda sürekli form ve hemen altında bir liste kutusu var.
Liste kutusunda tıklatığım ürünü üstteki URUN_ADI metin kutusunda seçili yapıyor eme metin kutusuna tıklayınca Liste kutusundada tıklanan ürünü seçili halde göstermesini sağlayamadım,

Yardımlarınız için şimdiden çok teşekkür ederim,

Saygılarımla..


Ek Dosyalar
.rar   akdmr.rar (Dosya Boyutu: 58,33 KB / İndirme Sayısı: 6)
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.009
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Çözüldü 
Formun kayıt kaynağındaki sorguya eklediğim "Sıra" alanını ve formdaki "URUNADI" metin kutusunun tıklandığında olayına yazılan kodu inceleyiniz.

Forma eklediğim "Metin38"i gizleyebilirsiniz.


Ek Dosyalar
.rar   listekutususeciliyapma.rar (Dosya Boyutu: 54,09 KB / İndirme Sayısı: 9)
Cevapla


akdemir1
Aktif Üye
Kullanici Avatari
Aktif Üye
T.... S....
189
05/06/2011
11
Erzurum
Ofis XP
13/10/2016,21:30
Çözüldü 
Ellerinize sağlık Ozan Bey,
Tam istediğim gibi sadece yeni bir ürün kaydetmek istediğimde hata veriyor ve VB de alttaki satırı işaret ediyor,

DoCmd.RunCommand acCmdSaveRecord

Saygılarımla..
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.009
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Çözüldü 
Kodu aşağıdaki ile değiştir.

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Private Sub Komut13_Click()

If IsNull(Metin7) Or Me.Metin7 = "" Then
MsgBox "YENİ ÜRÜN ADINI Girmediniz.", vbCritical, "ERZURUM OTOMASYON"
Me.Metin7.SetFocus
Exit Sub
End If

If Me.Metin7 = DLookup("[URUN_ADI]", "T_URUN", "[URUN_ADI]='" & Me.Metin7 & "'") Then
MsgBox Me.Metin7 & " -- İSİMLİ ÜRÜN DAHA ÖNCE KAYDEDİLMİŞTİR..", vbCritical, "ERZURUM OTOMASYON"
Me.Metin7.SetFocus
Me.Metin7 = ""
Else
If Me.Dirty Then
DoCmd.RunCommand acCmdSaveRecord
End If

DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO T_URUN ([URUN_ADI]) VALUES ('" & Me.Metin7.Value & "')"
DoCmd.SetWarnings True
MsgBox Metin7 & " -- İSİMLİ YENİ ÜRÜN KAYDI GERÇEKLEŞTİ TEŞEKKÜRLER..", vbOKOnly, "ERZURUM OTOMASYON"
Me.URUNADI.Requery
Me.Refresh
Me.Requery
Me.gecici = ""
Me.Metin7 = ""
Me.URUNADI.SetFocus
Me.Liste22.Requery
End If
End Sub

Cevapla


akdemir1
Aktif Üye
Kullanici Avatari
Aktif Üye
T.... S....
189
05/06/2011
11
Erzurum
Ofis XP
13/10/2016,21:30
Çözüldü 
Değiştim hocam kaydetme olayı düzeldi fakat "resim ekleme" resim silme" ve "formu kapat butonlarında hatalar oldu şimdide,
Formun kayıt kaynağının değişmesinden dolayımı oldu anlayamadım Img-cray
HAYAT BİR SINAVSA,,,
ADIMI YAZAR ÇIKARIM..
.
Cevapla


ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.009
29/01/2008
Denizli
Memur
Ofis 2010 32 Bit
Çözüldü 
Kayıt ekleme olayı gözden kaçmış, aşağıdaki uygulamayı deneyiniz.


Ek Dosyalar
.rar   listekutususeciliyapma2.rar (Dosya Boyutu: 49,17 KB / İndirme Sayısı: 14)
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 194 5 saat önce nightashes
  Listede arama yapılanın seçimi aktif olması raburabu 3 86 01/12/2016, 08:42 raburabu
  Liste kutusu işlem yapma ekleme silme de sorun nightashes 7 90 29/11/2016, 20:24 nightashes
  Liste kutusuna tıklayınca metin kutusuna bilgiyi getirme nightashes 5 81 28/11/2016, 23:33 nightashes
  Liste kutusu seçiminde debug oluşmakta nightashes 3 61 28/11/2016, 21:27 alpeki99


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