אופיס 365 עזרה באקסס

  • הוסף לסימניות
  • #1
שלום לחברי הפורום.
רציתי לדעת איך אפשר באמצעות קוד לכתוב / לקרוא ערכים מטבלאות. [אני יודע שאקסס בנויה בצורה של טופס שהמקור שלו זה טבלה או שאילתה, אני שואל בכוונה על קוד.]

תודה, יוסי.
 
  • הוסף לסימניות
  • #4
תגיד מה אתה רוצה לעשות וידריכו אותך,
אין סוף בלפשט את הדוגמאות הנ"ל
 
  • הוסף לסימניות
  • #5
יש לי עבודות שהם לפי שעה. לצורך כך בניתי באקסס טיימר עם הפרטים הבאים: מזהה לקוח, מזהה הזמנה, התחלה, סיום, סיכום.
כשאני לוחץ על סיום מורצת הפקודה GoToRecord, New. היות והקובץ מקושר לטבלה Timer השדות מזהה לקוח והזמנה נמחקים. בפעם הבאה שארצה ללחוץ על התחלה (ולפעמים זה מאוד מהר) שוב אצטרך להזין את הפרטים האלה.
אני רוצה שבכל לחיצה על "סיום" ישלפו הערכים שנמצאים בשורה האחרונה שבטבלה טיימר ויוזנו בשדות הרלוונטיים.
ומכאן מגיעה שאלתי וכדלעיל בהודעה #1.

תודה לכל המגיבים!
 
  • הוסף לסימניות
  • #6
אני לא מבין למה כשאתה לוחץ על סיום הוא צריך לעשות רשומה חדשה, סיום אמור לרשום רק יציאה בשורה שכבר נרשמה בה כניסה...
אבל זה לא הענין.

תשים את הקוד הזה בלחצן:
כמובן, תשנה את שם הטבלה והשדות, שים לב שמשתנה קוד1 הוא מסוג strung שהוא מקבל רק טקסט. ומשתנה קוד2 הוא מסוג long שהוא מקבל רק ספרות.
הקוד הזה אינו קשור לאיזה טבלה הטופס שלך קשור, אתה יכול להפעיל אותו מכל טופס שהוא.
תוסיף משתנים ושדות כרצונך.

קוד:
    Dim db As DAO.Database
    Dim rs As DAO.Recordset

    Dim Kod1 As String
    Dim kod2 As Long

    Set db = CurrentDb
    Set rs = db.OpenRecordset("שם טבלה")

    rs.MoveLast

    Kod1 = rs![שם שדה1]
    kod2 = rs![שם שדה2]

    rs.AddNew
    rs![שם שדה1] = Kod1
    rs![שם שדה2] = kod2
    rs.Update

    Set db = Nothing
    Set rs = Nothing
 
  • הוסף לסימניות
  • #7
עובד מצוין!!! רוב תודות!
 
  • הוסף לסימניות
  • #9
רק תשים לב שמזהה לקוח והזמנה נלקחים מרשומה האחרונה בטבלה,
ואם אתה עובד עם טופס מסונן וכדומה, הוא לא שם לב לזה.
:)
עוד שאלה קטנה: בדוגמא שהצעת ההצהרות על המשתנים היו בתחילת השגרה, השאלה היא, אם אני רוצה להשתמש באותם משתנים בשגרות נוספות, זכור לי שצריך להצהיר עליהם במקום אחר בקוד, ואז הם "מוכרים" בכל השגרות של הטופס. איך עושים את זה, והאם זו הדרך הנכונה?
תודה
 
  • הוסף לסימניות
  • #11
באותו טופס, תשים אותם למעלה בתחילת דף הקוד אחרי השורה או שני השורות הראשונות.
אם תרצה שיהיו זמינים גם בטפסים אחרים תצהיר עליהם כמשתנה גלובלי במודול, כ public במקום dim
 
  • הוסף לסימניות
  • #12
  1. מצוין, תודה!
  2. שאלה כללית יותר: יש הבדל בין Visual Basic ל-Visual Basic for Applications? פשוט מצאתי איזה ספר ישן Visual Basic 6.0 ולפני שאני מתחיל לחרוש עליו רציתי לדעת אם זו אותה שפה או שיש הבדל ביניהם???
 
  • הוסף לסימניות
  • #13
זה אותה עקרון, לא אותה שפה.
אבל למה לך לחרוש, פשוט תנסה...
 
  • הוסף לסימניות
  • #14
[במקום לפתוח אשכול חדש לכל שאלה, אני יעלה כאן שאלות שיצוצו לי מידי פעם]
  1. יש לי טופס שמקור הרשומה שלו היא טבלה. השאלה שלי אם יש אפשרות להגדיר בפילטר שם של שאילתה, במקום להזין תנאי.
  2. חוצמיזה, איך בכלל כותבים תנאי, לדוגמא אם יש לי טבלה של עבודות שיש לו שדה "מצב", ואני רוצה להציג את כל הרשומות שהם לא "הושלם". אני יודע שצריך לכתוב משהו כזה "[מצב]"=NOT "הושלם", אבל תכלס שאני כותב ככה זה לא עובד, אשמח להדרכה בעניין.
