תחומים - פורום חרדי מקצועי

@שאול-נ-י כתב בחיפוש תאריך ושעה הכי קרוב:

התכוונתי שידפיס את התאריך הבא ולא תאריך שכבר עבר
לדוגמה אם התאריך הוא עכשיו 21:40:00 2023-06-26
שידפיס 2022-06-27T19:35:00 ולא 2022-06-26T19:35:00
למרות שמבחינת תאריך הוא יותר קרוב

תרשה לי להשתמש טיפה ברוה"ק...
אתה רוצה את התאריך הכי קרוב להיום לפני שנה:
כלומר: בעצם להוריד את כל התאריכים שהם לפני היום של שנה שעברה ואז לבדוק מה היה הכי קרוב ליום הנ"ל (היום לפני שנה)
הכיוון הוא נכון?
א"כ, אז פשוט תעשה את מה ש @dovid כתב לך:

@dovid כתב בחיפוש תאריך ושעה הכי קרוב:

שני צעדים,
א. מיון הפריטים לפי התאריך
ב. בדיקת הפריטים עד הפריט הראשון שגדול מהתאריך הנוכחי.

ובמקום עד התאריך הנוכחי, תעשה עד התאריך של היום ב 2022 כלומר תפצל את זה ליום חודש ושנה ובשנה תוריד 1.

@Sara-Rivka
@אביי כתב בבעיה בהרצה בויזואל סטודיו בגלל מספר זהות שמתחיל ב- 0.:

@Sara-Rivka יכול להיות שאיפשהו באמצע ה0 נעלם, וממילא התוכנה לא מקבלת את מספר הזהות באופן תקין?
תנסו לבדוק לפני ביצוע היציאה מהו הערך של משתנה תעודת הזהות..

אם אכן זה נעלם, זה אומר ש הtype שלו הוא מספר וצריך להחליף את זה ל string.

@one1010 כתב בחישוב צאצאים אחרי 100 שנה:

מדהים הפער של שנתיים מה הוא יוצר!

זה לא מדויק?!
שנתיים * 395, בעצם = 790 שנה.

נ.ב. אני כנראה טועה כי באמת חסר כמה פרמטרים למסר שאליו אתה מתכוון...

@one1010 כתב בחישוב צאצאים אחרי 100 שנה:

התחלתי להתבלבל... כולכם כ"כ משכנעים...
בהתחלה שזה אחז ב11,000 צאצאים הבנתי שזאת טעות, עכשיו יש 3 טוענים בתוקף, אתה טוען 1,100 @dovid טוען 1,700 ו @avi-rz טוען 2000 ו

כולם עושים את אותו חישוב ואותם מסקנות!
אתה צריך להיות ברור בכללים ולפי זה תוכל לקבל תשובה בפה אחד מכלם,
שלושת האפשרויות תלויות בשלושת השאלות הבאות:

• האם הלידה הראשונה היא ב 20 והאחרונה ב 38 או הראשונה ב 22 והאחרונה ב 40?
  תשובה: אם הלידות הן בין 20-38 = 2,024 ואם הלידות הן בין 22-40 = 1,100

• האם המספר שאתה רוצה לקבל כולל את הלידות בשנת המאה או לא כולל?
  תשובה: אם הספירה כוללת את הלידות בשנת המאה, ולפי ההנחה שהלידות הן בין 20-38 = 2,024, ואם הספירה אינה כוללת את הלידות בשנת המאה, ולפי ההנחה שהלידות הן בין 20-38 כנ"ל = 1,705
  ואידך זיל גמור...

נ.ב. אם אתה רוצה לראות את השתלשלות השנים בכל שנה כמה נולדו ולאיזה דור תוכל להתשמש בקובץ שהבאתי למעלה ולבדוק בקונסול (F5)

בהצלחה.

@dovid כתב בחישוב צאצאים אחרי 100 שנה:

מהזוית של קוד מחשב, כתבתי איך שאני חושב, יצא לי 1705

בעצם גם לי יצא אותו דבר בהתחלה, רק ניסיתי לראות איפה הטעות שלי (בעצם לא בדיוק טעות כי אין פה כללים מאוד ברורים כל אחד מניח הנחות אבל כוונתי לדעת הקהל)
בעצם השאלה היא: כמה שנים יש בין 1 ל 100? > לכאו' 100,
אבל בקוד למעשה אנו מתחילים משנה עגולה כלומר 1900 שזה בעצם כמו אפס, ובאמת לא מחשיבים את שנת המאה - (2000),
אבל אם נחשב גם את שנת המאה (האלפיים), (בקוד שלי עשיתי נמוך שווה לשנת המאה) ובקוד של @dovid המצו' נוסיף לEND_YEAR עוד שנה ככה:

