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

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

וכעת להסבר לגבי הקובץ,
הקובץ מחולק ל – 8 מודולים:

1. ApiYemot
   אוסף מקוצר ונגיש של כל הקודים הישירים לתקשור עם שרת 'ימות'
2. Campaign
   קודים לתקשור עם מערכת 'שיגור הודעות', יצירת קמפיין, הפעלה, מחיקה וניהול רשימות תפוצה
3. Contact
   מודול כללי האחראי ליצירת החיבור לשרת ימות המשיח
4. CreateTable
   מודול כללי האחראי ליצירת טבלאות לצורך קבלת הנתונים
5. ImportingFiles
   מודול יבוא נתונים משרת ימות המשיח ומקובץ מקומי במחשב
6. JsonConverter
   מודול כללי להמרת מחזורת טקסט לפורמט Json
7. UploadingFiles
   מודל העלאת נתונים לשרת ימות המשיח
8. WebHelpers
   מסייע ה web לתקשור עם ה api של ימות

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

ymtImportFileFromServer – ייבוא קובץ ymgr משרתי ימות המשיח
הקוד מקבל קובץ משרתי ימות המשיח, מנתח אותו, ומייבא אותו לתוך טבלה מקומית באקסס
הקוד מתאים לכל סוג קובץ, אם זה LogRecordingAndEnteringData.ymgr או ApprovalAll.ymgr ואם זה approval_number_log.ymgr
הטבלה שתקבל את הנתונים תהיה בנויה באותה צורה שבנוי הקובץ המקורי, אלא שהיא מחולקת לעמודות ברורות המייצגות את סוגי הערכים, ורשומות המציגים את הערכים
ארגומנטים נדרשים: מספר מערכת, סיסמה, כתובת הקובץ, שם הקובץ, שם טבלה לאחסון הקובץ
ארגומנטים אופציונלים: מצב טבלה קיימת, החל מרשומה, עד רשומה
דוגמא:

ymtImportFileFromServer "0771234567","1234","/Log","LogFolderEnterExit-2019-09.ymgr","נתוני האזנה",1,1,100

הקוד מיבא את קובץ LogFolderEnterExit-2019-09.ymgr מתיקיית הלוגים שבמערכת, אל תוך טבלה חדשה בשם 'נתוני האזנה', באם כבר קיימת טבלה בשם הזה, הוא ימחוק אותה, הקוד ייבא רק החל משורה 1 מקובץ ועד שורה 100
הערה: הקוד יוצר את הטבלה, אין צורך שהטבלה תהיה קיימת במערכת.
במקרה שהטבלה כבר קיימת ניתן לבחור באחד מ-3 האפשרויות, 1. מחיקת הטבלה הקיימת 2. הוספת מספר רץ לשם הטבלה, לדוגמא "נתוני האזנה1" וכן הלאה. 3. ייבוא לתוך הטבלה הקיימת.
נקודה נוספת,
הקוד משתמש בפונקציית DownloadFile המקבלת את פרטי הקובץ בימות ומחזירה אותו כטקסט, ולאחר מכן הקוד ממשיך וממיר את המחרוזת טקסט לטבלה
במקרה בו רוצים לקבל את תוכן הטקסט ללא המרה לטבלה באקסס (כגון לקבצים שאינם בסיומת ymgr, קובץ ini למשל, אם רוצים 'לקרוא' הגדרות של שלוחה) אפשר לקרוא ישירות לפונקציה DownloadFile והופנקציה תחזיר את תוכן הקובץ
הפונקציה דורשת: מספר מערכת, סיסמה, כתובת הקובץ ושם הקובץ
דוגמא:

DownloadFile "0771234567","1234","/1","ext.ini"

הפונקציה תחזיר את תוכן קובץ ההגדרות של שלוחה 1 שתחת התפריט הראשי

