Komut Düğmesi İle Sınırsız Sub Menü

1 2
30/04/2020, 14:39

accessman

iyi günler siteden alıp eklediğim örnekte 3 level için yapılmış bir menü örneği var
bunu sınırsız sayıda dallanabilen menü haline nasıl getirebiliriz
Kod:
SELECT MenuItems.MnsId, MenuItems.MnsDesc, MenuItems.SortKey, MenuItems.ActionType, MenuItems.CodeToRun FROM MenuItems WHERE (((MenuItems.Level)=1)) UNION ALL SELECT MenuItems.MnsId, "     :.....  " & MenuItems.MnsDesc, MenuItems.SortKey, MenuItems.ActionType, MenuItems.CodeToRun FROM MenuItems WHERE (((MenuItems.Level)=2) AND ((MenuItems.CurrentState)=1)) UNION ALL SELECT MenuItems.MnsId, "                  :.....  " & [MenuItems].[MnsDesc] AS Expr1, MenuItems.SortKey, MenuItems.ActionType, MenuItems.CodeToRun FROM MenuItems AS MenuItems_1 INNER JOIN MenuItems ON MenuItems_1.MnsId = MenuItems.SubId WHERE (((MenuItems.Level)=3) AND ((MenuItems.CurrentState)=1) AND ((MenuItems_1.CurrentState)=1))
ORDER BY MenuItems.SortKey;
form kayıt kaynağı olarak şöyle bir Sql cümlesi var
şimdiye kadar gördüğüm basit ama en kullanışlı menu oldu
tek eksiği 3 level için olması

30/04/2020, 16:21

ozanakkaya

Sınırsız sayıda yapabilmen için sınırsız sayıda liste kutusu ve her liste kutusuna eleman eklenebilmesi için sınırsız sayıda form oluşturmalısın.
30/04/2020, 16:43

accessman

elbette ama farklı bir bakış aşısı ile değerlendirsek
30/04/2020, 18:49

mehmetdemiral

(30/04/2020, 16:43)accessman yazdı: elbette ama farklı bir bakış aşısı ile değerlendirsek
Sayın Accesman, biz dünyaya aynı açıdan bakmıyor olabiliriz. Sizin bakış açınızı biraz daha açıklar mısınız?
01/05/2020, 03:17

accessman

Benim baktığım  yerden gördüğüm şu
Bir tabloda değerler var
Bir buton ve metin kutusu içeren sürekli form var
Sql cümleleri ile kayıtlar filtreleniyor
Sql cümlesinde ve tabloda deiğişiklik ile sınırsız hale geleceğini umuyorum
01/05/2020, 05:33

ozanakkaya

Yanlış umuyorsunuz. Uygulamada 3 liste kutusu var. 4. Liste kutusu için tabloya yeni sütun açmalısınız, aynı şekilde 5. liste kutusu için yine yeni sütun açmalısınız. 

Bunlarla uğraşacağınıza Access öğrenseniz??
1 2