16/01/2016, 00:16
En çok ürün
16/01/2016, 01:37
Kur@l
buton olayını bununla değiştirin.
Kod:
Private Sub Komut0_Click()
strSQL = "SELECT TOP 1 Ürünler, Max(miktar) AS encok FROM Tablo1 GROUP BY Ürünler ORDER BY Max(miktar) DESC;"
Set rstkayit = New ADODB.Recordset
rstkayit.Open strSQL, CurrentProject.Connection, adOpenKeyset, adLockOptimistic
With rstkayit
Forms!Form1.Form!Metin1 = .Fields("Ürünler")
Forms!Form1.Form!Metin3 = .Fields("encok")
.Close
End With
End Sub 19/06/2016, 12:01
atoz112
sayın orderyazbim,
konu takibiniz açısından,hatırlatma anlamında;
konunuz ile ilgili son gelişme ne durumdadır.
şüphesiz,işlemleriniz tamamlanmış ve sorununuzu çözmüş de olabilirsiniz.site içi aramalarınız neticesinde sitede yer alan konuları ve örnekleri incelemelerinizin sonucu ile bazı gelişimler elde etmiş de olabilirsiniz...bilgilendirmek ister misiniz lütfen.teşekkürler.
bilginize...iyi çalışmalar,saygılar.
konu takibiniz açısından,hatırlatma anlamında;
konunuz ile ilgili son gelişme ne durumdadır.
şüphesiz,işlemleriniz tamamlanmış ve sorununuzu çözmüş de olabilirsiniz.site içi aramalarınız neticesinde sitede yer alan konuları ve örnekleri incelemelerinizin sonucu ile bazı gelişimler elde etmiş de olabilirsiniz...bilgilendirmek ister misiniz lütfen.teşekkürler.
bilginize...iyi çalışmalar,saygılar.
30/06/2016, 15:06
atoz112
Konu;
gerek paylaşılan bilgiler neticesinde çözüme kavuşturuldu düşüncesi ile ve gerekse de
konu sahibinin zaman zarfında ayrıntılı geri dönüş bildirimleri olmaması nedeni ile,
(gerektiğinde konu sahibinin geri bildirim hakkı saklı kalmak üzere)
Cevaplanmış Sorular kategorisi içerisine taşınmıştır.
bilginize.
gerek paylaşılan bilgiler neticesinde çözüme kavuşturuldu düşüncesi ile ve gerekse de
konu sahibinin zaman zarfında ayrıntılı geri dönüş bildirimleri olmaması nedeni ile,
(gerektiğinde konu sahibinin geri bildirim hakkı saklı kalmak üzere)
Cevaplanmış Sorular kategorisi içerisine taşınmıştır.
bilginize.