Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
21/08/2017 00:48
Konu Sahibi
teo81a
Yorumlar
2
Okunma
524
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
teo81a

teo81a

Aktif Üye
1391
 38
 13
 68
 23/12/2008
0
 Düzce
 
 Ofis 2003
 26/07/2019,19:00
Çözüldü 
Herkese merhabalar;

Hatırlatma formunda bulunan "tekrarla" alanındaki ve "tekrar sayısı" alanındaki bilgilere göre alt forma bilgileri aktarmak istiyorum. örneğin; "tekrarla"=aylık seçtiğimde ve "tekrar sayısı" nı 3 seçtiğimde, alt forma aylık olarak 3 satır kaydı oluşturmasını istiyorum, bu seçenekte de belli olduğu üzere günlük, haftalık ve de yıllık olarak da alt forma kayıtları açmak istiyorum. Sitede bulunan örnekleri kendime uyarlamayı beceremedim. Yardımcı olabilecek arkadaşlara ve üstatlara şimdiden çok teşekkür ederim.




ozanakkaya

ozanakkaya

Kurucu
1
Oz.... Ak....
 39
 482
 12.135
 29/01/2008
 Denizli
 Memur
 Ofis 2010 32 Bit
 Dün,18:10
Merhaba,

Butonun tıklandığında olayına aşağıdaki kodu yazarak deneyiniz.

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
33
34
35
36
37
38
39
40
41
Dim GSurem As String
Dim GTekrar As Integer
Dim rs As New ADODB.Recordset

Select Case Me.TEKRARLA

	Case "Günlük"
	GSurem = "d"

	Case "Haftalık"
	GSurem = "ww"

	Case "Aylık"
	GSurem = "m"

	Case "Yıllık"
	GSurem = "yyyy"

End Select

Set rs = New ADODB.Recordset
rs.Open "HATIRLAT_ALT_TB", CurrentProject.Connection, adOpenDynamic, adLockOptimistic

	For GTekrar = 0 To Me.TEKRAR_SAYISI - 1
		With rs
			.AddNew
			![HAT_ID] = Me.HAT_ID
			![TEKRARLA] = Me.TEKRARLA
			![TEKRAR_SAYISI] = Me.TEKRAR_SAYISI
			![NOT] = Me.NOT
			![SORUMLU_KISI] = Me.SORUMLU_KISI
			![DURUMU] = Me.ONCELIK
			![HAT_BASL_TARIHI] = DateAdd(GSurem, GTekrar, Me.TARIH)
			![HAT_BITIS_TARIHI] = DateAdd(GSurem, GTekrar + 1, Me.TARIH)

			.Update
		End With
	Next GTekrar
rs.Close
Set rs = Nothing
Me.HATIRLAT_ALT_FR.Requery


"Boş Örnek Eklerim, Yapıp Verirler" demeyin, örneğinizi hazırlayın.
Komplike kod talebiniz var ise İletişim bağlantısından bize ulaşın. 
Cebelleşmezsen Öğrenemezsin. 

...........
teo81a

teo81a

Aktif Üye
1391
 38
 13
 68
 23/12/2008
0
 Düzce
 
 Ofis 2003
 26/07/2019,19:00
Çözüldü 
Merhaba;

Ozan bey çok ama çok teşekkür ederim, konu çözülmüştür çok sağolun. Tesekkur  10806




Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Forma Bağlı Form Kayıt Sorunu dioxi 7 227 16/08/2019, 06:55
Son Yorum: dioxi
Çözüldü Listeden Seçilenleri Alt Forma Ekleme irfans 11 406 05/08/2019, 11:27
Son Yorum: berduş
Çözüldü Access Raporu Göründüğü Gibi Excele Aktarma Akın Yıldız Usta 1 149 04/08/2019, 19:25
Son Yorum: berduş
Çözüldü Alt Formdan Başka Tabloya Kayıt Yapmak aydint33 9 257 31/07/2019, 20:07
Son Yorum: aydint33
Çözüldü Tablodan Forma Aktarma atamsinatamsin 19 610 09/07/2019, 18:24
Son Yorum: berduş

Türkçe Çeviri: MCTR, Yazılım: MyBB, © 2002-2019 MyBB Group.