const END_YEAR = 2001;

נגיע לאותה תוצאה, 2024.

@one1010 מופיע בconsole(F12)

@מני-דונט https://tchumim.com/topic/11108/הפקדת-צ-קים-באימולוטר-בנטפרי-קחו-את-המידע/27

@חגי-פאהן כתב בחישוב צאצאים אחרי 100 שנה:

אפשר לחשב שהבן הראשון נולד בגיל 20 והאחרון בגיל 38

וזאת תהיה התוצאה:
צאצאים: 2024
מתוכם...
ילדים: 10 (20-38)
נכדים: 100 (40-76)
נינים: 916 (60-100+)
בני נינים: 997 (80-100+)
מצו'
נ.ב. (לא לשכוח להוריד בסוף1 - האבא)
תהליך הבדיקה:

        var year = 2000;
        var nextChildId = 1;
        var children = [];

        function addChild(nowYaer, father, generation) {
            children.push({
                id: nextChildId,
                age: 0,
                father,
                generation,
                birth: nowYaer
            });
            nextChildId++
        }

        function runYear() {
            for(let i=0;i<=100;i++){
                if ((i/2-i%2)===i/2) {
                    if (children.length === 0) {
                        addChild(year, 0, 0);
                    } else {
                        children.filter((child) => child.age >= 20 && child.age < 40).forEach((iChild) => {
                            addChild(year, iChild.id ,iChild.generation+1);
                        })
                    }
                    children.forEach((child) => {
                        child.age = child.age+2
                    })
                    year = year+2;
                }
            }
        }
        
        runYear();