תודה.
 
  • הוסף לסימניות
  • #16
יש לי טופס שמקור הרשומה שלו היא טבלה. השאלה שלי אם יש אפשרות להגדיר בפילטר שם של שאילתה, במקום להזין תנאי.
תוכל להזין שם של שאילתה במקור הטופס.
כפילטר, אפשר לציין רק תנאי.

חוצמיזה, איך בכלל כותבים תנאי, לדוגמא אם יש לי טבלה של עבודות שיש לו שדה "מצב", ואני רוצה להציג את כל הרשומות שהם לא "הושלם". אני יודע שצריך לכתוב משהו כזה "[מצב]"=NOT "הושלם", אבל תכלס שאני כותב ככה זה לא עובד, אשמח להדרכה בעניין.
=[מצב]<>"הושלם" Or Is Null
תעתיק מכאן זה ייכנס נכון.
 
  • הוסף לסימניות
  • #17
=[מצב]<>"הושלם" Or Is Null
תעתיק מכאן זה ייכנס נכון.
צילום מסך.JPG

זה התגובה שאני מקבל.
 
  • הוסף לסימניות
  • #18
צודק. טעות שלי צריך להיות כך
[מצב]<>"הושלם" or [מצב] is null
 
  • הוסף לסימניות
  • #19
צילום מסך.JPG

ניסיתי גם להקיף את [מצב] בגרשיים
"[מצב]"
אך ללא הועיל.
 

פרוגבוט

תוכן שיווקי
פרסומת

הצטרפות לניוזלטר

איזה כיף שהצטרפתם לניוזלטר שלנו!

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

לוח מודעות

הפרק היומי

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


תהילים פרק כה

אלְדָוִד אֵלֶיךָ יי נַפְשִׁי אֶשָּׂא:באֱלֹהַי בְּךָ בָטַחְתִּי אַל אֵבוֹשָׁה אַל יַעַלְצוּ אֹיְבַי לִי:גגַּם כָּל קוֶֹיךָ לֹא יֵבֹשׁוּ יֵבֹשׁוּ הַבּוֹגְדִים רֵיקָם:דדְּרָכֶיךָ יי הוֹדִיעֵנִי אֹרְחוֹתֶיךָ לַמְּדֵנִי:ההַדְרִיכֵנִי בַאֲמִתֶּךָ וְלַמְּדֵנִי כִּי אַתָּה אֱלֹהֵי יִשְׁעִי אוֹתְךָ קִוִּיתִי כָּל הַיּוֹם:וזְכֹר רַחֲמֶיךָ יי וַחֲסָדֶיךָ כִּי מֵעוֹלָם הֵמָּה:זחַטֹּאות נְעוּרַי וּפְשָׁעַי אַל תִּזְכֹּר כְּחַסְדְּךָ זְכָר לִי אַתָּה לְמַעַן טוּבְךָ יי:חטוֹב וְיָשָׁר יי עַל כֵּן יוֹרֶה חַטָּאִים בַּדָּרֶךְ:טיַדְרֵךְ עֲנָוִים בַּמִּשְׁפָּט וִילַמֵּד עֲנָוִים דַּרְכּוֹ:יכָּל אָרְחוֹת יי חֶסֶד וֶאֱמֶת לְנֹצְרֵי בְרִיתוֹ וְעֵדֹתָיו:יאלְמַעַן שִׁמְךָ יי וְסָלַחְתָּ לַעֲוֹנִי כִּי רַב הוּא:יבמִי זֶה הָאִישׁ יְרֵא יי יוֹרֶנּוּ בְּדֶרֶךְ יִבְחָר:יגנַפְשׁוֹ בְּטוֹב תָּלִין וְזַרְעוֹ יִירַשׁ אָרֶץ:ידסוֹד יי לִירֵאָיו וּבְרִיתוֹ לְהוֹדִיעָם:טועֵינַי תָּמִיד אֶל יי כִּי הוּא יוֹצִיא מֵרֶשֶׁת רַגְלָי:טזפְּנֵה אֵלַי וְחָנֵּנִי כִּי יָחִיד וְעָנִי אָנִי:יזצָרוֹת לְבָבִי הִרְחִיבוּ מִמְּצוּקוֹתַי הוֹצִיאֵנִי:יחרְאֵה עָנְיִי וַעֲמָלִי וְשָׂא לְכָל חַטֹּאותָי:יטרְאֵה אוֹיְבַי כִּי רָבּוּ וְשִׂנְאַת חָמָס שְׂנֵאוּנִי:כשָׁמְרָה נַפְשִׁי וְהַצִּילֵנִי אַל אֵבוֹשׁ כִּי חָסִיתִי בָךְ:כאתֹּם וָיֹשֶׁר יִצְּרוּנִי כִּי קִוִּיתִיךָ:כבפְּדֵה אֱלֹהִים אֶת יִשְׂרָאֵל מִכֹּל צָרוֹתָיו:
נקרא  2  פעמים
למעלה