Merhabalar,

* Access oluşturduğum "Tabload" isimli tablom var "ad" alanım mevcuttur.Yaklaşık
10 tane kadarda veri(isimler) barındırmaktadır.

* Frmmüsteriler adında formum mevcuttur ve denetim kaynağı "tablomüsteleriler" ile baglantılıdır.

"tablomüsteriler" tablomda "tc no" "ad" "doğum tarih" vs. alanlar mevcuttur.

* Sizlerden yardım talebim bu noktada frmmüsteriler formuna koyduğum "isimaktar" butonuna bastığımda "frmmüsteriler" ad metin kutusunun textine "tabload" tablosundaki isimlerden birinin rastgele yazılmasını istiyorum.Amaç "frmmüsteriler" formundaki ad metin kutusuna manuel isim girişi değilde otomatik isim girişi yaptırmak.

Yardımlarınız bu konuda rica ediyorum, teşekkür ve saygılarımı sunuyorum.

(03-04-2014, 16:50)bluebup demiş ki: Amaç "frmmüsteriler" formundaki ad metin kutusuna manuel isim girişi değilde otomatik isim girişi yaptırmak.

Sayin bluebup; frmmüsteriler formunu tasarla diye acin, ad alanini acilan kutuya cevirin(Fare ile odaklanip, sol, sag tuslari degistir secenegi, acilankutu) Ozelliklerden satir kaynagina Select Tabload.ad From Tabload Order by ad ile acilan kutu referans sorusunu olusturun. Tc kimlik numarasina gore kisi atamasini dogru olarak yapabilirsiniz. Rastgele ile neyi kastettiginizi anlamadim.

Kolay gelsin.....

(04-04-2014, 00:34)dsezgin83260 demiş ki:

(03-04-2014, 16:50)bluebup demiş ki: Amaç "frmmüsteriler" formundaki ad metin kutusuna manuel isim girişi değilde otomatik isim girişi yaptırmak.

Sayin bluebup; frmmüsteriler formunu tasarla diye acin, ad alanini acilan kutuya cevirin(Fare ile odaklanip, sol, sag tuslari degistir secenegi, acilankutu) Ozelliklerden satir kaynagina Select Tabload.ad From Tabload Order by ad ile acilan kutu referans sorusunu olusturun. Tc kimlik numarasina gore kisi atamasini dogru olarak yapabilirsiniz. Rastgele ile neyi kastettiginizi anlamadim.

Kolay gelsin.....

Sayın dsezgin83260;

İlgi ve alakanıza teşekkür ederim, ancak istediğim böyle birşey değil.Benim istediğim randomize ( rnd ) Fonksiyonu ile kod oluşturmak.Amaç yaptığım proje ödevimin "rnd" kodu ile yani rastgele fonksiyonu ile tabload tablosundaki ad alanından frmmüsteriler formundaki ad metin kutusu textine isim aktar butonuna tıklanıldığında tabload tablosundaki ad alanın var olan 10 isimden herhangi bir ismi otomatikmen seçip frmmüsteriler deki ad metin kutusuna yazdırmak.

Yani Bu Rastgele sayı ataması projesi olsaydı;

=Int (Rnd()*100)

Gibisinden bir kodla 1 - ile 100 arasından rastgele sayı aktarabiliyorum ama amaç belirli bir tablodaki alandan metin türündeki veriyi rastgele atamak.

Teşekkürler.

Sayin bluebup; Tc Kimlik olan formun uzerinde rastgele isim cagirmasinin mantigini bilemedigimizden acilan kutu tavsiye etmistik. Rastgele tablodan kayit cagirma asagidaki kod ile yapmak icin, once ilgili tabloda sira adli otomatik sayi ozellikli alan olusturulmasi gerekir.

Buton olay yordamina Me.ad = DLookup("[ad]", "Tabload", "[sira]=" & Int((DCount("[ad]", "Tabload") * Rnd) + 1)) yazabilirsiniz.

Hayirli fantaziler.....

(04-04-2014, 15:23)dsezgin83260 demiş ki: Sayin bluebup; Tc Kimlik olan formun uzerinde rastgele isim cagirmasinin mantigini bilemedigimizden acilan kutu tavsiye etmistik. Rastgele tablodan kayit cagirma asagidaki kod ile yapmak icin, once ilgili tabloda sira adli otomatik sayi ozellikli alan olusturulmasi gerekir.

Buton olay yordamina Me.ad = DLookup("[ad]", "Tabload", "[sira]=" & Int((DCount("[ad]", "Tabload") * Rnd) + 1)) yazabilirsiniz.

Hayirli fantaziler.....

Merhaba dsezgin83260,

Allah razı olsun, tam istediğim bir koddu çok teşekkür ederim lütfen hakkınızı helal edin.

Saygılarımla,

Bendeki fantazilerde böyle işte naparsınız