Skip to main content

AccessTr.neT


Liste Kutusundan Seçilen Farklı Veriyi Sorgulama

Liste Kutusundan Seçilen Farklı Veriyi Sorgulama

Çözüldü #1
merhabalar,
liste kutusundaki verileri tabloya aktarırken, 
liste kutusundan seçmiş olduğum kayıtların veri tipinin aynı olması gerekiyor. 
veri tipi farklı bir kayıt seçilirse aktarması istiyorum,

örnekteki kaydı mesela aktarmaması lazım, çünkü veri tipi 1 olanların içinde 2 olan kayıt var, 
bu sorgulama yaptırılabilirmi acaba?

[img][Resim: do.php?img=11336][/img]
.rar liste kutusundaki veriyi tabloya kaydet-veritipi ne göre.rar (Dosya Boyutu: 30,22 KB | İndirme Sayısı: 5)
Cevapla
#2
aşağıdaki kodu dener misiniz?
Private Sub Komut10_Click()
Sayi = ""
Dim varItm As Variant
For Each varItm In Me.Liste8.ItemsSelected
x = CLng(Me.Liste8.Column(3, varItm))
If Sayi = "" Then Sayi = x 'Else Exit Sub

If Sayi <> "" Then
If Sayi = x Then
Sayi = x
Else
MsgBox "tipler farklı"
Exit Sub
End If
End If
10
Next varItm
For Each varItm In Me.Liste8.ItemsSelected
CurrentDb.Execute "INSERT INTO genel_toplam (sipno, kg, veritipi) VALUES(" & Me.Liste8.Column(0, varItm) & ", " & Me.Liste8.Column(1, varItm) & ", " & CLng(Me.Liste8.Column(3, varItm)) & ")"
Next varItm

End Sub
Cevapla
#3
sn üstadım,
süper olmuş, 
çok teşekkür ederim,
Allah razı olsun
Cevapla
#4
Rica ederim
İyi çalışmalar
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da