tarih değerini noktalı yazdıramıyorum

[selcukkahya]

Merhaba Arkadaşlar

Hepinize kolay gelsin

Formumda bulunan mağaza ismi alanındaki veriyi çıktı şeklinde dosyamın adı olarak tanımladım ve formumda bulunan e-mail gönder butonuna bastığımda önce belirlemiş olduğum klasöre veritabanındaki mağaza ismini yazdırıyorum.

Örnek: d:\KASA_FOYU\ klasörünün içine KEMERBURGAZ.snp olarak kaydettiriyor ve bunu mail attach olarak gönderebiliyorum.

Fakat buna ilaveten tarih formda bulunan tarih alanındaki veriyide ilave etmeye çalışıyorum fakat komutu verdiğimde tarih alanında / işareti olduğundan kaydetme yapamıyorum.

Örnek: 24/11/2008_KEMERBURGAZ.snp olarak yazmıyor. Bunun 24.11.2008_KEMERBURGAZ.snp olarak yazdırabilirsem sorun çözülecek fakat yapamadım.

26.11.2008(formdaki tarih)_KEMERBURGAZ.snp

2.sorum rapor tuşuna bastığımda formdaki o anki verileri raporlayabiliyorum fakat , e-mail gönder dediğimde oluşan dosyada tüm data verileri kaydoluyor.

Dosyaları ekte bulabilirsiniz.

Bu konularda yardımcı olabilirseniz çok sevinirim.

Hepinize Şimdiden çok teşekkürler.

Kolay gelsin.

 

[Taruz]

Merhaba..

strPath = "D:\SELCUK\ACCESS_PROJELERİM\MAĞAZA_KASA_FÖYÜ\1\" & Date & "_" & Me.MAGAZA & ".snp"

İlgili satırı bununla değiştirirseniz dosya adı 26.11.2008_KEMERBURGAZ şeklinde oluşur..

Buda formda üzerinde olduğunuz kaydı raporda açar..

DoCmd.OpenReport stDocName, acViewPreview, "", "[GUNLUK_KASA_GENEL]![ID]=[Forms]![FRM_GUNLUK_KASA_GENEL]![ID] "

 

[selcukkahya]

Sayın Taruz

Öncelikle yardımcı olduğunuz için çok teşekkürler.

İstediğim formu e-mail butonuna basınca görüntüleyebildim.

Fakat sanırım yanlış anlattım.

Şöyle anlatim;

date yazdığımda windows bölgesel ayarlarda tarih ayıracı / olarak gözüküyor bu ayıracı . olarak kullanırsam dosya ismini 11.11.2008_kemerburgaz şeklinde kaydedebiliyorum fakat bölgesel ayarlar / şekilde kalmalı

bunu daha önce Sayın modalı

Dim Tarih
tarih = Replace(Date, "/", ".")

şeklinde çözmüştü.

fakat buradaki tarihi günün tarihi şeklinde değilde

formda bulunan kasa föyüne ait tarihi yazdırmak istiyorum.
yani günün tarihi 26.11.2008 olsa bile ben tarih alanının kasa föyünün tarihi olmasını istiyorum.

örnek: 24.11.2008_kemerburgaz.snp - 25.11.2008_kemerburgaz.snp

teşekkürler.

 

[adnanyurdakul]

Sorunu tam anlayamadım Eğer sorun rapor üzerindeki tarih alanını 24.11.2008 kemerburgaz yani tarih ve magaza adı şeklinde yazmak istiyorsan tarih alanını(rapordaki) kayıt kaynağını şu şekilde yaz =[TARIH] & " " & [Magaza]
iyi çalışmalar

 

[selcukkahya]

Sayın adnanyurdakul

Sorunun tam anlaşılması açısından ekte date komutuyla çalışan örneği yolluyorum.

Fakat burada oluşan dosya adı formun içindeki kasa raporunun tarihi değilde bugünün tarihiyle dosya ismi oluşturuyor.

ayrıca d:\KASA_FOYU diye bir klasör açarsanız e-mail gönder tuşuna bastığınızda dosyayı buraya oluşturuyor.

Özetle ben datayı oluşturduğunuz günün tarihiyle değilde , kasa föyü içinde tarih alanında yazan tarih ile datayı kaydetmek istiyorum.

