- Katılım
- 22 Aralık 2005
- Mesajlar
- 423
- Excel Vers. ve Dili
- Microsoft 365
- Altın Üyelik Bitiş Tarihi
- 03.12.2025
Arkadaşlar merhaba,
Aşağıda paylaştığım kodlar ile Bütçe veya Stok depolarımıza ulaşarak Access veritabanındaki stok kartı sayısına ulaşmaya çalışıyorum. Uygulama bir user form üzerinden Bütçe olarak seçilmiş ise Bütçe, Stok Deposu seçilmiş ise İlgili stok deposuna bağlanıyor. Sorun Stok Deposuna bağlanabiliyor ve mevcuttaki kart sayısına ulaşabiliyorken Bütçe kartı oluşturmak istediğim aynı mantık ile kopyala yapıştırla eklediğim Bütçe dosyasına ulaşamıyor ve 3709(the connection cannot be used to perform this operation. It is either closed or invalid in this context ) hatası alıyorum. Herşey aynı Stok Kartı oluşturuyor ama Bütçe Kartı oluşturmuyor. Bunun sebebi konusunda bir fikri olan var ise yardımcı olabilir mi?
Aşağıda paylaştığım kodlar ile Bütçe veya Stok depolarımıza ulaşarak Access veritabanındaki stok kartı sayısına ulaşmaya çalışıyorum. Uygulama bir user form üzerinden Bütçe olarak seçilmiş ise Bütçe, Stok Deposu seçilmiş ise İlgili stok deposuna bağlanıyor. Sorun Stok Deposuna bağlanabiliyor ve mevcuttaki kart sayısına ulaşabiliyorken Bütçe kartı oluşturmak istediğim aynı mantık ile kopyala yapıştırla eklediğim Bütçe dosyasına ulaşamıyor ve 3709(the connection cannot be used to perform this operation. It is either closed or invalid in this context ) hatası alıyorum. Herşey aynı Stok Kartı oluşturuyor ama Bütçe Kartı oluşturmuyor. Bunun sebebi konusunda bir fikri olan var ise yardımcı olabilir mi?
Kod:
If masrafkarti = 1 Then
Call KART_VERI_TAB_BAGLAN
tanimlanan = "SELECT * FROM [BUDGET] ORDER BY SIRA DESC"
Set rs = CreateObject("ADODB.Recordset")
rs.Open tanimlanan, AdoCN, 1, 3
Else
Call KART_VERI_TAB_BAGLAN
tanimlanan = "SELECT * FROM [STOK] ORDER BY SIRA DESC"
Set rs = CreateObject("ADODB.recordset")
rs.Open tanimlanan, AdoCN, 1, 3
End If
