+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Access 1 Formdan Tablolara Veri Gönderimi (/konu-access-1-formdan-tablolara-veri-gonderimi.html)
Sayfalar:
1
2
RE: Access 1 Formdan Tablolara Veri Gönderimi - ali.70 - 06/04/2024
(03/04/2024, 00:10)berduş yazdı: ben firmalar için yaptım isterseniz benzer kodu müşteriler için de uyarlayıp kullanabilirsiniz?
firmalar formundaki düğmenin tıklanma olayı
Metin2; firma adı yani tablo ismi girilecek metin kutusu
FIRMAORNEK; şablon olarak kullanılacak firmalar tablosunun adı
If Len(Me.Metin2 & "") = 0 Then MsgBox "Firma adını girmediniz!!!": Exit Sub
If DCount("[Name]", "MSysObjects", "[Name] = '" & Me.Metin2 & "'") = 1 Then
MsgBox "Firma Mevcut"
Else
xSQL = "SELECT * INTO [" & Me.Metin2 & "] FROM [FIRMAORNEK] where 1=0"
CurrentDb.Execute xSQL
End If
teşekkürler.
iyi çalışmalar dilerim. konuyu taşıyabilirsiniz