@שמחה-זו-הסיסמא אמר בקודים לתקשור עם מערכת טלפונית דרך אקסס:
@yosafizak מחכים חצי שעה בלי לשלוח בקשות שגויות
או שירות לקוחות
מה זאת אומרת"בקשות שגויות"?
@yosafizak
למשל בקשה של API עם טוקן שגוי
או כניסה באתר עם סיסמא שגויה וכדומה
@אריה אני מנסה להוריד דוח ניקוד עם הקובץ אקסס
הכל עובד לי מצוין רק שמשום מה הוא משמיט את העמודה של הסיכום ניקוד כללי
PointsTotal
איך זה יכול להיות
(ניסיתי להוסיף בטבלה באקסס באופן ידני את העמודה הזו וזה גם לא עזר)
@גבאי תוכל לעלות כאן קובץ ניקוד לדוגמא?
@אריה c90d14cf-4b19-4114-8cf6-2f5df3fa8768-points_log.2022-01.ymgr
מחקתי קצת כדי לטשטש דברים
אם תרצה קובץ מקורי אני ישלח לך במייל
@גבאי
אכן, זו שגיאה שנוצרת בגלל הצורה בה הקוד מפענח את שמות השדות שמופיעים בקובץ
מכיון שיש שדה Points המערכת מתעלמת מכל הופעה נוספת של Points ולכן אינה מתחשבת בשדה PointsTotal, שים לב שגם העמודות PointsValPoints .PointsLogName . PointsLogPoints הושמטו מאותה סיבה
בשביל לפתור את זה צריך לשנות את הצורה בה הקוד מפענח את השדות, או להצהיר מפורש על שמות השדות הקיימים בקובץ
@אריה
"או להצהיר מפורש על שמות השדות הקיימים בקובץ"
איך עושים את זה?
@אריה אין אפשרות לעשות שהקוד יזהה את השדה בצורה מלאה אז יתפוס גם את השדות האחרים שמכילים את המילה באופן חלקי?
(או שזה מה שהתכוונת לשנות את הצורה שהקוד מפענח את השדות)
@גבאי
במודול ImportingFiles בקוד ImportTextToTable
צריך להחליף את השורה הזאת
NamesFildsFile = GetNameFilds(strText)
ל-
NamesFildsFile = Array("Folder","Type","id",....)
וכן הלאה את כל רשימת השדות מופרדות בפסיק
כמובן זה ישנה את כל הקובץ, כך שלא תוכל להוריד קבצים נוספים
אם יהיה לי זמן אשתדל להעלות תיקון לקובץ שיכסה גם את המקרה הזה
@אריה תודה רבה רבה
עזרת לי מאוד
זה באמת עזר לי
יש לי עוד בעיה אחת עם הורדת ניקוד שהקבצים נוצרים לפי חודשים ואני צריך לכתוב כל פעם שם חודש אחד (כמו בדוחות האזנה)
יש לך איזה פיתרון טוב להציע לי? כמו שעשית בטופס של הורדת נתוני האזנה.
@גבאי
תריץ את הקוד בלולאה
months = Array("שם של הקובץ חודש1","שם של הקובץ חודש2",....) for f = 0 to Ubound(months) ymtImportFileFromServer UserName, Password, Folder, months(f), TableName, OnExists, RowToStart, RowToEnd, next
תחליף את הערכים הבאים:
UserName - מספר מערכת, Password - סיסמה, Folder - שלוחה בה מאוחסנים הקבצים, TableName - שם הטבלה בה לאחסון הנתונים, OnExists - איך להתנהג אם הטבלה קיימת (במקרה שלך יקרה ודאי כיון שאתה מייבא כמה קבצים לאותה טבלה, תבחר ב-2 או 3): 1 - מחיקת הטבלה הקיימת 2 - הוספת מספר רץ לשם הטבלה 3 ייבוא לתוך הטבלה הקיימת. RowToStart - שורה להתחיל, הכנס 0 כדי לייבא הכל, RowToEnd - שורה לסיום, הכנס 0 כדי לייבא הכל
@אריה הבעיה שבאפשרות זו אני צריך להכניס את כל החודשים ואת כל השנים מראש..... כי כל חודש נוצר קובץ חדש.
איך אני רושם בתוך הקוד שם של פקד מתוך טופס? כלומר שאני יעשה טופס ובו אני ירשום את החודש ושנה
והקוד יקח את שם הקובץ שאני ירשום לו פלוס מה שמופיע בפקד של הטופס פלוס הסיומת שאני ירשות בתוך הקוד עצמו.
נניח לקובץ points_log.2022-01.ymgr
אני רוצה לרשום points_log.[שנה]-[חודש].ymgr
איך רושמים את זה בתוך הקוד?
@גבאי לא הסברת את עצמך נכון, חשבתי שאתה מתכוין בפקודה אחת להוריד את כולם
בשביל מה שאתה צריך אתה צריך ליצור שני תיבות טקסט בטופס, strMonth ו - strYear
בפקודה שמופעלת בלחיצה על כפתור 'הורדה'
תחליף את השורה
ymtImportFileFromServer UserName, Password, Folder, FileName, TableName, OnExists, Nz(RowToStart, 0), Nz(RowToEnd, 0)
לזה
ymtImportFileFromServer UserName, Password, Folder, "points_log." & strYear & "-" & strMonth & ".ymgr", TableName, OnExists, Nz(RowToStart, 0), Nz(RowToEnd, 0)
כמו"כ אתה צריך להחליף את השורה הראשונה
If IsNull(UserName) Or IsNull(Password) Or IsNull(Folder) Or IsNull(FileName) Or IsNull(TableName) Then MsgBox "יש למלא את כל השדות": Exit Sub
בזה
If IsNull(UserName) Or IsNull(Password) Or IsNull(Folder) Or IsNull(strYear) Or IsNull(strMonth) Or IsNull(TableName) Then MsgBox "יש למלא את כל השדות": Exit Sub
@אריה עזרת לי מאוד מאוד תודה רבה
אגב שיפוץ קטן שלדעתי כדאי להוסיף בקובץ הכללי
אחרי שנוצר טבלה חדשה ע"י הקוד שלך לא רואים אותה עד שפותחים מחדש או מרעננים איכשהו את הטבלאות
אולי אפשר להוסיף בסיום כל הרצה של קוד שירענן את תצוגת הטבלאות.......
לא הצלחתי להעלאות רשימה לרשימת תפוצה
איך הטבלה שאני מעלה אמורה להראות
@מנסה אמר בקודים לתקשור עם מערכת טלפונית דרך אקסס:
יש שם באג בזה
[תקלה בקריאה לפונקציה]סידרתי את זה פעם והעלתי לכאן הסבר, לא זוכר איפה
אם יש מישהו שיוכל לעזור אודה לו מאוד
אתה צריך להוסיף את השורות הבאות במקום שהן מופיעות בתמונה
Case "UploadPhoneList" ymtUploadPhoneList UserName, Password, templateId, listparam2, listparam3, listparam4
שים לב היכן להוסיף [From_שיגור הודעות]
@מנסה אמר בקודים לתקשור עם מערכת טלפונית דרך אקסס:
אתה צריך להוסיף את השורות הבאות במקום שהן מופיעות בתמונה
Case "UploadPhoneList" ymtUploadPhoneList UserName, Password, templateId, listparam2, listparam3, listparam4
שים לב היכן להוסיף [From_שיגור הודעות]
הכנסתי את הנתונים!
מיקום התוספת.PNG
מביא לי הודעת שגיאה!
הודעת שגיאה.PNG
וכשאני פותח את המודול מסמן לי