Zaten bu şekliyle oluşturduğunuzda göreceksiniz ki oluşan dosya ismindeki tarih ile kasa föyünün içinde yazan tarih farklı.

teşekkürler.

 

[adnanyurdakul]

strPath = "D:\KASA_FOYU\" & Me.TARIH & MAGAZA & ".snp" yi
strPath = "D:\KASA_FOYU\" & Me.TARIH & Me.MAGAZA & ".snp" şeklinde düzeltin tamamdır

 

[selcukkahya]

Sayın adnanyurdakul

ekte hata ekranı var.

anlatmak istediğim bölgesel ayarlardaki tarih ayıracı / işareti olduğundan kaydetmek işlemi yapılamıyor ve hata veriyor.

Tekrar teşekkürler.

Kolay gelsin

 

[adnanyurdakul]

D:\KASA_FOYU dosyasını oluşturun hata yok

 

[adnanyurdakul]

hala olmadıysa
strPath = "D:\KASA_FOYU\" & cstr(Me.TARIH) & Me.MAGAZA & ".snp" şeklinde düzeltin

 

[selcukkahya]

Sayın adnanyurdakul

yardımlarınız için gerçekten çok teşekkürler

ama maalesef olmadı yine birde ekran resimlerini çekerek anlatmaya çalıştım.

yardımlarınız için tekrar teşekkürler.

kolay gelsin

 

[modalı]

Sayın selcukkahya,

Bir de öyle deneyin.

TARIH = Replace(CStr(Date), "/", ".")

olmazsa haberim olsun örnek üzerinde çalışayım.

iyi çalışmalar

 

[selcukkahya]

Sayın Modalı

olmuyor maalesef yapamıyorum

Bu arada Sayın Modalı dosya adında bulunan tarih kısmının formdaki tarih alanından yazdırmak istiyorum. date yani günün tarihi şeklinde yazdırmak istiyorum. ilave etmek istedim.



güncel dosyam ekte .

teşekkür ederim.

kolay gelsin.

 

[adnanyurdakul]

bilgisayarınızda bir dosya açın ve adını selçuk/kahya koymaya çalışın olmayacaktır windows buna müsaade etmez bu yüzden olmuyor.noktalı tarihte problem olmaz iyi çalışmalar

 

[modalı]

Sayın selcukkahya,

Siz TARIH alanınızı tarih olarak belirttiğiniz için ve Windows ayarlarınızda ayraç olarak / yı kullandığınız için TARIH alanı mutlaka gg/aa/yyyy formatında olacaktır. Değişiklik yapamazsınız. (Veri türünü metin olarak değiştirirseniz olur)

Şimdi gelelim e-mail olayına:

ekleyeceğiniz kodlar:

Dim strTarih As String

strTarih = Replace(CStr(TARIH), "/", ".") 'Eğer TARIH alanı ile ilgileniyorsanız
strTarih = Replace(CStr(Date), "/", ".")   'Eğer bu günün tarihiyle ilgileniyorsanız

strPath = "C:\KASA_FOYU\" & strTarih & Me.MAGAZA & ".snp"

İyi çalışmalar

 

[adnanyurdakul]

herhangi bir yerde bir dosya açın ve dosya adını selçuk/kahya koymaya çalısın olmayacak windows buna müsaade etmeyecektir.
işte sizin hatanın temel nedeni bu iyi çalışmalar

 

[modalı]

Sayın adnanyurdakul,

İyi işte / leri noktaya çevirdim ve sorun çözüldü.

 

[adnanyurdakul]

sn modalı

sn modalı ısrarla tarihi / formatında istediği için yazdım yoksa daha önceden verilen cevap aslında fazlasıyla yeterliydi iyi çalışmalar

 

[selcukkahya]

Sayın adnanyurdakul

Ben tarihi ısrarla / istemedim / işaretini . yapmaya uğraştığımı anlatmaya çalıştım. sanırım beni anlamamışınız.

Sayın Modalı beni gayet iyi anlamış ve sorunu tam istediğim gibi çözmüş. ellerinize sağlık. Böylece programım bitmiş oldu sayenizde.

Sayın adnanyurdakul ve Sayın Modalı yardımlarınız için gerçekten çok teşekkür ederim.

Tabi bu siteninde hakkını vermek gerekir.

hepinize iyi çalışmalar.

Kolay gelsin.

 

[seruz]

Teşekkürler