Sn. maytas size de çok tşk ederim
Elinize sağlık.
#13
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Klasör, dosya
#13
#14
(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 Sub
#15
Sn Maytas teşekkürler. Elinize sağlık. İşlem tamam. Saygılar.
Bilgi paylaşıldıkça çoğalır....
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.
Access için her zaman lazım olacak konu başlıkları listesi
Her engel, yaşam koşullarınızı daha iyileştirecek bir fırsattır.
Access için her zaman lazım olacak konu başlıkları listesi
Konuyu Okuyanlar: 1 Ziyaretçi
