+- 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ığı: Klasör, dosya (/konu-klasor-dosya.html)
Cvp: Klasör, dosya - okileturc - 02/09/2009
Sn. maytas size de çok tşk ederim
Elinize sağlık.
Cvp: Klasör, dosya - maytas - 02/09/2009
(02/09/2009, 06:07)benremix yazdı: Katkı ve paylaşımlarınız için emeği geçenlere teşekürler.
Sn Maytas örneğinizi inceledim. Tabloya aktardığımda öncekiler gidiyor. Bunun yerine ekleme yapmak için ne yapabiliriz?
Saygılar...
Aslında yanılmıyorsam istenen o şekildi.
Sizin isteğinize göre ise Tablo_Olustur prosedürünü revize etmek lazım.
Burada tabloyu silen kodlar var, bunları devre dışı bırakmak lazım.
Bu şekil deneyin:
Kod:
Private Sub Tablo_Olustur()
Tablo_Adi = "YeniTablo"
' On Error Resume Next
' CurrentDb.TableDefs.Delete Tablo_Adi 'tablo varsa siliyor
' On Error GoTo 0
' Set Tablo = CurrentDb.CreateTableDef(Tablo_Adi)
' With Tablo
' .Fields.Append .CreateField("DosyaAdi", dbText)
' .Fields.Append .CreateField("DosyaYolu", dbText)
' End With
'CurrentDb.TableDefs.Append Tablo
End SubCvp: Klasör, dosya - benremix - 02/09/2009
Sn Maytas teşekkürler. Elinize sağlık. İşlem tamam. Saygılar.