sayın mengene2,
aslında gerek bir önceki mesajımda gerekse de sizin bu son mesajınızda sorunun kaynağının çözümü için şu hususun bilinmesi,değerlendirilmesi ve üzerinde durulması gerekiyor.
bu değişken tanımlamalarının olmamasının sonucunda size hata bildirimlerinin oluşması ve gerekli uyarılara cevap verebilmeniz ve hatanın nerede olduğundan ve neden kaynaklandığından haberdar olmanızı sağlayacak uyarıcıların aktifliğini gerçekleştirmeniz lazım.bunun için de aşağıdaki bağlantıda belirtilen açıklamaları gözden geçirerek uygulamanız yerinde olacaktır.
Option Compare Database ve Option Explicit Arasındaki Fark
kodlama sayfalarınızda başlangıç tanımlaması olarak Option Compare Database yerine Option Explicit kullandığınız takdirde;eğer kodlama yazarken bir değişken tanımlaması yapmayı unutursanız,yanlış alan adı yazarsanız,uygulamanızın çalıştırılmasında size bu noksanlıklar hata olarak geri dönecek ve kodlamanın hangi kısmında nasıl bir hata yaptığınızı göstermiş ve düzeltmenize imkan sağlamış olacaktır.bilgilerinize.
son bahsettiğiniz hataya dair de şunlar düşünülebilir kanısındayım:
- alan isimleri yanlış yazılmış olabilir,
- eksik alan adı söz konusu olabilir,
-tek / çift tırnak yazımı yanlış olabilir.
bir de,2007 kullandığım için 2010 uygulamanıza bakamıyorum.dönüştürebilirseniz olabilir.
iyi çalışmalar,
saygılar.
Treewiev menüde Move Up ve Move Down sorunu
Merhaba atoz112,
Uygulamayı yurt dışı kaynaklı bir siteden buldum ve inanın hiç müdahale etmedim. Sadece 2003 versiyonu 2010 versiyona çevirdim tuşlar çalışmaz oldu. Sizden ricam hatanın nerede ve nasıl çözüleceğine dair yardımcı olursanız çok sevinirim.
Ayrıca dosya 2007 uyumludur 2007 de de açabilirsiniz.
Selamlar,
Uygulamayı yurt dışı kaynaklı bir siteden buldum ve inanın hiç müdahale etmedim. Sadece 2003 versiyonu 2010 versiyona çevirdim tuşlar çalışmaz oldu. Sizden ricam hatanın nerede ve nasıl çözüleceğine dair yardımcı olursanız çok sevinirim.
Ayrıca dosya 2007 uyumludur 2007 de de açabilirsiniz.
Selamlar,
sayın mengene2,
son eklediğiniz uygulama ne yazık ki 2007 uyumlu değil,açılmamaktadır.
yukarıda belirttiğim kontrolleri sağladınız mı? bir ihtimal,yine aynı şekilde hatalı yazım yanlışına maruz kalmış olabilirsiniz.
eğer 2007 olarak ekleyemiyorsanız bir de,sorunun yaşandığı formun kod sayfasındaki tüm kodları içerecek şekilde bir word dosyasına aktarıp öyle de mesajınıza ekleyebilirsiniz,en azından oradan da kontrol edilebilir diye.
bir de bahsettiğiniz yabancı kaynaklı örnek uygulamayı da 2010 olmayacak şekilde de ekleyebilir misiniz,incelemek için.
iyi çalışmalar,
saygılar.
son eklediğiniz uygulama ne yazık ki 2007 uyumlu değil,açılmamaktadır.
Alıntı:- alan isimleri yanlış yazılmış olabilir,
- eksik alan adı söz konusu olabilir,
-tek / çift tırnak yazımı yanlış olabilir.
yukarıda belirttiğim kontrolleri sağladınız mı? bir ihtimal,yine aynı şekilde hatalı yazım yanlışına maruz kalmış olabilirsiniz.
eğer 2007 olarak ekleyemiyorsanız bir de,sorunun yaşandığı formun kod sayfasındaki tüm kodları içerecek şekilde bir word dosyasına aktarıp öyle de mesajınıza ekleyebilirsiniz,en azından oradan da kontrol edilebilir diye.
bir de bahsettiğiniz yabancı kaynaklı örnek uygulamayı da 2010 olmayacak şekilde de ekleyebilir misiniz,incelemek için.
iyi çalışmalar,
saygılar.
Merhaba atoz112,
Uygulamayı yabancı kaynaklardan aldığım şekli ektedir ve 2003 versiyonu uyumludur dolayısıyla 2007 de açabilirsiniz.
Ayrıca level 2 alanında hata veren yerin kodunu ekledim İnceleyebilirsiniz.
aşağıdaki satırı hatada işaretliyor.
Selamlar,,
Uygulamayı yabancı kaynaklardan aldığım şekli ektedir ve 2003 versiyonu uyumludur dolayısıyla 2007 de açabilirsiniz.
Ayrıca level 2 alanında hata veren yerin kodunu ekledim İnceleyebilirsiniz.
Private Sub cmdLv2MoveUp_Click()
Dim rs1 As Recordset
Dim CurSeq As Integer
Dim strsql As String
CurSeq = List2.Column(3)
strsql = "select seq from menuıtems where Level=2 and subid=" & List1 & " order by seq"
Set rs1 = CurrentDb.OpenRecordset(strsql)
rs1.FindFirst "[seq] =" & CurSeq
rs1.Edit
rs1!seq = CurSeq - 1
rs1.Update
rs1.MovePrevious
If Not rs1.BOF Then
rs1.Edit
rs1!seq = CurSeq
rs1.Update
Else
rs1.MoveNext
rs1.Edit
rs1!seq = CurSeq
rs1.Update
MsgBox ("Already at top")
End If
rs1.Close
Set rs1 = Nothing
List2.Requery
End Sub
aşağıdaki satırı hatada işaretliyor.
Set rs1 = CurrentDb.OpenRecordset(strsql)
Selamlar,,
Son Düzenleme: 30/06/2014, 20:57, Düzenleyen: mengene2.
sayın mengene2,
son eklediğiniz kodlama ve örnek kodlamasında da tekrar görüldüğü üzere,size daha önceki 5.mesajda yazdığım hususların gözden kaçırmış olduğunuz varsayılarak hali hazırda geçerli olduğu belirlenmiştir.
yukarıdaki Sql sorgu kodlamanızı barındıran tüm sorgu kalıplarınızı tekrar tablo adının ve tablonuzdaki alan adlarının büyük / küçük harf yazılışına bakarak tekrar düzenlemeniz gerekmektedir.mesela;menuıtems yerine MenuItems,level yerine Level yazılması gerektiği gibi...bu durumu giderdiğiniz takdirde sorununuz da çözülecektir.bilgilerinize.
iyi çalışmalar,
saygılar.
son eklediğiniz kodlama ve örnek kodlamasında da tekrar görüldüğü üzere,size daha önceki 5.mesajda yazdığım hususların gözden kaçırmış olduğunuz varsayılarak hali hazırda geçerli olduğu belirlenmiştir.
Alıntı:...konunuzu açmanıza sebep olan move up / down hareket etmeme sorununuzun sebebinin de kodlarınızdan kaynaklı olduğu ortaya çıkmıştır.sql sorgu satırlarınızda yazdığınız alan isimleri tablodaki alan isimlerine göre yazım farkı (büyük / küçük harf) içermelerinden dolayı bahsi geçen hatayı vermektedir.mesela;tablonuzda Level yazarken level yazmanız gibi....
strsql = "select seq from menuitems where level=1 order by seq"
yukarıdaki Sql sorgu kodlamanızı barındıran tüm sorgu kalıplarınızı tekrar tablo adının ve tablonuzdaki alan adlarının büyük / küçük harf yazılışına bakarak tekrar düzenlemeniz gerekmektedir.mesela;menuıtems yerine MenuItems,level yerine Level yazılması gerektiği gibi...bu durumu giderdiğiniz takdirde sorununuz da çözülecektir.bilgilerinize.
iyi çalışmalar,
saygılar.
tamamdır teşekkür ederim sorun çözüldü
Konuyu Okuyanlar: 1 Ziyaretçi