ymtImportFileFromComputer – ייבוא קובץ ymgr מתיקיה מקומית במערכת
הקוד הזה עושה את אותה הפעולה שעושה ymtImportFileFromServer אלא שהוא אינו מיבא קובץ משרתי ימות המשיח אלא קובץ מקומי שהורד כבר אל המחשב (למקרה בו אין חיבור לאינטרנט וכדו')
בקוד הזה יש לספק במקום מספר מערכת, סיסמה ומיקום, רק את הנתיב המלאה של הקובץ
ארגומנטים נדרשים: נתיב הקובץ, שם טבלה לאחסון הקובץ
ארגומנטים אופציונלים: מצב טבלה קיימת, החל מרשומה, עד רשומה
דוגמא:

ymtImportFileFromComputer "C:\Users\user\Desktop\ApprovalAll.ymgr","נתוני מכירות",1,1,100

הקוד מיבא את קובץ ApprovalAll.ymgr משולחן העבודה במחשב, אל תוך טבלה חדשה בשם 'נתוני מכירות'.
הקוד מייבא רק את 100 השורות הראשונות, באם ימצא טבלה עם הטבלה, הטבלה תמחק.
הערה: ניתן לקבל את נתיב הקובץ על ידי יצירת מודול המציג דיאלוג של אופיס, בדומה לדיאלוג של 'פתיחה'.

ymtUplodingFileToServer – עדכון קובץ בשרתי ימות המשיח
הקוד מעלה תוכן טקסט אל קבצים המאוחסנים בשרתי ימות המשיח.
הקוד יכול לעדכן כל קובץ שהוא,
לדוגמא, ניתן לעדכן את קובץ EnterIDValName.ini המכיל את ערכי השמות למספרי הזיהוי על פי טבלה באקסס.
כמו"כ באם הקובץ לא קיים, הקוד יצור אותו, מה שנותן אופציה ליצור שלוחה, על ידי העלאת קובץ ext.ini המכיל את הגדרות השלוחה, ולציין את המיקום השלוחה הרצוי
ארגומנטים נדרשים: מספר מערכת, סיסמה, כתובת הקובץ, שם הקובץ, תוכן הקובץ

דוגמא:

ymtUplodingFileToServer "0771234567","1234","/1","IdListMessage.ini","0501234567=l-/1/1.f-000"

הקוד יעלה לקובץ IdListMessage שבשלוחה 1 את נתוני ההשמעה למספר טלפון 0501234567
הערה:
כמובן שאת נתוני ההשמעה ניתן ליצור על ידי שאילתות וכדו' ואז לשלוח את התוצאה המומרת למחרוזת.
נקודה נוספת, הקוד "דורס" את מה שקיים כרגע בקובץ, כך שאם רוצים להוסיף על קובץ קיים, יש להשתמש קודם כל בפונקציה DownloadFile שהוזכרה לעיל כדי לקרוא מה קיים כרגע בקובץ, ואז לשרשר אליה את התוספת שרוצים להוסיף.

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

ymtRunCampaign "0771234567","1234","1234567"

לשליחה למספר או מספרים מסוימים

ymtRunCampaign "0771234567","1234","1234567","0501234567"

או

ymtRunCampaign "0771234567","1234","1234567","0501234567:0521234567"

הקוד יחזיר הודעה עם סטטוס הפעלת הקמפיין

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

ymtScheduleCampaign "0771234567","1234","1234567",#05/05/2020#,"16:45:00"

הקוד יחזיר הודעה עם סטטוס יצירת תזמון הקמפיין

ymtCreateTemplate – יצירת קמפיין
יצירת קמפיין חדש במערכת
ארגומנטים נדרשים: מספר מערכת, סיסמה
דוגמא:

ymtCreateTemplate "0771234567","1234"

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

ymtUpdateTemplate – עדכון הגדרות הקמפיין
ניתן לשלוח דרך הקוד עדכון להגדרות הקמפיין, לדוגמא זיהוי שיחה יוצאת חדש, או נסיונות חיוג וכדו'
ארגומנטים נדרשים: מספר מערכת, סיסמה, מספר קמפיין, תיאור קמפיין, מזהה שיחה יוצאת, סוג קמפיין, מספר לניתוב, אפשרויות הסרה, קמפיין ברירת מחדל, מדיניות שיחות נכנסות, הגבלת קווים מחייגים, הגבלת קווים מנותבים, זמן חיוג, מדיניות חיוג חוזר, נסיונות חיוג, המתנה בין נסיונות, מזהה תא קולי, הודעה אישית מופעלת
פירוט ההגדרות הניתנות לשינוי, והערכים שיש לשלוח:
תיאור קמפיין – ניתן לשלוח כל קובץ טקסט שהוא שיכנס בשם הקמפיין.
מזהה שיחה יוצאת – מספר מזהה שאושר לשימוש.
סוג קמפיין – יש לשלוח אחד מ-4 אופציות: "SIMPLE" – השמעת הודעה בלבד; "MESSAGE" – שליחת הודעה בדוא"ל בהקשה על 1; "VOICEMAIL", - השארת הודעה בתא קולי בהקשה על 1, "BRIDGE" - ניתוב שיחה למענה אנושי, את המספר לניתוב יש לשלוח בערך "מספר לניתוב".
מספר לניתוב – מספר אליו יש לנתב את השיחה באם נשלח סוג קמפיין "BRIDGE".
אפשרויות הסרה – יש לשלוח אחד מ-3 אופציות: "NONE" – ללא אפשרות הסרה; "SILENT" - הסרה בלחיצה על 9 ללא הודעה; "WITH_MESSAGE" - הסרה בלחיצה על 9 + הודעה סטנדרטית.
קמפיין ברירת מחדל – ערך TRUE כדי להגדיר קמפיין זה כקמפיין ברירת מחדל, ערך FALSE כדי לבטל כקמפיין ברירת מחדל.
מדיניות שיחות נכנסות – יש לשלוח אחד מ-4 אופציות: "OPEN" - כל אחד יכול להאזין; "BLACKLIST" - רשימה שחורה; "WHITELIST" - רשימה לבנה; "BLOCKED" - חסום - אין שיחות נכנסות.
הגבלת קווים מחייגים – כמות המספרים המחייגים המקסימלי.
הגבלת קווים מנותבים – כמות המספרים המנותבים המקסימלית.
זמן חיוג – כמות השניות לחיוג.
מדיניות חיוג חוזר – יש לשלוח אחד מ-3 אופציות: "NONE" - ללא חיוג חוזר; "FAILED" - חיוג חוזר אם נכשל; "EMERGENCY" - חיוג חוזר אם אין מענה.
נסיונות חיוג – כמות נסיונות חיוג.
המתנה בין נסיונות – כמות השניות להמתנה בין כל נסיון חיוג.
מזהה תא קולי – ערך TRUE להפעלת מזהה תא קולי, וערך FALSE לביטול הפעלת מזהה תא קולי.
הודעה אישית מופעלת - ערך TRUE להפעלת הודעה אישית, וערך FALSE לביטול ההפעלה.
דוגמא:

ymtUpdateTemplate "0771234567","1234","123456","עדכון מערכת לימודים", "0771234567", "BRIDGE","0501234567","SILENT",TRUE,"OPEN",600,100,60,"NONE",3,180,TRUE,TRUE

ymtDeleteTemplate – מחיקת קמפיין
מחיקה של קמפיין ששמור במערכת
ארגומנטים נדרשים: מספר מערכת, סיסמה, מספר קמפיין
דוגמא:

ymtDeleteTemplate "0771234567","1234","123456"

הקוד ימחוק את קמפיין מספר 123456

ymtUploadPhoneList – עדכון רשימת מספרים ברשימת התפוצה
שליחת רשימה של מספרי טלפונים, בשביל להוסיף אותם לרשימת התפוצה או למחוק ולהסיר אותם מרשימת התפוצה.
הקוד לוקח את הרשימה מטבלה מקומית שמכילה את נתוני הרשימה, הטבלה צריכה להיות בסדר עמודות של: מספר טלפון, שם, מידע נוסף
ארגומנטים נדרשים: מספר מערכת, סיסמה, מספר קמפיין, שם הטבלה, סוג עדכון
ארגומנטים אופציונלים: חסימת מספר
סוג עדכון – אחד מ-3 אופציות: "UPDATE" – עדכון המספרים והוספת מספרים חדשים; "NEW" – החלפת רשימה מספרים ברשימה קיימת; "REMOVE" – הסרת רשימת המספרים מרשימת התפוצה.
חסימת מספר – יש לשלוח 0 אם המספרים יעודכנו כמספרים 'פתוחים', או 1 אם המספרים יעודכנו כמספרים 'חסומים'.
דוגמא:

ymtUploadPhoneList "0771234567","1234","1234567","רשימת תלמידים","UPDATE"

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

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

ymtUpdateTemplateEntry "0771234567","1234","1234567","0501234567","ישראל ישראלי","כיתה ח",0,"126187126"

הקוד יעדכן את רשומה מספר 126187126
או:

ymtUpdateTemplateEntry "0771234567","1234","1234567","0501234567","ישראל ישראלי","כיתה ח",0,"126187126"

הקוד יוסיף רשומה חדשה עם הפרטים שנשלחו.

ymtUpdateTemplateEntries – מחיקה, חסימה או ביטול חסימה של רשומה מתוך רשימת תפוצה
מחיקת רשומה, או שינוי ערך החסימה של רשומה, חסום או פתוח.
ארגומנטים נדרשים: מספר מערכת, סיסמה, מספר קמפיין, מספר רשומה לעדכון, ערך העדכון
ערך העדכון – אחד מ-3 אופציות: "block" – חסימת מספר; "unblock" – ביטול חסימה; "delete" – מחיקה.
דוגמא:

Sub ymtUpdateTemplateEntries "0771234567","1234","1234567","126187126","delete"

הקוד ימחוק את רשומה 126187126

ymtClearTemplateEntries – איפוס רשימת תפוצה
איפוס כל רשימת תפוצה
ארגומנטים נדרשים: מספר מערכת, סיסמה, מספר קמפיין

ymtClearTemplateEntries "0771234567","1234","1234567"

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

Sub ymtGetListPhones "0771234567","1234","1234567"

הקוד מייבא את כל המספרים השמורים ברשימת התפוצה של קמפיין 1234567 לתוך טבלה חדשה בשם "ListPhone".

ymtGetTemplates – קבלת רשימת הקמפיינים השמורים במערכת
קבלת רשימה של כל הקמפיינים השמורים במערכת, עם כל המאפיינים שלהם.
ארגומנטים נדרשים: מספר מערכת, סיסמה
דוגמא:

ymtGetTemplates "0771234567","1234"

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

ymtSetPassword – החלפת סיסמת הניהול
ארגומנטים נדרשים: מספר מערכת, סיסמה ישנה, סיסמה חדשה
דוגמא:

ymtSetPassword "0771234567","1234","5678"

סיסמת הניהול תוחלף מ – 1234 ל – 5678

ymtGetSession – קבלת נתוני משתמש
קבלת נתוני המשתמש של המערכת, כמות יחידות, אימייל, שם איש קשר וכו'
ארגומנטים נדרשים: מספר מערכת, סיסמה
דוגמא:

ymtGetSession "0771234567","1234"

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

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

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

מקווה שעזר לכם!
בהצלחה

למי ששאל,
תיקנתי בקובץ המצורף גם את בעיית הכניסה עם Enter_id

@רבש אמר בקודים לתקשור עם מערכת טלפונית דרך אקסס:

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

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

@גבאי @עמוד-הימני-פטיש-החזק @פיסטוק-חלבי @dudu
שלום
כיון שהזכרתם את הניק שלי עם @ קיבלתי התראה לאימייל
אנסה להסביר כאן האיך לעשות שייבא רק רשומות חדשות.

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

1. קבלת מחרוזת המכילה את קובץ ה ymgr מהשרת
2. המרת המחרוזת לפורמט json (זוהי שיטה לייצג טבלה במחרוזת טקסטאולית)
3. לולאה שרצה על כל הרשומות ב json ואכסונם בטבלה מקומית

הקוד שמייבא רק רשומות חדשות מעמיד תנאי בדיקה האם המזהה הסידורי של הרשומה מקובץ ה ymgr גבוה מהמזהה הסידורי המקסימלי שמאוחסן בטבלה המקומית, ורק אם כן מייבא אותו
לדוגמא: אם אתה מייבא קובץ aprovalAll.ymgr לטבלה מקומית בשם 'קבלת נתונים'. אזי הקוד יבדוק בכל רשומה שתתקבל מקובץ ה ymgr את שדה Booking, האם הוא גבוה יותר מהערך המקסימלי בשדה Booking (או איך שקראת לו) בטבלה המקומית, ורק באם הוא גבוה יותר, המערכת תייבא את הנתון
שים לב, לקבצים שונים, המזהה יכול להיות שונה (לדוגמא בקובץ aproval_number_log המזהה הוא ApprovalNumber), או לא קיים (לדוגמא בקבצי נתוני השמעה LogFolderEnterExit-yyyy-mm) , במקרה כזה יהיה עלינו להתאים את הקוד לקובץ הספציפי

נקודה חשובה: אין באפשרות הקוד לבדוק את הקובץ ymgr עצמו, אלא רק למנוע את אחסון הרשומות בטבלה המקומית, זאת אומרת שהקוד יכול להיכנס רק בין שלב 2 לשלב 3
זה אומר ששלב 1 ובעיקר שלב 2 (שהוא השלב המאסיבי ביותר), ירוצו על כל הקובץ, ורק שלב 3 יסונן לרשומות החדשות
יש בזה חיסכון מסויים בזמן הריצה, אבל לא חיסכון משולם
ישנה אפשרות לסנן את קובץ ה ymgr עצמו וכך לחסוך גם את שלב 2 (על ידי replace של המחרוזת, למי שמבין), אבל בשביל זה צריך לעשות התאמה אישית לקובץ מסויים ולפורמט שלו, ואינני יכול להעלות כאן דוגמא כללית

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

נקודה חשובה, המודלים שהעלתי הוגדרו כך שבכל ייבוא נתונים נמחקת הטבלה המקומית הקודמת שמחזיקה את הנתונים, לצורך ייבוא נתונים לאותה הטבלה יש להכניס את הערך 3 בקוד CreatingTable כמו שמוצג בדוגמא

הקוד יכנס בקוד ImportTextToTable (-ייבא טקסט אל הטבלה) במודול ImportingFiles (-ייבוא קבצים)
הסבר בגוף הקוד

Sub ImportTextToTable(strText As String, strTableName As String)
        NamesFildsFile = GetNameFilds(strText)
        
        chrStartRow = Mid(strText, 1, 1)
        strText = "[{""" & strText
        strText = Replace(strText, "#", """:""")
        strText = Replace(strText, "%", """,""")
        strText = Replace(strText, Chr(13) & Chr(10) & chrStartRow, """},{""" & chrStartRow)
        strText = Replace(strText, Chr(13) & Chr(10), """}]")
       
        Dim Json As Object
        Set Json = JsonConverter.ParseJson(strText)
'עד כאן מתבצע שלב המרת ה ymgr ל json 
'כעת הקוד מתחיל את ייבוא הרשומות, שימו לב שיש להגדיר שיאחסן באותה הטבלה ולא שימחוק את הטבלה הישנה (הכנסת הערך 3 בסוף הקוד)
        Set rs = CurrentDb.OpenRecordset(CreatingTable(strTableName, NamesFildsFile,3))
 
'מכאן מתבצע האחסון של הרשומות בטבלה, וכאן המקום להכניס את הקוד
'קודם כל נמצא את הערך המקסימלי של הטבלה הקיימת על ידי הקוד הזה
'כאן אני כותב דוגמא לייבוא קובץ ה aprovalAll שהמזהה שלו הוא Booking יש להחליף לפי הענין
ValMax = Dmax("Booking", strTableName)

'עכשיו הקוד מתחיל לייבא בפועל. נכניס לו תנאי בתוך הלולאה
        For Each CurrentId In Json
        ValID = CurrentId("Booking") 
IF ValID > ValMax then
            rs.AddNew
            For Each filds In NamesFildsFile
            valJson = CurrentId(filds)
            rs(filds) = valJson
            Next
            rs.Update
End IF
        Next

End Sub

@שמואל-ש
לבקשת רבים, ובהמשך לבקשה שלך (שכבר נענתה..)
מצו"ב קובץ להרצת פעולות שונות על קבצים בימות המשיח
צריך להכניס את הפרמטרים בטבלת FileAction (הוספתי שם כמה דוגמאות כדי שיהיה ברור הקונספט)
זה פחות ידידותי, אבל יותר דינמי
כמו"כ לא קופצת הודעה על כל פעולה, אלא רק בסוף, וגם הפעולות נרשמות בטבלת log עם ה URL שנשלח
אם יש מישהו שמעוניין לקחת את זה ולעשות את זה ידידותי יותר, בהצלחה
FilaAction.accdb

@אלינסון
אפשר לתזמן קוד כל X שניות על ידי שימוש באופציית 'פסיקת שעון' בטופס של אקסס
ואז כאשר הטופס טעון (כלומר פתוח) הוא מפעיל את הקוד כל X שניות
תוכל לראות בסרטון הזה (אם כבר סרטונים....)
https://drive.google.com/open?id=1cg9tSNsrrAHQ1sO3bVJH6OxmAqmXg-ly
שים לב שבפסיקת השעון כותבים אלפית שניה, כלומר 5000 מייצג 5 שניות

בכל מקרה, בכל X שניות הוא מייבא מחדש את כל הנתונים ולא רק את הנתונים החדשים
אם תרצה שיוריד רק את החדשים צריך להשתמש באופציה המוטמעת בקובץ של בעלי מכירות (אולי בקרוב אני יעלה קובץ מעודכן לקובץ ההוא)

@ישראל10
לא הכנסת את ניתוב השלוחה כמו שצריך
יש להזין סלש ימני (/)
אתה הזנת סלש שמאלי ()

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

@מתעניין
זו בעיה שקיבלתי כמה פניות לגבה
מסתבר שהיה באג מסוים לימות המשיח שהם שמרו ערכים לא לפי הקידוד הקבוע דהיינו מפריד % כפסיק, ו # כשווה, אלא בשניהם הם עשו סולמית
וכן כפילות של המפריד %% מה שיוצר באג בהמרה של זה ל JSON
אני אישית הוספתי למודולים שביקשו ממני שורה שמחליפה ומתקנת את הקידוד השגוי

@613 דוקא היום? והאם התקלה הנ"ל דוקא או תקלות אחרות?
באיזה שרת אתה משתמש?

@יעקב139
זה קוד קצר ובסיסי לשליחת בקשת GET דרך אקסס
תשלח את ה URL כפרמטר לקוד

Sub SendURL(strURL)
Dim Http As Object
Set Http = CreateObject("MSXML2.ServerXMLHTTP.6.0")
Http.Open "GET", strURL, False
Http.send
Debug.Print Http.responseText
End Sub

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

שלום וברכה
יש לי שרת שמבצע ביום כ-2000 קריאות API לימות
הקריאות מבוצעות באמצעות פונקציית file_get_contents ב PHP
היום כ-20 מהקריאות חזרו עם שגיאת תקשורת :
php_network_getaddresses: getaddrinfo failed: Temporary failure in name resolution
אני מנסה להבין אם הבעיה היתה בצד של ימות או בצד שלי, [זה ודאי לא בעיה בסטרינג של הבקשה עצמה, כי אותה בקשה עברה בסדר דקה אחרי זה]
לפי איך שזה נשמע מחיפוש בגוגל זה נראה תקלה ב DSN של השרת אליו מנסים להתחבר
יתכן שעוד מישהו חווה היום תקלות עם קריאות API ?

@הלי דוגמא של תיקיה במערכת שלי...

@הלי לפני הניתוב צריך להזין ivr2:

@הלי מה הפירוש? מציינים את הנתיב
לדוגמא אם זה בשלוחה 3>4>2 כותבים 3/4/2
אם באים להעביר קובץ מוסיפים גם את השם עם הסיומת לדוגמא
3/4/2/file.wav

@הלי
כמו שיש שם בדוגמאות
שם משתמש, סיסמה, סוג פעולה (העתקה-copy, העברה-move, מחיקה-delete), נתיב מקור, נתיב יעד
בהעתקת קובץ אפשר לציין נתיב יעד כולל השם של הקובץ, באם לא הוזן שם הקובץ, הוא יקבל את המספר המקסימלי בשלוחה
במחיקת של קובץ \ שלוחה אין צורך לציין שום דבר בנתיב יעד
בהצלחה

@שלומו
תראה אם זה יעזור לך
https://f2.freeivr.co.il/topic/9290/העתקת-שלוחה-מאה-פעמים/22

@מתעניין
תעשה החלפה של EnterHebrewDate# ל EnterHebrewDate%
ולא בהכרח שזה הבעיה היחידה