יש לי מחשבים ניידים אשר מתחברים לרשת הארגונית, המבצעים סינכרון אוטומטי של "ספריות לא מכוונות" הכוללת גם את My Documents ועוד!
אני רוצה להפעיל סקריפט בשלב הזה!!
לא חייב להיות קשר לסינכרון אלה לחיבור לרשתֱ
בתגובה להודעה מספר 8 שנכתבה על ידי The IceMan שמתחילה ב "מצאתי משהו , שממפה את הרשימת..."
ציטוט:
יש לי מחשבים ניידים אשר מתחברים לרשת הארגונית, המבצעים סינכרון אוטומטי של "ספריות לא מכוונות" הכוללת גם את My Documents ועוד!
אני רוצה להפעיל סקריפט בשלב הזה!!
לא חייב להיות קשר לסינכרון אלה לחיבור לרשתֱ
הכוונה להפעיל Script שלאחר חיבור לרשת הוא אוטומטית יכווץ בRAR מספר קבצים (יתבצע ברקע+תאריךבשם הקובץ+סיסמה) וישלח אותם לשרת גיבויים.
.... הScript קיים אך צריך להפעילו ידנית.
בתגובה להודעה מספר 9 שנכתבה על ידי zivk שמתחילה ב "[QUOTE][size=3]יש לי מחשבים..."
איך התיכנות שלך ?
מצאתי דרך נחמדה לפתור את הבעיה שלך
אבל היא דורשת טיפה תיכנות ברמת הבנת תיכנות ו-העתק הדבק
דבר ראשון תמצא בלינק הבא
תוכנה ב-VB.NET שמזהה אם הכבל מחובר או מנותק
עידכון: מצאתי גם קוד בכלל לנושא
קוד:
Private Sub MyApplication_NetworkAvailabilityChanged(ByVal sender As
Object, ByVal e As Microsoft.VisualBasic.Devices.NetworkAvailableEven tArgs)
Handles Me.NetworkAvailabilityChanged
Trace.WriteLine(e.IsNetworkAvailable)
End Sub
--------------
שלב הבא יהיה לבצא PING לשרת ולראות שהוא מגיב ויש תקשורת ולא מדובר בהתחברות בבית לאינטרנט
את זה תוכל לעשות עם החלק הזה של הקוד,
קוד:
If My.Computer.Network.Ping("www.google.com", 1000) Then
MsgBox("Server pinged successfully.")
Else
MsgBox("Ping request timed out.")
End If
------------------------------
יופי אז זיהנו את ההתחברות ואנחנו נמצאים ברשת המשרדית
מה הלאה?
גיבוי ?
אז קודם נוודא שלא ביצענו גיבוי היום ,
(אני משאיר לך את הקטע שבוא אתה מגדיר את הפורמט של השמות של הגיבוי)
נגיד והשמות בנוים בפורמט הבא... YYYY-MM-DD-USERNAME
לדוגמא:
קוד:
2007-01-01-DEMO
נבדוק את המצאות הקובץ ע"י הפונקציה הבא:
קוד:
Imports System.IO
Public Function FileExists(ByVal FileFullPath As String) _
As Boolean
Dim f As New IO.FileInfo(FileFullPath)
Return f.Exists
End Function
Public Function FolderExists(ByVal FolderPath As String) _
As Boolean
Dim f As New IO.DirectoryInfo(FolderPath)
Return f.Exists
End Function
ולפי זה אנחנו נבחר אם להעלות את התיקיה 1:1 או לכווץ ולשלוח לשרת ע"י הפקודות הבאות
אין בעיה לתכנת משהו שידע לעשות זאת....
מה שחיפשתי, הוא משהו מובנה של Windows כדי לחסוך עוד Process או Service וכמה באגים (כמו מה קורה שעושים VPN מהבית ... התנאים מתקיימים, אך זאת לא רשת מקומית)
תודה בכל אופן
נערך לאחרונה ע"י zivk בתאריך 31-01-2007 בשעה 09:43.
WINDOWS זה לא LINUX
אתה לא יכול להגדיר דברים כאלה כי הכל סגור ...
יש לך תוכנת גיבוי ..והיא תעשה בדיוק רק מה שהגדירו לה ולא יותר
דווקא מצאתי המון מידע איך לבצע את מה שאתה מעוניין בוא בלינוקס,
כי שמה אתה יכול לקבל TRIGGER ברגע שיש לך חיבור, ולבצע את כל מה שאמרתי בהתבסס על ה-TRIGGER הזה,
הבעיה ב-WINDOWS, שאתה צריך לתכנת תוכנה ש"תצוד" את EVENT ברגע שיש קישוריות
כי אין לך אפשרות אחרת לקבל את המידע הזה