Arkadaşlar
Diyelim ki formda oluşturduğumuz combobox 2 sütünlu(tablodan alıyor değerleri). Listede girdiğim değer yoksa kayıt yapmasını istiyorum tabloya. Insert into komutunu kullanarak 2 sütünün değerlerini nasıl kaydettirebilirim asıl tabloya?
Teşekkürler
Lütfen örneğinizi eklermisiniz...
Dim strSQL As String, X As Integer
X = MsgBox("Girilen <<<RENK>>> Listede Yok. Listeye Eklensin mi?", 52, "YENİ ***RENK*** SABİTİ EKLENSİN Mİ...?")
If X = vbYes Then
strSQL = "Insert Into RENKLER ([RENK]) values ('" & NewData & "')"
MsgBox "RENK Kaydetme İşlemi Tamamlandı.", 64, "Kaydedildi"
CurrentDb.Execute strSQL, dbFailOnError
Response = acDataErrAdded
Else
Response = acDataErrContinue
Me.RENGİ.Value = ""
End If
açılan kutunun listeye sınır değerini "evet" yapıyoruz ve listede yokken yordamına yukarıdaki kodu yazıyoruz.
Renkler tablosunda Renk alanına kaydedilmiş oluyor.Fakat Siz aynı değeri mi kaydettirmek istiyorsunuz sonuçta açılan kutuya 1 adet veri girmiş olacaksınız.oda sizin belirlemiş olduğunuz alan olacak.
formda dikkat ederseniz ilk sütünun değerini yazıyor
Sn. coskun_cakal hayır aynı alana iki değer girmem gerekiyor ki 2.değeri de diğer alana yazdırayım
Insert Into'yu neden tercih ediyorsunuz?