Defterler için yürüyen cilt ve sayfa numaralrının topluca tabloya kaydedilmesi
Tarih
05/05/2014 15:22
Konu Sahibi
Yunus Bozkurt
Yorumlar
14
Okunma
2263
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Yunus Bozkurt
attman
Kullanici Avatari
Özel Üye
Y.... B....
149
18/08/2011
0
Sinop
Ofis 2010 64 Bit
11/05/2017,22:35
Çözüldü 
Gider pusulalarını Access üzerinden takip etmek istiyorum tek tek girdiğimde herhangi bir sorun yok. Fakat 50 tane defter aldığımda bunların topluca girilmesi kısmında takıldım biraz defterin Adı, Cilt nosu ve Sayfa Numaraları( 50 yapraklık ciltler) aldığım tarih alanlarını topluca girmem mümkün müdür.
Gider pusulası
Alım Tarihi 05.05.2014
Cilt No : 101

Şimdi bu 101 nolu ciltten 50 defter birden giriş yapmam lazım
101 : 0001-0050
101 : 0051-0100
101 : 0101-0150 adı alım tarihi vb bilgiler
101 : 0151-0200
  • En tehlikeli kelime ama’dır. Önceden söylenen her söylemi veya kelimeyi öldürür! Mesela, seni seviyorum ama gibi…
Cevapla

POWER
Uzman
Kullanici Avatari
Uzman
U.... Ö....
1.859
02/04/2010
İzmir
Ofis 2003
25/05/2017,21:55
Sponsor Reklam
Örnek ekleyiniz.
Please return your positive or negative ...
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.061
29/10/2008
Ordu
Ofis 2013 32 Bit
21/05/2017,22:21
Sayın Yunus Bozkurt konunun son durumu nedir?
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

Yunus Bozkurt
attman
Kullanici Avatari
Özel Üye
Y.... B....
149
18/08/2011
0
Sinop
Ofis 2010 64 Bit
11/05/2017,22:35
Sponsor Reklam
Valla henüz bir şey yapamadım kafamda da bir şey oluşmadı örneği ekliyorum sade tablo bir bakın isterseniz sorguyla filan yapmam lazım gibi ama biraz daha kafa yormak lazım


Ek Dosyalar
.rar   AlindiKayit.rar (Dosya Boyutu: 16,2 KB / İndirme Sayısı: 8)
  • En tehlikeli kelime ama’dır. Önceden söylenen her söylemi veya kelimeyi öldürür! Mesela, seni seviyorum ama gibi…
Cevapla

Yunus Bozkurt
attman
Kullanici Avatari
Özel Üye
Y.... B....
149
18/08/2011
0
Sinop
Ofis 2010 64 Bit
11/05/2017,22:35
Şu kodu düzeltebilirmisiniz eklenecek tablonun ismi Defterler

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
Private Sub Komut64_Click()
Dim ciltserinumara As Integer
Dim ciltilksayfaNO As Integer
Dim SondefterIlkSayfa As Integer
Dim gondermetarihi As Date
Dim gondermeno As Integer
Dim ambartarihi As Date
Dim ambarno As Integer
ciltserinumara = Me.txtCiltSeriNO
ciltilksayfaNO = Me.txtCildilkSayfa
SondefterIlkSayfa = Me.txtAdeti
gondermetarihi = Me.txtGonderimTarihi
gondermeno = Me.txtGonderimNo
ambartarihi = Me.txtAmbaraGirTar
ambarno = Me.txtAmbarNo
    If ciltilksayfaNO <= SondefterIlkSayfa Then
        ciltilksayfaNO = ciltilksayfaNO + 50
            insert into defterler ( CildinSerisi,Cildin İlk SahifeNosu,_
                GonderimYaziTarih,GonderimYaziNO,AmabaraGirisTar,AmbaraGirBelgeNo)

                values (ciltserinumara,ciltilksayfaNO,gondermetarihi,_
                    gondermeno,ambartarihi,ambarno)
        Else
    End If
End Sub


  • En tehlikeli kelime ama’dır. Önceden söylenen her söylemi veya kelimeyi öldürür! Mesela, seni seviyorum ama gibi…
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.061
29/10/2008
Ordu
Ofis 2013 32 Bit
21/05/2017,22:21
Sponsor Reklam

Visual Basic Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Dim ciltserinumara, ciltilksayfaNO, SondefterIlkSayfa, gondermeno, ambarno As Integer
Dim gondermetarihi, ambartarihi As Date

    ciltserinumara = Me.txtCiltSeriNO
    ciltilksayfaNO = Me.txtCildilkSayfa
    SondefterIlkSayfa = Me.txtAdeti
    gondermetarihi = Me.txtGonderimTarihi
    gondermeno = Me.txtGonderimNo
    ambartarihi = Me.txtAmbaraGirTar
    ambarno = Me.txtAmbarNo
    
    If ciltilksayfaNO <= SondefterIlkSayfa Then
    
        ciltilksayfaNO = ciltilksayfaNO + 50
        DoCmd.RunSQL "INSERT INTO defterler (CildinSerisi,Cildin İlk SahifeNosu, GonderimYaziTarih,GonderimYaziNO,AmabaraGirisTar,AmbaraGirBelgeNo) VALUES (" & ciltserinumara & " '," & ciltilksayfaNO & "," & gondermetarihi & "," & gondermeno & "," & ambartarihi & "," & ambarno & ")"
    End If


olarak deneyin.

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


Konuyu Okuyanlar: 1 Ziyaretçi


Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Tarih Son Yorum
  Formdan Tabloya Kayıt Butonu Ismail Kalan 7 162 14/05/2017, 12:21 atoz112
  İlişkili Tabloya Formla Yeni Veri Girişi ALTANs 2 95 26/04/2017, 12:18 ALTANs
  Onay Kutusu Değerlerini Tabloya Kaydetme Allback 10 198 19/04/2017, 08:06 Allback
  Kasa Hareketleri İçin Yapılan Uygulamadaki Düzenlemeler uMits 10 251 17/04/2017, 19:42 uMits
  Kasa Hareketleri İçin Yardım Tablodan Tabloya Otomatik Ekleme uMits 35 512 12/04/2017, 19:21 uMits


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