Konu Araçları | Konu Seçenekleri | Gösterim Stili
Tarih
08/03/2019 12:23
Konu Sahibi
aliyuzen
Yorumlar
3
Okunma
168
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 1
  • 2
  • 3
  • 4
  • 5
aliyuzen

aliyuzen

Aktif Üye
24363
Al.... Yü....
 41
 40
 154
 02/09/2010
0
 İstanbul
 Müşteri Hizmetleri
 Ofis 2019 64 Bit
 10/07/2019,17:49
Çözüldü 
Merhaba Üstadlarım,

Aşağıdaki kodda kırmızı renk ile işaretledğim satırları bir türlü çalıştıramadım. Kod çalışıyor. Ancak, o satırlarda yapmasını istediğim şeyi, yapamadım. Aktif ettiğimde, tarih eklensin  ya da tarih silinsin istiyorum. Ama bu sefer de hata mesajı alıyorum. Yardımlarınızı rica ederim. Teşekkürler.

If Not IsNull(SIPARIS_NO) Then
    Dim a As String
    Dim b As String
    Dim c As String
    a = "UYARI !"
    b = "Daha önceden oluşturulmuş bir satış siparişi mevcut." & Chr(13) & Chr(13) & "Sipariş No: " & SIPARIS_NO & Chr(13) & Chr(13) & "Satış siparişini silmek istiyorsanız Evet'e, İşlem iptali için Hayır'a basınız."
    c = MsgBox(b, 4 + 32 + 256, a)
    If c = 6 Then
    DoCmd.OpenQuery "SIPARISE_DONUSTUR_Q4_1"
    SIPARIS_NO.Value = ""
'    SIP_DON_TARIHI.Value = ""   'Burada tarihi silemiyorum. Alanı boşalatamıyorum. Sorun var. Buraya ne yazmalıyım ki, yazılı olan tarih silinsin?
    TEKLIF_DURUMU.Value = "Kabul Edildi"
    DoCmd.RefreshRecord
    MsgBox "Az önce, daha önceden oluşturduğunuz satış siparişini sildiniz. Teklif Durumu'nu da (Kabul Edildi) olarak değiştirdiniz.", vbInformation, "Artık, yeni sipariş oluşturabilirsiniz."
    Else
    TEKLIF_DURUMU.Value = "S - Kabul Edildi"
    DoCmd.RefreshRecord
    Exit Sub
    End If
Else
    TEKLIF_DURUMU.Value = "S - Kabul Edildi"
 '   SIP_DON_TARIHI.Value = Date   'Burada tarihi ekleyemiyorum.  Sorun var. Buraya ne yazmalıyım ki, günün tarihi yazılsın?
    MsgBox "Teklif Durumu'nu (S - Kabul Edildi) olarak değiştirdiniz.", vbInformation, "Bilgi !"
    DoCmd.RefreshRecord
    DoCmd.OpenQuery "SIPARISE_DONUSTUR_Q1_1"
    DoCmd.OpenQuery "SIPARISE_DONUSTUR_Q2_1"
    DoCmd.OpenQuery "SIPARISE_DONUSTUR_Q3_1"
    MsgBox "Teklif, Siparişe Dönüştürüldü.", vbInformation, "Bilgi !"
    Exit Sub
    End If
End If




halily

halily

Uzman
65596
ha....
 26
 1.283
 30/07/2014
215
 -
 
 Ofis 2019 64 Bit
 Bugün,12:54
SIP_DON_TARIHI.Value =Null denediniz mi?



...........
halily

halily

Uzman
65596
ha....
 26
 1.283
 30/07/2014
215
 -
 
 Ofis 2019 64 Bit
 Bugün,12:54
uygulamanızı görmeden söylemek zor ama tablo yapınızdan yada ilişkilerden kaynaklı bir şey olabilir.
kırmızı olan kodlar bende sorunsuz çalıştı



aliyuzen

aliyuzen

Aktif Üye
24363
Al.... Yü....
 41
 40
 154
 02/09/2010
0
 İstanbul
 Müşteri Hizmetleri
 Ofis 2019 64 Bit
 10/07/2019,17:49
Dediğiniz şekilde, Null değer oldu... teşekkürler.




...........

Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü İki Tarih Arası Sorgulma Sorunu HORZUM 4 321 05/07/2019, 19:25
Son Yorum: halily
Çözüldü İki Tarih Ve İki Saat Arası Sorgu Formülü furens 5 255 18/06/2019, 15:28
Son Yorum: furens
Çözüldü İki Tarih Arası Ay Bazında Satır Ekleme fkilic76 6 377 06/03/2019, 09:13
Son Yorum: halily
Çözüldü İki Tarih Arası Satır Ekleme Ve Veri Kaydetme fkilic76 5 273 26/02/2019, 18:04
Son Yorum: fkilic76
Çözüldü Tarih Kayıt zaferlacin 2 234 30/01/2019, 16:40
Son Yorum: zaferlacin

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