[VBA] Dış Veri Tabanından Veri çekerken Hata Alıyorum
#1
Merhaba,  
ben verileri excel ile accesse  bağlantı yaparak aktarıyorum. aktarım yaparken aşağıdaki kodu kullanıyorum. 
Visual Basic
  1. Dim mesaj
  2.    mesaj = MsgBox("Bu yapacağınız İşlem Geri Alınamaz!!! Tablolar Üzerinde Değişiklik Yapacaktır!!! Çıkmak İçin Hayırı Tıklayınız?", vbCritical + vbYesNoCancel)
  3.  
  4.  If mesaj = vbYes Then
  5.  
  6.  CurrentDb.Execute "Delete  From TBL_Police"
  7.    CurrentDb.Execute "ALTER TABLE TBL_Police ALTER COLUMN ID COUNTER(1,1)"
  8.    CurrentDb.Execute "INSERT INTO TBL_Police ( [txt_Musteri] SELECT Police.[SIG_ETTIREN_AD] FROM [Police]"
  9.       MsgBox "Poliçe Tablonunuza Güncel Verileriniz Eklenmiştir!!!", vbInformation
  10.  
  11. ElseIf mesaj = vbNo Then
  12.        DoCmd.Close
  13.    End If
  14.  



hem access hızlı olması hemde verilerimin zarar görmemesi için tablo veri tabanımı veritabanı bölücü ile böldüm. Şimdi yukardaki komutum çalışmıyor nasıl cözeceğimi iki gündür arıyorum fakat çözüm bulamadım yardımlarınızı bekliyorum. şimdiden teşekkür ederim.



  Alıntı
Bu mesajı beğenenler:
#2
Ne hatası veriyor. Hata ekranını ekleyebilir misiniz.



  Alıntı
Bu mesajı beğenenler:
#3
Merhaba, almış olduğum hata ekteki gibidir.  Dosya çok boyutlu oldugu için ekleyemiyorum.


Eklenti Dosyaları
.jpg   hata.jpg (Boyut: 172,76 KB / İndirilme: 63)



  Alıntı
Bu mesajı beğenenler:
#4
Aşağıdaki gibi satırı değiştirip denermisiniz.

Visual Basic
  1. CurrentDb.Execute "ALTER TABLE [" & CurrentDb.TableDefs(TBL_Police).Connect & "].[" & TBL_Police & "] ALTER COLUMN [ID_COUNTER(1,1)]"





  Alıntı
Bu mesajı beğenenler:
#5
(18-03-2020, 12:56)onur_can demiş ki: Aşağıdaki gibi satırı değiştirip denermisiniz.

Visual Basic
  1. CurrentDb.Execute "ALTER TABLE [" & CurrentDb.TableDefs(TBL_Police).Connect & "].[" & TBL_Police & "] ALTER COLUMN [ID_COUNTER(1,1)]"


merhaba ,yine hata verdi


Eklenti Dosyaları
.jpg   hata2.jpg (Boyut: 166,13 KB / İndirilme: 61)



  Alıntı
Bu mesajı beğenenler:
#6
İlk hatanızın düzelmiş olduğu görülüyor. Bağlantı yapamıyordu, şimdi bağlantı yapıyor fakat alan adı ile ilgili bir sorun var gibi
son kısımda bulunan ID alan adı ayrı olması gerekiyor,

Visual Basic
  1. ALTER COLUMN ID COUNTER(1,1)"



bu şekilde değiştirin.



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Tabloya Değer Kümesinden Veri Seçerek Veri Girişi Saglanması sevincili 2 116 26-03-2024, 20:07
Son Mesaj: sevincili
  [FORM] Veri Girişine Bağlı Olarak Veri çeşidi Toplam Sayısının Artması M_Kemal_Askeri 2 102 07-03-2024, 20:03
Son Mesaj: M_Kemal_Askeri
  [FONKSiYON] Bölünmüş Veri Tabanın Yedeğini Alma webtenoyna 1 99 19-02-2024, 01:48
Son Mesaj: dsezgin
  Access Formu üzerinden Sql Server Tabloya Nasıl Veri Kaydı Yapılır karacahil 4 204 15-02-2024, 12:10
Son Mesaj: halily
  [FONKSiYON] Fonksiyonda Hata zimbit 1 102 12-02-2024, 18:52
Son Mesaj: dsezgin
  Tabloya Qr Kodla Veri Giriş SBNS 3 171 08-02-2024, 13:24
Son Mesaj: BeyTor
  [SORGU] Tablo2'den Tablo1'e şartlı Veri Girişi. ŞabanTR 4 147 19-01-2024, 20:17
Son Mesaj: ŞabanTR
  [VBA] Rapora Veri Aktarımı zimbit 15 302 19-01-2024, 02:10
Son Mesaj: zimbit

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 2 Ziyaretçi