Skip to main content

AccessTr.neT


Bu konuda yardımcı olur musunuz?

Bu konuda yardımcı olur musunuz?

Çözüldü #1
Selam arkadaşlar

Bir yerde takıldım. Sorunum şöyle:

tablomdaki kod alanındaki değerler satır satır şöyle gibi

123.23.5321
245.678
34.980.2.3557.32.24
67.77.347.32.3
68
90.345.312.56.22.56.21.65

uzunluğu sabit olmayan verilerim var ama en fazla 10 sayı kümesi olur, bu belki işinizi kolaylaştırır, benim istediğim noktalar arasındaki her rakamın ayrı bir alana gelmesi. Sorgu yada rapor olsun farketmez. Tabii her satırın yanına gelmeli örneğin 4. satır şöyle olmalı..

67.77.347.32.3 67 -- 77 -- 347 -- 32 -- 3

gibi umarım anlatabilmişimdir.
Cevapla
Çözüldü #2
Merhaba.
Split fonksiyonunu kullanabilirsiniz.
Örneğin:
Yazi="67.77.347.32.3"
Split(yazi,".")(0) => 67 rakamını döndürür
Burada Split fonksiyonu metni belirtilen kritere göre bölüp bir diziye sokar.
Dizinin ilk endeksi 0 ve dizideki ilk veriyi döndürür.

İstenirse bir döngü bile oluşturulur:
Kod:
Dim Dizi As Variant
Dizi = Split(yazi, ".")
For say = LBound(Dizi) To UBound(Dizi)
    MsgBox Dizi(say)
Next

Mesajlarımızı Türkçe yazım kurallarına uygun yazalım.
Emeğe saygı gösterelim, bir teşekkürü çok görmeyelim.
Cevapla
Çözüldü #3
Yanıt için teşekkür ederim.

Verdiğiniz kodla bir sonuca ulaşabilirim sanırım. Ama benim bu değerleri ayrı ayrı tabloya kaydetmem lazım. Bu veriler (yaklaşık 3000 kayıt)bana bir Excel dosyasından birleşik olarak geliyor. Ben bağlı tablo ile bunları accesse alıyorum. bunları aynı kayırttaki diğer alanlara parçalayarak yazdırmam gerek. Bunu nasıl yapabilirim?
.rar report.rar (Dosya Boyutu: 8,68 KB | İndirme Sayısı: 17)
Son Düzenleme: 14/09/2009, 20:30, Düzenleyen: Honolululu.
Cevapla
Çözüldü #4
Belki şu örnek daha yol gösterici olabilir. Maytas'ın verdiği kodları form üzerindeki bir liste kutusuna aktardım.

Listekutusuna aktarmak yerine alternatif olarak metin kutularına aktarmak için tekrar bir döngü yazılıp her bir nokta ayıracı ile teker teker metin kutularına aktarılabilir.
.rar report.rar (Dosya Boyutu: 19,02 KB | İndirme Sayısı: 13)
İnadına, ille de Accesstr.net...
Cevapla
Çözüldü #5
ben en fazla 10 alan olur dediğin için ona göre ayarladım. fazla olan olursa sen değişiklikleri yaparsın.
kolay gelsin
.rar report n_serdar.rar (Dosya Boyutu: 24,21 KB | İndirme Sayısı: 21)
İyiki Varsın Access Img-grin
Cevapla
Çözüldü #6
@ Nurullah_Serdar

Kesinlikle budur isteğim. Çok teşekkür ederim. Oluşturduğunuz diğer tabloda productname yoktu. Bu raporumda gerekli alan olduğu için tabloya bunuda kaydetmem gerekiyor. Bunu yazdığınız koda ne tür bir ilave yaparak yazdırabilirim. case 1den 10a kadar tüm kısımlara rstver!productname = Dizi(0) yazdım ama olmadı.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da