İstediğim Bir Alanı Otomatik Tamamla Dışında Tutmak
Tarih
02/01/2014 01:31
Konu Sahibi
F.Ç
Yorumlar
5
Okunma
1267
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



F.Ç
Aktif Üye
Kullanici Avatari
Aktif Üye
113
05/07/2013
0
-
16/01/2016,01:38
Çözüldü 
Sponsor Reklam
Merhaba,

Formumda otomatik tamamla özelliği mevcut. Benzer isimle çok kayıt yapıyorum çok işime yarıyor.

Bu özellik tüm alanlarda çalışıyor güzel de istemediğim şey şu formumda yazdırma alanı da mevcut. Ben bir kayda yazdırma sayısı girdiğimde otomatik olarak ilk girilen, çıktı sayısını otomatik yazıyor dolayısıyla başka sayılarda yazdırma yapamıyorum.

Yardımcı olacak arkadaşlara şimdiden teşekkürler.


Ek Dosyalar
.rar   Otomatik tamamlamada bazı alanları haric tutmak.rar (Dosya Boyutu: 661,17 KB / İndirme Sayısı: 12)
Cevapla

BigBossTurk
Aktif Üye
Kullanici Avatari
Aktif Üye
163
11/01/2009
15
Antalya
Ofis 2003
14/02/2015,00:34
Çözüldü 
Değerli arkadaşım F.Ç
Konuyu yanlış bir bölümde açmış olabilirsin ?
Access Soruları ve Cevapları  başlığı altında göndersen daha çabuk yardımcı olunabilir sanırım.
Cevapla

ozanakkaya
sledgeab
Kullanici Avatari
Kurucu
O.... A....
9.176
29/01/2008
Denizli
Polis Memuru
Ofis 2010 32 Bit
Çözüldü 
Sponsor Reklam
Otomatik tamamlama yapılmasını istediğin metin kutularının im özelliğine 1 yaz

resim

Module1'in kodlarını 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
31
32
Option Compare Database
Private Declare Function GetAsyncKeyState Lib "user32" (ByVal vKey As Long) As Integer
Function otomotiktamamla(kutuadi As String)
Dim ctl As Control
Dim LenOldText As Long
Static Once As Boolean
Dim rst As Object
If Once = False Then
If GetAsyncKeyState(vbKeyBack) = 0 _
And GetAsyncKeyState(vbKeyDelete) = 0 Then
Once = True
On Error Resume Next
Set ctl = Screen.ActiveForm.ActiveControl
Set rst = Screen.ActiveForm.RecordsetClone
If ctl.Tag = "1" Then
If ctl.Text <> "" Then
rst.FindFirst kutuadi & " LIKE '" & ctl.Text & "*'"
If Not rst.NoMatch Then
LenOldText = Len(ctl.Text)
ctl.Text = rst(kutuadi)
ctl.SelStart = LenOldText
ctl.SelLength = Len(ctl.Text) - LenOldText
End If
End If
End If
Set ctl = Nothing
Set rst = Nothing
On Error GoTo 0
Once = False
End If
End If
End Function


Cevapla

F.Ç
Aktif Üye
Kullanici Avatari
Aktif Üye
113
05/07/2013
0
-
16/01/2016,01:38
Çözüldü 
Merhaba,

Kodu kopyaladım, istediğim alanlara da im ekledim ama resimdeki resim hatayı veriyor.
Cevapla

mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.737
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
09/01/2017,15:21
Çözüldü 
Sponsor Reklam
Sanırım bir yanlışlık yaptınız. Ozan'ın söylediği biçimde hazırlanmış örneği aşağıya ekledim. Bir de onda deneyin.


Ek Dosyalar
.rar   Otomatik tamamlamada bazı alanları haric tutmak (1).rar (Dosya Boyutu: 661,8 KB / İndirme Sayısı: 8)
İnadına, ille de Accesstr.net...
Cevapla

F.Ç
Aktif Üye
Kullanici Avatari
Aktif Üye
113
05/07/2013
0
-
16/01/2016,01:38
Çözüldü 
Merhaba Mehmet Abi,

Nasılsınız? İyinsiniz dir inşallah. Yeni yılınızı en içten dileklerimle kutlar sağlık, mutluluk, huzur ve bol kazanç dilerim. Modüle kısmına dikkat etmemişim vb kısmına yapıştırmışım kodu. şimdi düzellttim kodu modüle 1 ekledim. Sorunum çözülmüştür.

Ozan Hocama da Size de çoook teşekkür ederim Sağolun varolun saygılarımla...

İnadına Accesstr.net
Cevapla


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
Çözüldü satırdaki isimlerde otomatik klasör açma manyetix 19 3.898 05/01/2017, 00:20 donepezil
  Sorguya evet/hayır seçenek alanı eklenebilir mi? hbal09 10 328 22/12/2016, 15:18 hbal09
  Ürün Satış Birimi ADET ise otomatik kaydedip bir sonraki Combobox'a geçmesini sağlama hasanak2 5 257 16/09/2016, 11:00 atoz112
  Tarih ve saatten otomatik sayı üretme cagatay1234 6 272 11/09/2016, 10:19 atoz112
Lightbulb Aynı tablo içinde otomatik hareket Yunus Bozkurt 5 252 03/08/2016, 10:20 Yunus Bozkurt


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