(03/01/2016, 19:48)ozguryasin yazdı: merhaba; tablo adları, alan adları, form adlarında Türkçe karakter kullanmayınız, ayrıca boşlukta bırakmayınız. sitemizde bulunan yapılmaması gereken ölümcül hataları okuyunuz. dediğiniz gibi yaptım. tabloda birim maliyet, hesaplanmış yapmışsınız düzeltip.  vba kod bölümüne yazdım.

Me.BirimMaliyet = Me.SabitGiderler / (Me.Tonaj * 40) satırındaki
Me.BirimMaliyet = Me.SabitGiderler / Me.Tonaj * 40

(me.tonaj*40) içinde olması farklı tutar çıkartır.
onu dikkate alıp düzeltmenizi yapınız.


geri bildirimde bulununuz.

Kod:

Dim SoRGu As String
Dim rS As New ADODB.Recordset

SoRGu = "SELECT Sum(SabitGiderler.Tutar) AS ToplaTutar FROM SabitGiderler;"

rS.Open SoRGu, CurrentProject.Connection, adOpenKeyset, adLockOptimistic

Me.SabitGiderler = rS!toplatutar
Me.BirimMaliyet = Me.SabitGiderler / (Me.Tonaj * 40)

rS.Close: Set rS = Nothing

Cevabınız için teşekkür ederim. Peki bunu vb kod yazmadan halletmenin yolu var mıdır. sorgu yaparak Sql tasarımda yazarak insert into yada update komutu ile veya sum Dsum gibi komutlar kullanarak.

Öğrenmek için baya kurcaladım. Güncelleştirme sorgusu ekleme sorgu gibi ama becerememiştim. Ukalalık etmek için değil birşeyler öğrenebilmek için soruyorum. Tekrar teşekkür ederim.