Konu Araçları | Seçenekler: | Gösterim Stili
Tarih
13/10/2009 09:05
Konu Sahibi
s.balci
Yorumlar
7
Okunma
4398
Konuyu Oyla:
  • Derecelendirme: 0/5 - 0 oy
  • 5
  • 4
  • 3
  • 2
  • 1

Derecelendirme: 0/5 - 0 oy
Kullanici Avatari

s.balci

Üye
Üye
 34
 6
 1
 13/10/2009
0
 Bolu
 
 Ofis 2003
 16/10/2009,10:27
Çözüldü 
Arkadaşlar öncelikle merhabalar foruma yeni katıldım konuyu yanlış kategoriye açmışsam kusura bakmayın.

Şirket için Access ve Vba nın birleşiminden kalıp takip programı yazmaya çalışıyorum. Tıkandığım yerler oldu prgramın şu andaki hali ektedir.

Programda giriş formunda paraloa alanına 1,2,3,4,5,6 ve admin olarak girdiğinde izin vermektedir.

Paraloa eğer 1 e eşitse vardiya amiri alanlarına hükmedecek.
Paraloa eğer 2 e eşitse kalıphane alanlarına hükmedecek.
Paraloa eğer 3 e eşitse teknik müdür alanlarına hükmedecek.
Paraloa eğer 4 e eşitse onay müdür alanlarına hükmedecek.
Paraloa eğer 5 e eşitse üretim alanlarına hükmedecek.
Paraloa eğer 6 e eşitse kalite alanlarına hükmedecek.
enson admin olarak girdiğimde full kontrol.

Şimdi yapmak istediklerim şöyle;

Vardiya amiri hata ve diğer alanları doldurmadan diğerleri işlem yapamıyacak. Ve ayrıca vardiya amiri en son ne girdiyse o gözükecek, gözükmesi gereken yerler de örneğin paralo 2 ise.

Kaydet butonunda ayrı bir sıkıntım var kayıt işlemini yapmıyor gibime geliyor.

Son olarakda Vardiya amiri için söylüyorum;
VARDİYA AMİRİ KALIP ADInı girdiğimiz anda o anki zamanı otomatik olarak
V. A. GİRDİĞİ TARİH alanına atayacak ve bu alan disable olacak.

Arkadaşlar bu konu hakkında acil bilgiye yardıma ihtiyaçım vardır. İyi çalışmalar hepinize.
Son olarakda Vardiya amiri için söylüyorum;
VARDİYA AMİRİ KALIP ADInı girdiğimiz anda o anki zamanı otomatik olarak
V. A. GİRDİĞİ TARİH alanına atayacak ve bu alan disable olacak.

Arkadaşlar burayı hallettim kodu ekledim. Diğerlerinide buna bağlı olarak düzenleyip yapabildiğim kadarıyla en son halini atmaya çalışacağım ama sizden de bu konuda yardımlarınızı bekliyorum.

Private Sub v_amiri_kalip_adi_AfterUpdate()
v_amiri_tarih = Date + Now
v_amiri_tarih.Enabled = False

End Sub


Ek Dosyalar
.rar   kalip.rar(Dosya Boyutu: 86,67 KB / İndirme Sayısı: 58)
s.balci, 13-10-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

s.balci

Üye
Üye
 34
 6
 1
 13/10/2009
0
 Bolu
 
 Ofis 2003
 16/10/2009,10:27
Çözüldü 
Arkadaşlar son hali ekte lakin yapamadığım işlemler aşağıda.

Vardiya amiri kayıt etti çıktı. sırada kalıphane var kalıphane şifresi yani 2 ile sisteme girğimizde vardiya amirinin girdiği verileri karşımıza çıkarsın, enable true olsun. daha sonra 3 girdiğimizde onayı veren kişi neye onay vereceğiniz bilmek ister ve bunun için son girilen veya onayı boş olana girmesi lazım zaten onun onayından geçmeyen kalıp işleme alınmayacak. Eksikliklerede bir bakarsanız sevinirim. İyi çalışmalar.


Ek Dosyalar
.rar   kalip2.rar(Dosya Boyutu: 101,57 KB / İndirme Sayısı: 22)
s.balci, 13-10-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

s.balci

Üye
Üye
 34
 6
 1
 13/10/2009
0
 Bolu
 
 Ofis 2003
 16/10/2009,10:27
Çözüldü 
Arkadaşlar acil yardıma ihtiyaçım var. Konu hakkında görüşlerinizi bekliyorum


s.balci, 13-10-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

Bilgisayarcı

Atçalı
Aktif Üye
 Belirtilmemiş
 658
 34
 29/01/2008
410
 Antalya
 
 Ofis 2003
 01/11/2011,15:17
Çözüldü 
Hocam aynı soruyu bi sürü farklı yerde görüyorum. Yapsam bile nasıl birleştirmeyi düşünüyorsunuz?Img-grin


Bana işe yarayan bir müdür göster,sana dünyayı yerinden oynatayım.
                                                                                        Descartes



Kullanici Avatari

s.balci

Üye
Üye
 34
 6
 1
 13/10/2009
0
 Bolu
 
 Ofis 2003
 16/10/2009,10:27
Çözüldü 
En azından mantık olarak yardımı dokunsa benim için kardır aynı zamanda kod bloğu olarak da almam gayet kolay olacaktır yeter ki sistem isteklerimi karşılasın. Açıkcası yardım alabileceğim tüm yerlere yazıyorum.

Buda son hali yardımlarını bekliyorum.


Ek Dosyalar
.rar   KALIP TAKİP.rar(Dosya Boyutu: 112,48 KB / İndirme Sayısı: 40)
s.balci, 13-10-2009 tarihinden beri AccessTr.neT üyesidir.

Kullanici Avatari

s.balci

Üye
Üye
 34
 6
 1
 13/10/2009
0
 Bolu
 
 Ofis 2003
 16/10/2009,10:27
Çözüldü 
TextBox9 a girilen değere göre arama yapıp liste elemanına aradığım değeri görüntülemek istiyorum ve mümkünse bu değeri excelle aktarmak istiyorum.

resim

Private Sub TextBox9_Updated(Code As Integer)
Dim txtSearchString As Variant
Dim strSQL As String

txtSearchString = Me![TextBox9]

If Not IsNull(Me![TextBox9]) Then

strSQL = "SELECT * FROM kalip "

strSQL = strSQL & "WHERE WHERE ((kalip.kalip_no)Like '" & txtSearchString & "*') "

End If

Me!Liste0.RowSource = strSQL
End Sub


s.balci, 13-10-2009 tarihinden beri AccessTr.neT üyesidir.


Konuyu Okuyanlar: 1 Ziyaretçi

Konu ile Alakalı Benzer Konular
Konular Yazar Yorumlar Okunma Son Yorum
Çözüldü Satınalma Takip Yazılımı Hakkında DJ_CrAzY43 8 376 06/09/2018, 11:11
Son Yorum: PROSAN
Çözüldü Access 2013 44 Videoluk Cari Ve Stok Takip Programı kdemirparmak 5 149 22/08/2018, 19:23
Son Yorum: ogzcntrk
Çözüldü Eğitim Takip Programı mehmetdemir 20 7.478 16/08/2018, 21:59
Son Yorum: simendifer
Çözüldü Banka Talimatı Hazırlama Prog. Düzenleme derzulya 5 164 20/07/2018, 08:43
Son Yorum: derzulya
Çözüldü Rendavu Takip Sistemi. fascioğlu 9 367 07/07/2018, 09:17
Son Yorum: ozanakkaya

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