metin text değere göre diğer textlerin güncellenmesi
Tarih
15/02/2009 22:31
Konu Sahibi
atlantis8334
Yorumlar
13
Okunma
3069
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



atlantis8334
Aktif Üye
Kullanici Avatari
Aktif Üye
295
30/10/2008
0
İstanbul
31/12/2014,13:10
Çözüldü 
arkadaşlar formda açılan kutuyla ilgile cevaplar fakat benim sormak istediğim metin text kutusuna değer girdiğinde diğer alanlarında onunla ilgili güncellenmesi.
carikod kutusuna carikod yazdığımda yada adı kutusuna isim yazdığımda carikod kutusu ve soyadı kutuları güncellensin..

carikod:mci
adı: cihan
Soyadı: göktürk
bunlardan birine veri girildiğinde diğer alanlar otomotik güncellensin...
teşekkürler..
Burda olmaktan MUTLUYUMM .... Img-grin
Cevapla


mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.732
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Dün,02:10
Çözüldü 
Sayın atlantis8334
Bununla ilgili bir sürü örnek yayınladık. Sitemizde bolca var. Dlookup diye aratırsanız bolca mevcut. Kod bankamızda da var. Ayrıca Column komutu da aynı işi açılan kutularda yapabilir. Ama ben halledemem derseniz, örnek gönderin ben halledeyim. Kutulardan hangisine veri girerseniz diğerlerine veri getirme ile ilgili örnek de ekledim sanıyorum bu sitede... Bulamazsanız dönün..

Kolay gelsin.
İnadına, ille de Accesstr.net...
Cevapla


atlantis8334
Aktif Üye
Kullanici Avatari
Aktif Üye
295
30/10/2008
0
İstanbul
31/12/2014,13:10
Çözüldü 
formda arama yaptım hatta bir konuda soruda sordum belki farketmişsinizdir.konudaki soru açılan kutu ile ilgiliydi.Açılan kutu olayında bir sorun yok zaten onu yapabiliyorum.Fakat metin kutusu olduğu zaman işlem hata veriyor.Örneğimi ekliyorum.Bakarsanız sevinrim..


Ek Dosyalar
.rar   ornek2.rar (Dosya Boyutu: 342,89 KB / İndirme Sayısı: 21)
Burda olmaktan MUTLUYUMM .... Img-grin
Cevapla


mehmetdemiral
.
Kullanici Avatari
Uzman
M.... D....
4.732
30/10/2008
Samsun
Ofis 2013 Tr. 32 Bit
Dün,02:10
Çözüldü 
Örneğinizi inceliyorum. Yapınca atarım buraya hemen.
Fakat biraz daha açıklama yapsanız. Hangi formdaki hangi metin kutuları? Biraz daha açıklama lütfen..
İnadına, ille de Accesstr.net...
Cevapla


esrefigit

Kullanici Avatari
Onursal
598
30/10/2008
356
Konya
Ofis 2003
06/11/2015,13:38
Çözüldü 
bu şekilde olması imkansız siz bahse konu olan metin kutularını bir alana bağlamışsınız

şayet istediğiniz işlemleri yapmak istiyorsanız mutlaka boş ve veri olarak bir tabloya bağlı olmayan form tasarlamanız gerekir form üzerinde yaptığınız bütün işlemleri kod ile yapmanız gerekir

ekte komple bir form kodu ekledim bunda ilk kayıt son kayıt sonraki kayıt önceki kayıt hepsi var sadece arama yok oda ilave edilirse form üzerindeki hangi alana bir veri girerseniz girin ara düğmesine tıkladığınızda tablonuzda o alanların olduğu verileri arar

Kod:
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
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
Option Compare Database
Public rstEmployees As ADODB.Recordset
Public intCount As Integer
Private Sub Form_Load()
    Dim strSQL As String
strSQL = "SELECT tblEmployees.strFirstName, tblEmployees.strLastName, tblEmployees.olePhoto FROM tblEmployees"
    Set rstEmployees = New ADODB.Recordset
    'rstEmployees.CursorLocation = adUseClient
    rstEmployees.Open strSQL, CurrentProject.Connection, adOpenStatic, adLockReadOnly
    With rstEmployees
        ' as this recordset supports approximate positioning then
        ' RecordCount will be the exact number of records in the Recordset
        ' regardless of whether it has been fully populated.
        intCount = .RecordCount
        .MoveFirst
        showRecord .AbsolutePosition & " of " & intCount
    End With
End Sub
Function showRecord(strRecordCount)
    With rstEmployees
       Me.fraPhoto = .Fields("olePhoto")
        Me.txtFirstName = .Fields("strFirstName")
        Me.txtLastName = .Fields("strLastName")
        Me.txtCount = strRecordCount
    End With
End Function
Private Sub cmdClose_Click()
    DoCmd.Close
End Sub
Private Sub cmdDisplayFooter_Click()
    Me.FormFooter.Visible = Not Me.FormFooter.Visible
End Sub
Private Sub cmdFirst_Click()
    With rstEmployees
        .MoveFirst
        showRecord .AbsolutePosition & " of " & intCount
    End With
End Sub
Private Sub cmdLast_Click()
    With rstEmployees
        .MoveLast
        showRecord .AbsolutePosition & " of " & intCount
    End With
End Sub
Private Sub cmdNext_Click()
    With rstEmployees
        .MoveNext
        If Not .EOF Then
            showRecord .AbsolutePosition & " of " & intCount
        Else
            .MoveLast
            showRecord "Last Record"
        End If
    End With
End Sub
Private Sub cmdPrevious_Click()
    With rstEmployees
        .MovePrevious
        If Not .BOF Then
            showRecord .AbsolutePosition & " of " & intCount
        Else
            .MoveFirst
            showRecord "First Record"
        End If
    End With
End Sub
Private Sub Form_Close()
    rstEmployees.Close
End Sub


yani formları asla bir tabloya bağlamayın anlık verileri form üzerine alın böylece ağ üzerinde çalışırken tabloyu meşgul etmeyeceğin için kişiler anında bağlanabilecek

şayet yapamazsanız ben size basit bir örnek yapar eklerim

meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
Cevapla


esrefigit

Kullanici Avatari
Onursal
598
30/10/2008
356
Konya
Ofis 2003
06/11/2015,13:38
Çözüldü 
sanırım istediğiniz böyle bir şey


http://www.accesstr.net/ado-ile-yapilmis...l#pid10711
meşhur çin atasözü  "ACCESS İLE YAPABİLECEKLERİNİZ HAYAL EDEBİLECEKLERİNİZ İLE SINIRLIDIR" siz ne kadar hayal edebiliyorsunuz
Cevapla







Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Listede ve Raporda Tarih değerine göre sıralamak m_demir 20 249 Dün, 00:13 m_demir
  açılan kutu değerine göre aktif/pasif buton ferhatozge 10 328 30/11/2016, 12:01 donepezil
  açılır kutu secime göre yazı rengi ve sorgudan çağrılan ilişikli nesne (bit resmi) maras321 3 88 29/11/2016, 21:39 maras321
  Liste kutusuna tıklayınca metin kutusuna bilgiyi getirme nightashes 5 86 28/11/2016, 23:33 nightashes
  Arama problemi ve bir kaç diğer sorun nightashes 3 106 28/11/2016, 01:22 nightashes


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