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
2189
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy



Yunus Bozkurt
attman
Kullanici Avatari
Aktif Üye
Y.... B....
147
18/08/2011
0
Sinop
Ofis 2010 64 Bit
12/12/2016,16:58
Çözüldü 
Sponsor Reklam
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.855
02/04/2010
İzmir
Ofis 2003
20/02/2017,21:02
Örnek ekleyiniz.
Please return your positive or negative ...
Cevapla

alpeki99
Yeniden başlayabilmek...
Kullanici Avatari
Uzman
O....
6.023
29/10/2008
Ordu
Ofis 2013 32 Bit
13/02/2017,13:34
Sponsor Reklam
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
Aktif Üye
Y.... B....
147
18/08/2011
0
Sinop
Ofis 2010 64 Bit
12/12/2016,16:58
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
Aktif Üye
Y.... B....
147
18/08/2011
0
Sinop
Ofis 2010 64 Bit
12/12/2016,16:58
Sponsor Reklam
Ş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.023
29/10/2008
Ordu
Ofis 2013 32 Bit
13/02/2017,13:34

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
  Birden fazla tabloya birden fazla kayıt cazcaz678 5 107 19/02/2017, 17:26 cazcaz678
  tabloya veri kaydetme hatası murat dikme 3 61 17/02/2017, 19:14 murat dikme
  Subform icin Arama butonu broiling 22 365 07/02/2017, 02:37 broiling
  formdan tabloya veri ekleme hatası 1453asi 6 159 27/01/2017, 17:09 1453asi
  Tabloya Resim Yolu Eklenen Resmi Raporda Gösterme siyahca 2 168 19/01/2017, 16:59 siyahca


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