MERHABA ARKADAŞLAR.
Bende access e yeni başlayanlardanım. Bu site sayesinde çok aşama kaydettim. Hatta kendi şirketim için bir teknik servis programı da yazdım. Ancak geçemediğim bir nokta var.Şöyle;

Bir teknik servis tablom var ve bu tabloda müşteri bilgilerinden arıza kaydına kadar çok alan var.Bu tabloya ait de iki adet form yaptım.birinci form da sadece -arızayı açan firma,arıza nedir,arızayı açan kişi, arızaya gidecek olan personel ve onaylandımı gibi bilgi var.İkinci form da ise birinci tabloda ki bilgilerin yanısıra diğer tüm bilgiler de var. Arıza giderildi mi? kullanılan malzemeler Vs.

Benim yapmak istediğim.Birinci formun altına bir düğme koymak daha sonra arıza giderildiğinde formun ve o düğmeye basınca ikinci formda o ilgili arıza nın ID sine gitmek direk o arızaya ait ikinci forma ulaşmak. ve o forma bilgileri girip arızayı kapatmak.

Yardımlarınızı bekliyorum şimdiden teşekkür ederim.

Sayin cerancerann;

Asagidaki kodu deneyebilirsiniz.



Iyi bayramlar.............

Sayın DSezgin hocam;

Sizin verdiğiniz kodu denedim ama yine başarıya ulaşamadım. Belkide bir yerlerde eksik birşeyler yaptım. Dedim ya Access te yeniyim daha. Kod lamalar hakkında hiç bir bilgim yok.

Şöyle özetleyeyim konuyu. Birinci formun adı "FrmArizaAcilis" ikinci formun adı da "TEKNIKSERVIS"

Birinci form da bir düğme ekledim bu düğmenin komutuna gireceğimiz kodla. o düğmeye tıkladığımızda TEKNİKSERVİS Formunu ve o formda ki ilgili arıza ID sini açacak.

İlgin için Teşekkür Ederim.

su an formda sizi görüyorum dosyanızı ekleyin size yardımcı olayım
daha önce düzenlediğim bir prg ektedir

Sayin cerancerann;

Kodu soyle degistirip deneyebilirsiniz.



Kolay gelsin............

Hocam kodla yapamadım ama. Düğme ekleyince yönlendiren menülerden yola çıkarak istediğimi yapmayı başardım. Çalışan haliyle koda baktım. Şu şekilde. Düğme adı Komut22.

Private Sub Komut22_Click()
On Error GoTo Err_Komut22_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "TEKNIKSERVIS"

stLinkCriteria = "[IDTeknikServis]=" & Me![Metin0]
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Komut22_Click:
Exit Sub

Err_Komut22_Click:
MsgBox Err.Description
Resume Exit_Komut22_Click

End Sub



İlgin için teşekkürler. Ayrıca ekte gönderdiğin teknik servis programıda çok güzel. Sizin gibi ustaların bizim gibi acemilere destek olmaya devam etmesi dileklerimle.