אופיס 365 אשמח לקבל עזרה ממומחי האקסס כאן, משהו קצת מורכב (או שלא)

[HUBHCBH]

לצורך עמותה שבניתי לה תכונה בהתנדבות, הם חייבים לצרף אישור רפואי לכל יציאה וכו' מה שמביא את הקובץ למשקל מאד גדול!
חשבתי על פתרון במקום לשמור את הקובץ בתוך האקסס, לשמור אותו בתוך תקייה, ותיהיה רק הפניה (היפר קישור) לאקסס.
כשיש יציאה לכמה ימים, צריך לקחת מחשב עם הנתונים והקבצים המצורפים, ואז הקישור משתנה.. הפתרון שחשבתי הוא:
בתוך טבלת options (אפשרויות /הגדרות) יש שדה שבו מופיע שם התקייה שבה נמצאים הקבצים.
בתוך טבלת Attaching files יש שדה עם שם הקובץ. ועוד שדה שמקשר לטבלה הקודמת כדי לדעת איזה תקייה זה נמצא. (לכל פעילות שתיהיה תקייה בנפרד)
הנתיב המלא של הקובץ יהיה ככה, נתיב של התקייה הראשית בה נמצא קובץ האקסס + שם התקייה מטבלת options + שם הקובץ מטבלת Attaching files.

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

תודה רבה רבה!!

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

 

[Rרחמים]

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

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

 

[HUBHCBH]

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

ככה כתבתי..

הנתיב המלא של הקובץ יהיה ככה, נתיב של התקייה הראשית בה נמצא קובץ האקסס + שם התקייה מטבלת options + שם הקובץ מטבלת Attaching files.

 

[moishy]

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

 

[רושם]

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

 

[FullTime]

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

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

1. במקום לכתוב בקוד את הנתיב המלא, כותבים שייקח ממיקום התוכנה הנוכחית currentproject.path & נתיב התמונה.
2. וזה לקישור טבלאות אוטומטית.

Public Sub Startup()
    On Error GoTo Startup_Err
    Dim tdf As DAO.TableDef
    Dim db As DAO.Database
    Dim strTest As String
    Set db = CurrentDb
    For Each tdf In db.TableDefs
        If Len(Nz(tdf.Connect, "")) > 0 Then             ' non-local
            If GetBackEnd <> CurrentProject.Path & "\" & CurrentProject.Name Then        ' need to reconnect
                strTest = tdf.Connect
                strTest = Right((strTest), Len(strTest) - InStrRev(strTest, "\"))
                tdf.Connect = ("MS Access;PWD=484684;DATABASE=" & CurrentProject.Path & "\" & strTest)
                tdf.RefreshLink
            End If
        End If
    Next
    On Error GoTo errorhandler


errorhandler:
    Select Case Err.Number
    Case Is = 3024, 3044, 3043
            MsgBox "ישנה בעיה עם קובץ הנתונים שלך נא עדכן את מיקום קובץ הנתונים!!!", vbCritical + vbMsgBoxRtlReading + vbMsgBoxRight, "<לא ניתן לפרסם מיילים באופן פומבי>"
    End Select
Startup_Exit:
    Exit Sub

Startup_Err:
  '  MsgBox Err.Description
             MsgBox "ישנה בעיה עם קובץ הנתונים שלך נא עדכן את מיקום קובץ הנתונים!!!", vbCritical + vbMsgBoxRtlReading + vbMsgBoxRight, "<לא ניתן לפרסם מיילים באופן פומבי>"
    Resume Startup_Exit

End Sub

ואת זה תשים באירוע פתיחת הטופס הראשון

   Call Startup