Farklı Veritabanına Veri Aktarma

1 2
26/10/2011, 16:00

208319

merhaba sn. sledgeab tablolar arası veri kopyalamada formüllerde hata yapıyorum mümkünse kontrol edebilirmisin Frm den Frm1 e teşekkür ederim kolay gelsin
26/10/2011, 16:44

ozanakkaya

Tablodaki OlayAyı alanının varsayılan değerini
=Format(Date();"mmm")
yerine
=Format(Date();"mmmm")

yazmalısın,

Formun Kayıt kaynağını ve Açılan kutunun Denetim Kaynağını boş bırak.

Formdaki butonun tıklandığında olayına yazdığın kodu aşağıdaki ile değiştir.

Private Sub Komut104_Click()
Dim ay, yol As Integer
yol = CurrentProject.path & "\" & "Frm1.mdb"
ay = MtnAy
DoCmd.RunSQL "INSERT INTO Tablo ( SucNo, OlayAyi ) IN '" & yol & "' SELECT Tablo.SucNo, Tablo.OlayAyi, * FROM Tablo WHERE (((Tablo.OlayAyi)='" & ay & "'));"

End Sub
26/10/2011, 16:50

Yandemir

Dim yol, ay As Integer ????

string olmasın
26/10/2011, 18:17

208319

merhaba sledgeab bey aynısını uyguladım rutime error 13 hatası alıyorum siz uygulayabilirmisiniz eklentide mümkünse
26/10/2011, 23:09

ozanakkaya

Verilen kodların uygulanmış hali ektedir.
26/10/2011, 23:44

208319

merhaba hayırlı geceler hocam 1. de kaydediyor 2. de butona basmamda hata veriyor neden