Sayın Hocalarım
İyi geceler benim bir sorunum var açılan kutuyla formdan bilgi giriyorum
bilgi açılan kutudan yoksa eklensin işlemini örneklerinizden yararlanarak yapabildim. Fakat listede yoksa açılan iki uyarı mesajı var kullanıcıya soruyor
ben bunları kaldıramadım. Açılan kutuya direk girdiğim bilgiyi yoksa kaynak tabloya eklesin ama kullanıcıya uyarı mesajı açmasını istiyorum.
yardımlarınızı bekliyorum
Saygılarımla
Listede Yoksa Eklesin Ama Sormasın
yaptığın kod veya örneği ekleyin ,onun üzerinden gidelim
Peki Hocam
birazdan ekleyecem
Sayın Celoyce Hocam
Örnek ektedir dosya açıldığında ilk gelen formda bilgi girmek için Firma satırlarında açılan kutular var buruya elle bilgi girdiğimde kaynak tabloya kayıt yapsın ama mesaj uyarı vermesin istiyorum.
birazdan ekleyecem
Sayın Celoyce Hocam
Örnek ektedir dosya açıldığında ilk gelen formda bilgi girmek için Firma satırlarında açılan kutular var buruya elle bilgi girdiğimde kaynak tabloya kayıt yapsın ama mesaj uyarı vermesin istiyorum.
Son Düzenleme: 16/07/2009, 00:39, Düzenleyen: remi.
sanırım istediğiniz bu örnek altta,belirttilen isme listede olmayan birşey girin
Celoyce hocam
elinize sağlık örnek için teşekkür ederim. yalnız kayıt esnasında gelen mesajı iptal edebiliyormuyuz onu iptal edebilirsek çok iyi olacak. kullanıcıya hiç birşey sormasın
satıra yazılanı direk kaydetsin istiyorum.
Saygılarımla
elinize sağlık örnek için teşekkür ederim. yalnız kayıt esnasında gelen mesajı iptal edebiliyormuyuz onu iptal edebilirsek çok iyi olacak. kullanıcıya hiç birşey sormasın
satıra yazılanı direk kaydetsin istiyorum.
Saygılarımla
kodu şu şekilde değiştir
Dim strSQL As String
Dim I As Integer
Dim msg As String
If NewData = "" Then Exit Sub
strSQL = "Insert Into firmalar ([firma]) " & _
"values ('" & NewData & "');"
CurrentDb.Execute strSQL, dbFailOnError
Response = acDataErrAdded
Dim strSQL As String
Dim I As Integer
Dim msg As String
If NewData = "" Then Exit Sub
strSQL = "Insert Into firmalar ([firma]) " & _
"values ('" & NewData & "');"
CurrentDb.Execute strSQL, dbFailOnError
Response = acDataErrAdded
Konuyu Okuyanlar: 1 Ziyaretçi