ובשביל לשנות לידה הראשונה ב 22 והאחרונה ב 40 ניתן לשנות בשורה 22 ל:

                        children.filter((child) => child.age > 20 && child.age <= 40).forEach((iChild) => {

@laswater כתב בבאקסס- פיתרון ליצירת טופס עם כניסה למנהלים בלבד-ללא שום קודים!!!:

אם אתה יושב עם כמה חבר'ה תתניקים, ונותן להם את זה עם הטופס פלוס מינוס, הם לא ידעו יותר מידי.

אם מדובר כאן ב'אקרים' אז מה שלא תעשה הם יגיעו למסד הנתונים!

בעיקרון, צודק!
אבל יש דברים שפעם אחת ראו מישהו עושה את זה וזהו, זה לא מסובך לקלוט את זה, לא צריך כ"פ לפרוץ מחדש, וכו'.

@laswater בוא נעשה סדר,
יש מה שקראת לזה ליצור טופס כניסה שרק מי שיש לו הרשאות יוכל להמשיך לטופס הבא וע"ז הבאת את המדריך המושקע - יפה מאוד!
אממה כבר שאלו אותך מה הניסיונות לעקוף את זה, ולכן נכנס פה עוד נושא חדש של הצפנת כל מיני חלקים מהתוכנה בשביל שרק מנהלים עם הרשאות יוכלו להיכנס.
וע"ז הבאתי קישורים ויש עוד הרבה כאן ובפורומים אחרים ובכלל ברשת.
בוא ניקח דוגמא:
יבוא האקר ויבחר בדרך הפשוטה: פשוט לפתוח בחלונית הניווט את הטופס הרלוונטי ומשם להתקדם כרגיל,
אז מה אנחנו נעשה? נסמן בהגדרות של הקובץ הנוכחי - להסתיר את חולנית הניווט!
מה האקר יעשה? ילחץ על F11 ויצליח לפתוח את חלונית הניווט!
מה אנחנו נעשה? נעשה autoKeys שיבטל את הלחץ F11!
ומה האקר יעשה? ילחץ על shift בכניסה!
ומה אנחנו נעשה? אחרי הכניסה עם ההרשאות נכניס למשתנה מסוים בקוד הנעול איזה OK וכל פעולה משמעותית נבדוק שהמשתנה הזה הוא OK!
ומה האקר יעשה? הוא יבדוק מה הסיסמא בטבלאות!
ומה אנחנו נעשה? נסתיר את הטבלה!
ומה האקר יעשה? ילחץ על הצג כל הטבלאות וגם המוסתרות
ומה אנחנו נעשה? נעשה מסכת קלט של password (***)!
אז מה האקר יעשה? הוא ייבא את הטבלאות לאקסל ושם הוא יראה את הסיסמא!
אז מה נעשה עכשיו???.... וכן הלאה

בס"ד

ישם כאן בפורום מאמרים ע"ז
https://tchumim.com/topic/9065/איך-אני-נועל-את-האקסס-עם-שם-משתמש-וסיסמה

https://tchumim.com/topic/10581/אקסס-כניסה-עם-שם-משתמש-וסיסמה-איך-ניתן-לאבטח-את-זה

https://tchumim.com/topic/14853/תכנון-אקסס-לכמה-משתמשים

@OdedDvir כתב בבאקסס- פיתרון ליצירת טופס עם כניסה למנהלים בלבד-ללא שום קודים!!!:

@laswater אם תשתף מה שעשית נוכל להגיב. בינתיים זה נראה כאילו התכוונת לאתגר אותנו.

אם שמת לב, מתחילת הפרויקט שלו אנחנו מאותגרים, כל פעם בצורה יותר מעניינת מהקודמת

@laswater כתב בהאם ניתן להפוך את אקסס לתוכנה על מלא?:

אשמח לדעת האם ניתן להפוך את אקסס לתוכנה על מלא?
זאת אומרת שלא יהיה שום אפשרות לשחק עם התוכנה, ולא יהיה בין אקסס לתוכנה זו אלא מסד נתונים בלבד.
כמו בכל תוכנה אחרת... (אפ' כמו אקסס בעצמו)
אשמח לתגובה.

כמה שזכור לי יש כאן חומר בפורום תעשה חיפוש "אקסס מצב קיוסק" או משהו דומה.

@OdedDvir כתב בטופס חיפוש באקסס:

כתבתי פעם מדריך קצר לזה בפורום אופיס:
http://forum-office.co.il/topic/32/מדריך-יצירת-שאילתת-חיפוש-בשדות-מרובים-בטבלה?_=1683108292675

מומלץ בחום, יודע על אנשים שהתחילו עם זה, והגיעו במהירות להישגים יפים.

@dovid תודה רבה על כל ההשקעה והנכונות להנגיש את הכל בצורה יפה וברורה לתועלת הציבור!

@laswater כתב בבאקסס-הרצה של נתונים מסוימים בדף הבית של התוכנה:

@avi-rz אבלאני מבין שוודאי אין אפשרות שכל הנתונים יגולגלו בעמוד הראשון.
כמו יוצרים אחרי סרט להבדיל!!!

אין כמעט משהו א"א בקוד, ואפי' בvba
כל השאלה, האם זה הדרך המתאימה, האם זה נכון ככה לעשות, האם הפלטפורמה הנוכחית מתאימה לזה, וכמה השקעה צריך בשביל זה.

זה יכול להיות אפשרי:
בוא נאמר שאתה שם את זה בצד שמאל מלמטה למעלה, אתה מניח אותו למטה ובקוד (אירוע בעת פסיקת שעון), אתה מעלה אותו כל פעם בכמה px ובאותה מידה אתה יכול לעשות כמה כאלו ואחרי שהראשון באוויר להתחיל להעלות את השני וכן העלאה,
אתה בטח עושה "וואו" - אז התשובה היא כן קוד זה לפעמים צורך הרבה עבודה בשביל משהו קטן, אממה ישנם את השאלות שהבאתי למעלה שהם באמת שיקולים מרכזיים.

עכ"פ שיהיה בצלחה.

נ.ב. אני שקלתי בעבר ללכת על אפשרות משונה קצת אבל זה היה הכי פרקטי עבורי, בשביל ליצור גרפים, כמה סוגים ועם כל מיני נתונים, פשוט ליצור קובץ Html (בתיקייה מסוימת או בתיקייה של הקובץ הנוכחי) להכניס שם את הנתונים בפורמט json ולהכניס קישור לספריה של גרפים, וכל פעם שלוחצים על דוח, הוא דורס את הקובץ הישן ומכניס קובץ חדש ומרענן (התצוגה כמו קישור לדף של אינטרנט).

@Y-Excel-Access כתב בהורדת נתונים מגוגל שיטס ל VBA:

ניסיתי, ומושלם! - ממש עונה על הצורך שלי.
תודה רבה, עזרת לי ממש!

רק חשוב לשים לב,
לא הדגשתי את זה מספיק,
שהנתונים הנ"ל בעצם פתוחים לכלל הציבור ולא רק לאנשים ספציפיים. (רק יכול להיות שזה קישור ייחודי כלומר עם סטרניג)

האופציה הקלה, היא ע"י לפרסם את האקסל הנ"ל כאינטרנט, ואז לייבא אותו כדף אינטרנט,
הקצת יותר מסובך, זה להעתיק cookies וההידרס | לא ניסיתי את הדרך הזאת.

@laswater כתב בבאקסס-הרצה של נתונים מסוימים בדף הבית של התוכנה:

האם זה אפשרי להריץ באקסס נתונים מסוימים בדף הבית של התוכנה?
לדוג' בעסק מסוים עד שלא מתעדכן חדש תמיד רץ על המסך הראשי באיזה שהוא מקום, מדה כהן רכש ב300 ש"ח וכו'?

בעיקרון אתה יכול להניח את העסקה האחרונה בדף הבית ע"י
dlookup (לשלוף נתונים , שם / משפחה / סכום / ותאריך)
ולסנן את ה Id ע"י פונקציה:
או DMax כלומר ה id הגבוה / התאריך הגבוה, או להשתמש ב DLast. שזה אחרון (אם אתה מכניס עסקאות גם ישנות יותר בתאריך - אז הדרך הזאת אינה רלוונטית).

ולהחליף / לרענן אותו:
בכל יצירת עסקה חדשה
או אירוע פסיקת שעון כל דקה
או בעת לחיצה - וזה יהיה עדכני אחרי לחיצה, או לחילופין תזוזות עכבר (כלומר ע"י התערבות כל שהי).

בהצלחה.

@ג-ינג-י כתב בטופס חיפוש באקסס:

יש לי טבלה עם נתוני אנשים (שם, משפחה, וכו') ויצרתי טופס שמקושר לטבלה אני מעונין להוסיף אופציה של חיפוש בטופס - שזה יחפש ברשומות של הטבלה - ושהתוצאה תופיע בתור טופס (ראיתי כל מיני נוסחאות לחיפוש ברשת אבל זה היה חיפוש מתוך טבלה והתוצאה הופיעה בתור שורה בתוך טבלה, אני מעונין שזה יופיע בתור טופס).

אם אני מבין נכון, יש לך טופס שמציג את כל השורות שיש בטבלה, ואתה רוצה שבתיבת טקסט תוכל לכתוב טקסט, ובלחיצת כפתור או באירוע לאחר עדכון, אתה רוצה שהשדות בטופס יהיו מסוננים,
אז בגדול ישנם ב' דרכים לעשות את זה:
א: בוא נאמר שאתה רוצה לסנן בעמודה בשם "שם_מלא"
אז אתה מכניס משפט לסינון וכותב משהו כמו השורות הבאות:

Me.Form.Filter = "[שם_מלא]Like'*" & Me.תיבת_חיפוש.Value & "*'"
ME.Form.FilterOn = True 

ב: את רוצה כנ"ל, אתה יכול גם בכלל לשנות את המקור של הטופס, שאתה כתבת שאתה מחבר את הטופס לטבלה של האנשים, בעצם מאותו רגע שאתה רוצה לסנן אתה לא מחבר אותו ישר לטבלה הנ"ל, אלא לשאילתה שהיא מסנן את הטבלה הנ"ל לפי התיבת טקסט, משהו כמו זה:

'לכתוב את המשפט SQL / השאילתה בעצמה
strSql = "select * FROM טבלת_אנשים WHERE (((שם_מלא) Like '*" & Me.תיבת_חיפוש.value & "*'));"
'להחליף את המקור של הטופס בשאילתה הנל
Me.RecordSource = strSql
'ואולי גם לרענן - (יכול להיות שזה קורה לבד)
me.Requery 

כמובן קודם אולי לבדוק שיש בתיבת חיפוש משהו, או שבאמת לא כ"כ צריך כי אז יוצא שהוא מסנן **
וישנה אפשרות גם להרחיב את הסינון לעוד עמודות עם "AND"

וכו'..

בהצלחה