ניווט

    תחומים
    • הרשמה
    • התחברות
    • חיפוש
    • קטגוריות
    • פוסטים אחרונים
    • משתמשים
    • חיפוש
    • מקצועות
    1. דף הבית
    2. yits
    חוקי הפורום
    Y
    • פרופיל
    • עוקב אחרי 1
    • עוקבים 2
    • נושאים 91
    • פוסטים 983
    • הגבוה ביותר 502
    • קבוצות 0

    yits

    @yits

    950
    מוניטין
    6592
    צפיות בפרופיל
    983
    פוסטים
    2
    עוקבים
    1
    עוקב אחרי
    הצטרף ב- התחבר לאחרונה
    מיקום בני ברק

    yits עקוב

    הפוסטים הטובים ביותר שנוצרו על ידי yits

    • מדריך: יצירת התקנת מערכת הפעלה מותאמת אישית.

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

      שלב א: (התקנה)

      • התקנה נקיה של מערכת הפעלה על מחשב (או על מכונה וירטואלית).
      • עדכון של המערכת הפעלה.
      • התקנת התוכנות הרצויות.
      • התקנת דרייברים שאתם רוצים שיכללו באימג' ויהיו בכל התקנה.

      לא להתקין דרייברים שלא תרצו לכלול אותם באימג' כמו דרייבר לכרטיס מסך ועוד.

      שלב ב:

      לבטל את ההפעלה האוטמטית של כל התוכנות המיותרות שהותקנו במחשב,
      ניתן לעשות זאת דרך MsConfig, בוינדוס 10 יש צורך להשתמש גם ב TaskMgr.
      https://support.microsoft.com/he-il/help/929135/how-to-perform-a-clean-boot-in-windows
      http://support.microsoft.co.il/msconfig/


      שלב ג: (SysPrep)

      1. לחצו במקביל על מקשי התחל ו-R. בחלון שנפתח, הזינו את הפקודה הבאה: %systemroot%/system32/sysprep/sysprep ולאחר מכן לחצו על OK (אישור).

      2. תחת System Cleanup Action (פעולת ניקוי המערכת) בחרו באפשרות Enter System Audit Mode (כניסה למצב ביקורת של המערכת).
        לאחר מכן סמנו ב-V את Generalize (הכלל).
        ולסיום תחת Shutdown Options (אפשרויות כיבוי) בחרו ב-Reboot (הפעלה מחדש), ולאחר מכן לחצו על OK (אישור).

      3. בסיום התהליך, המחשב יפעיל את עצמו מחדש בצורה אוטומטית. לאחר שהוא יופעל מחדש, לחצו במקביל על מקשי התחל ו-R. ובחלון שנפתח, הזינו את הפקודה הבאה: rundll32.exe sysdm.cpl,EditUserProfiles ולאחר מכן לחצו על OK (אישור).

      4. בחלון שנפתח, אתרו את פרופיל המשתמש שלכם (זה שהוא אינו מנהל המערכת (Administrator) וגם זה שהוא אינו פרופיל ברירת המחדל (Default Profile)), סמנו אותו פעם אחת באמצעות לחיצה עם העכבר, ולאחר מכן לחצו על Delete (מחק). כמובן שאם קיימים משתמשים נוספים במחשב, יש להסיר גם את הפרופיל שלהם.

      5. לחצו על התחל, ולאחר מכן לחצו באמצעות הלחצן הימני של העכבר על Computer (מחשב) ולאחר מכן על Manage (ניהול). או בשולן עבודה על סמל המחשב, או בתיבת החיפוש הקלידו ניהול מחשב.

      6. בחלון שנפתח בחרו ב-Local Users and Groups (משתמשים וקבוצות מקומיים) ולאחר מכן בחרו בצדו השני של המסך בתיקייה Users (משתמשים).

      7. ברשימה שלפניכם, אתרו את המשתמש שלכם, זה שהוא אינו ה-Administrator (מנהל המערכת) ואינו ה-Guest (חשבון אורח), לחצו עליו באמצעות הלחצן הימני של העכבר, ולאחר מכן בחרו ב-Delete (מחק). כמובן שאם קיימים משתמשים נוספים במחשב יש להסיר גם אותם.

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

      9. כעת חזרו על הפעולות שביצעתם בשלב 1 (ג.1).

      10. תחת האפשרות System Cleanup Action (פעולת ניקוי המערכת) בחרו באפשרות Enter System Out-of Box Experience (OOBE) (כניסה למוצר מוכן לשימוש (OOBE) של המערכת) לאחר מכן סמנו ב-V את האפשרות Generalize (הכלל), ולסיום סמנו תחת Shutdown Options (אפשרויות כיבוי) את האפשרות Shut Down (כיבוי), ולאחר מכן לחצו על OK (אישור).

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


      שלב ד: (יצירת אימג'):

      עבור שלב זה אנו זקוקים לדיסק טכנאי, קובץ ImageX ואמצעי אחסון נוסף.

      • דיסק טכנאי.
        אני משתמש כרגיל בדיסק Win PE של מיקרוסופט.
        קישור להורדה של Win PE + ImageX

      הערה: ניתן להשתמש עם Hirens Boot או כל דבר אחר.
      אבל אנו מוכרחים שיהיה לנו את הכלי IMAGEX.EXE שאיתו אנו יוצרים את האימג'. (אני חושב שהקובץ שהעליתי הוא בגירסת 64 ביט).
      יש גם את הכלי GimageX שהוא כולל ממשק גרפי ניתן להוריד אותו מכאן, ההסבר בהמשך מתייחס לשימוש בשורת הפקודה.

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

      כעת נעבור לשלב המעשי.

      1. הפעלת המחשב דרך הדיסק טכנאי שברשותנו.
      2. ניווט לקובץ ה ImageX דרך שורת הפקודה. (לצורך הדוגמא נשתמש בכונן F)
      3. נזין כעת את הפקודה הבאה ולאחר מכן נלחץ על Enter.
      F:\ImageX /compress fast /check /capture OSDrive: DestDrive:\ImageFileName.wim “Windows Version” “Image Description"
      

      קצת פרשנות לפקודה שתוארה לעיל:

      • ImageX – הכלי שמבצע את פעולת לכידת ה-Image.
      • Compress Fast– פעולת הכיווץ, שתתבצע בצורה מהירה מכיווץ רגיל.
      • Check– פעולה מומלצת בעת ביצוע לכידת Image. על ידי הזנתה, הכלי ImageX מבצע בדיקה של קובץ ה-Image על מנת לבדוק שהוא לא מכיל שגיאות או תקלות.
      • Capture – פעולת הלכידה עצמה.
      • OSDrive – מחיצת המערכת שלכם (לרוב – כונן C), בה מותקנות מערכת ההפעלה וכל התוכנות שאותם אתם רוצים להוסיף ל-Image. אתם תידרשו להזין במקום המונח OSDrive תו בודד המסמן את אות הכונן.
      • DestDrive – כונן היעד בו אתם מעוניינים לשמור את ה-Image שלכם. במקום המונח DestDrive תידרשו להזין תו בודד המסמן את אות הכונן.
      • Windows Version – מסמן את סוג מערכת ההפעלה שממנה יוצר ה-Image. לדוגמא: “Windows 7 Home Premium”.
        שימו לב שסימוני הגרשיים (") הם במקור, ועליכם להזינם.
      • Image Description – תיאור ה-Image שאתם יוצרים. לדוגמא: “Windows 7 and Office 2010”.

      טיפ: אם אתם מתקשים למצוא את האות של הדיסק קשיח ואת מיקום הקובץ ImagX דרך שורת הפקודה אתם יכולים להקליד Notepad ויפתח לכם פנקס רשימות ושם תלחצו על file (קובץ) > open (פתיחה) ויפתח לכם חלונית ניווט ותוכלו לנסות למצוא את הקבצים שלכם.)

      1. בסיום תקבלו את ההודעה הזאת:
      [100%] Capturing Progress
       Successfully imaged OSDrive.
      
      1. הקלידו את הפקודה Exit, ולאחר מכן לחצו על המקש Enter. כעת, תופעל מערכת ההפעלה שלכם מחדש (והיא תבקש ממכם ליצור משתמש לבחור שפה ועוד כמו במערכת הפעלה חדשה).

      שלב ה:(התקנה מקובץ Image)

      כעת, יש לנו קובץ Image מותאם אישית והוא נשמר במיקום שהגדרנו לו בשלב הקודם (ד.3).

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

      לכן הדרך הכי פשוטה לבצע התקנה מתוך הקובץ שיצרנו הוא כך:

      1. העתיקו את תכולת דיסק ההתקנה של וינדוס לתוך דיסק נשלף (וינדוס 7 ומעלה, עדיף וינדוס 10 בשביל תמיכה רחבה יותר בדרייברים כמו USB 3 ועוד) .
      2. שנו את שם הקובץ שיצרתם ל Install.wim.
      3. כנסו לדיסק נשלף שהעתקם לתוכו את דיסק ההתקנה של וינדוס והחליפו את הקובץ שיצרתם בקובץ המקורי שנמצא בתיקיה Sources.
      4. כעת תוכלו לבצע התקנה של מערכת הפעלה מותאמת אישית עם ממשק ההתקנה המקורי של מיקרוסופט.

      בהצלחה!

      פורסם במדריכים
      Y
      yits
    • Custom MsgBox VBA

      חיפשתי הרבה זמן איך אפשר להתאים אישית את הכפתורים ב MsgBox של Office VBA.

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

      מי שרוצה לשפר את הקוד יש בעיה ב Select Case MsgBox_Style ועשיתי שם טלאי עבור RTL, נשמח לקבל פתרון יותר טוב ויפה.

      כדי להשתמש בקוד יש ליצור מודול חדש ולהעתיק את כל הקוד לתוכו.

      Option Explicit
      
      ' (C) Dan Elgaard (www.EXCELGAARD.dk)
      
      ' MsgBox Buttons/Answers ID Constants
      Private Const MsgBox_Button_ID_OK     As Long = 1
      Private Const MsgBox_Button_ID_Cancel As Long = 2
      Private Const MsgBox_Button_ID_Abort  As Long = 3
      Private Const MsgBox_Button_ID_Retry  As Long = 4
      Private Const MsgBox_Button_ID_Ignore As Long = 5
      Private Const MsgBox_Button_ID_Yes    As Long = 6
      Private Const MsgBox_Button_ID_No     As Long = 7
      
      ' MsgBox Buttons/Answers Text Variables'
      Private MsgBox_Button_Text_OK         As String
      Private MsgBox_Button_Text_Cancel     As String
      Private MsgBox_Button_Text_Abort      As String
      Private MsgBox_Button_Text_Retry      As String
      Private MsgBox_Button_Text_Ignore     As String
      Private MsgBox_Button_Text_Yes        As String
      Private MsgBox_Button_Text_No         As String
      
      ' Handle to the Hook procedure'
      #If VBA7 Then
          Private MsgBoxHookHandle          As LongPtr                                        ' 64-bit handle'
          Private MsgBoxHookHandle2         As LongPtr                                        ' 64-bit handle'
      #Else
          Private MsgBoxHookHandle          As Long
          Private MsgBoxHookHandle2         As Long
      #End If
       
      'Clip Cursor'
      Private Type RECT
          Left As Long
          Top As Long
          right As Long
          bottom As Long
      End Type
      
      Enum eVbMsgBoxIconCB
          vbCritical = 16
          vbExclamation = 48
          vbInformation = 64
          vbQuestion = 32
      End Enum
      
      Enum eVbMsgBoxStyleCB
          vbApplicationModal = 0
          vbMsgBoxRight = 524288
          vbMsgBoxRtlReading = 1048576
          vbMsgBoxSetForeground = 65536
          vbSystemModal = 4096
      End Enum
      
      ' Windows API functions'
      #If VBA7 Then
          Private Declare PtrSafe Function GetCurrentThreadId Lib "kernel32" () As LongPtr
          Private Declare PtrSafe Function SetDlgItemText Lib "user32" Alias "SetDlgItemTextA" (ByVal hDlg As LongPtr, ByVal nIDDlgItem As LongPtr, ByVal lpString As String) As LongPtr
          Private Declare PtrSafe Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As LongPtr, ByVal lpfn As LongPtr, ByVal hmod As LongPtr, ByVal dwThreadId As LongPtr) As LongPtr
          Private Declare PtrSafe Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As LongPtr) As LongPtr
          Private Declare PtrSafe Function GetWindowRect Lib "user32" (ByVal hwnd As LongPtr, lpRect As RECT) As Long
          Private Declare PtrSafe Function ClipCursor Lib "user32" (lpRect As Any) As Long
          Private Declare PtrSafe Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As LongPtr, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long
      #Else
          Private Declare Function GetCurrentThreadId Lib "kernel32" () As Long
          Private Declare Function SetDlgItemText Lib "user32" Alias "SetDlgItemTextA" (ByVal hDlg As Long, ByVal nIDDlgItem As Long, ByVal lpString As String) As Long
          Private Declare Function SetWindowsHookEx Lib "user32" Alias "SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, ByVal hmod As Long, ByVal dwThreadId As Long) As Long
          Private Declare Function UnhookWindowsHookEx Lib "user32" (ByVal hHook As Long) As Long
          Private Declare Function GetWindowRect Lib "user32" (ByVal hwnd As Long, lpRect As RECT) As Long
          Private Declare Function ClipCursor Lib "user32" (lpRect As Any) As Long
          Private Declare Function GetClassName Lib "user32" Alias "GetClassNameA" (ByVal hwnd As Long, ByVal lpClassName As String, ByVal nMaxCount As Long) As Long
      #End If
      
      
      #If VBA7 Then
          Private Function MsgBoxHook(ByVal LM As LongPtr, ByVal WP As LongPtr, ByVal LP As LongPtr) As LongPtr
              SetDlgItemText WP, MsgBox_Button_ID_OK, MsgBox_Button_Text_OK
              SetDlgItemText WP, MsgBox_Button_ID_Cancel, MsgBox_Button_Text_Cancel          ' Not used
              SetDlgItemText WP, MsgBox_Button_ID_Abort, MsgBox_Button_Text_Abort
              SetDlgItemText WP, MsgBox_Button_ID_Retry, MsgBox_Button_Text_Retry
              SetDlgItemText WP, MsgBox_Button_ID_Ignore, MsgBox_Button_Text_Ignore
              SetDlgItemText WP, MsgBox_Button_ID_Yes, MsgBox_Button_Text_Yes
              SetDlgItemText WP, MsgBox_Button_ID_No, MsgBox_Button_Text_No
                      
              Dim tMsgBoxRect As RECT, sBuffer As String * 256, ret As Long
                      
              ret = GetClassName(WP, sBuffer, Len(sBuffer))
              If Left(sBuffer, ret) = "#32770" Then
                  GetWindowRect WP, tMsgBoxRect
                  With tMsgBoxRect
                      .right = .right - 2: .bottom = .bottom - 2
                  End With
                  ClipCursor tMsgBoxRect 'ClipCursor
              End If
          End Function
      #Else
          Private Function MsgBoxHook(ByVal LM As Long, ByVal WP As Long, ByVal LP As Long) As Long
              SetDlgItemText WP, MsgBox_Button_ID_OK, MsgBox_Button_Text_OK
              SetDlgItemText WP, MsgBox_Button_ID_Cancel, MsgBox_Button_Text_Cancel         ' Not used
              SetDlgItemText WP, MsgBox_Button_ID_Abort, MsgBox_Button_Text_Abort
              SetDlgItemText WP, MsgBox_Button_ID_Retry, MsgBox_Button_Text_Retry
              SetDlgItemText WP, MsgBox_Button_ID_Ignore, MsgBox_Button_Text_Ignore
              SetDlgItemText WP, MsgBox_Button_ID_Yes, MsgBox_Button_Text_Yes
              SetDlgItemText WP, MsgBox_Button_ID_No, MsgBox_Button_Text_No
                      
              Dim tMsgBoxRect As RECT, sBuffer As String * 256, ret As Long
                      
              ret = GetClassName(WP, sBuffer, Len(sBuffer))
              If Left(sBuffer, ret) = "#32770" Then
                  GetWindowRect WP, tMsgBoxRect
                  With tMsgBoxRect
                      .right = .right - 2: .bottom = .bottom - 2
                  End With
                  ClipCursor tMsgBoxRect 'ClipCursor
              End If
          End Function
      #End If
      
      
      Function MsgBoxCB(MsgBox_Text As String, _
                          Button1 As String, _
                          Optional Button2 As String, _
                          Optional Button3 As String, _
                          Optional MsgBox_Style As eVbMsgBoxStyleCB, _
                          Optional MsgBox_Icon As eVbMsgBoxIconCB, _
                          Optional MsgBox_Title As String) As Long
      
          ' * ' Initialize
          On Error Resume Next
      
          ' * ' Define variables
          If Button1 = vbNullString Then
              Button1 = Button2
              Button2 = vbNullString
          End If
          If Button2 = vbNullString Then
              Button2 = Button3
              Button3 = vbNullString
          End If
      
          Dim ButtonsToUse As Long
          ButtonsToUse = vbAbortRetryIgnore
          If Button3 = vbNullString Then ButtonsToUse = vbYesNo
          If Button2 = vbNullString Then ButtonsToUse = vbOKOnly
      
          Select Case MsgBox_Icon
              Case vbCritical:        ButtonsToUse = ButtonsToUse + MsgBox_Icon
              Case vbExclamation:     ButtonsToUse = ButtonsToUse + MsgBox_Icon
              Case vbInformation:     ButtonsToUse = ButtonsToUse + MsgBox_Icon
              Case vbQuestion:        ButtonsToUse = ButtonsToUse + MsgBox_Icon
          End Select
      
          Select Case MsgBox_Style
              Case vbApplicationModal:      ButtonsToUse = ButtonsToUse + MsgBox_Style
              Case vbMsgBoxRight:           ButtonsToUse = ButtonsToUse + MsgBox_Style
              Case vbMsgBoxRtlReading:      ButtonsToUse = ButtonsToUse + MsgBox_Style
              Case vbMsgBoxSetForeground:   ButtonsToUse = ButtonsToUse + MsgBox_Style
              Case vbSystemModal:           ButtonsToUse = ButtonsToUse + MsgBox_Style
              Case vbMsgBoxRight + vbMsgBoxRtlReading: ButtonsToUse = ButtonsToUse + MsgBox_Style
          End Select
          
          If MsgBox_Title = vbNullString Then MsgBox_Title = " Microsoft Office"               ' Default MsgBox title
      
          Dim MsgBoxAnswer As Long
      
          ' * ' Set custom buttons texts
          MsgBox_Button_Text_OK = Button1
          MsgBox_Button_Text_Cancel = vbNullString                                            ' Not used
          MsgBox_Button_Text_Abort = Button1
          MsgBox_Button_Text_Retry = Button2
          MsgBox_Button_Text_Ignore = Button3
          MsgBox_Button_Text_Yes = Button1
          MsgBox_Button_Text_No = Button2
      
          MsgBoxHookHandle = SetWindowsHookEx(5, AddressOf MsgBoxHook, 0, GetCurrentThreadId) ' Set MsgBox Hook
      
          ' * ' Show hooked MsgBox
          MsgBoxAnswer = MsgBox(MsgBox_Text, ButtonsToUse, MsgBox_Title)
      
      EF: ' End of Function
          UnhookWindowsHookEx MsgBoxHookHandle                                                ' Unhook MsgBox again
          ClipCursor ByVal 0 'Relase ClipCursor
          Select Case MsgBoxAnswer
              Case vbOK:        MsgBoxCB = 1
              Case vbCancel:    MsgBoxCB = 0                                                ' Not used
              Case vbAbort:     MsgBoxCB = 1
              Case vbRetry:     MsgBoxCB = 2
              Case vbIgnore:    MsgBoxCB = 3
              Case vbYes:       MsgBoxCB = 1
              Case vbNo:        MsgBoxCB = 2
          End Select
      End Function
      
      
      Public Property Let MsgboxClipCursor(ByVal Clip As Boolean)
          If Clip Then
              MsgBoxHookHandle2 = SetWindowsHookEx(5, AddressOf MsgBoxClipProc, 0, GetCurrentThreadId)
          Else
              ClipCursor ByVal 0
              UnhookWindowsHookEx MsgBoxHookHandle2
          End If
      End Property
      
      #If VBA7 Then
          Private Function MsgBoxClipProc(ByVal LM As LongPtr, ByVal WP As LongPtr, ByVal LP As LongPtr) As LongPtr
      #Else
          Private Function MsgBoxClipProc(ByVal LM As Long, ByVal WP As Long, ByVal LP As Long) As Long
      #End If
                  
              Dim tMsgBoxRect As RECT, sBuffer As String * 256, ret As Long
                      
              ret = GetClassName(WP, sBuffer, Len(sBuffer))
              If Left(sBuffer, ret) = "#32770" Then
                  GetWindowRect WP, tMsgBoxRect
                  With tMsgBoxRect
                      .right = .right - 2: .bottom = .bottom - 2
                  End With
                  ClipCursor tMsgBoxRect
              End If
          End Function
      
      

      כדי לממש את הקוד יש לכתוב את הפקודה כך

      MsgBoxCB("Message","Button1","Button2","Button3",vbMsgBoxRight or vbMsgBoxRtlReading, vbInformation, "Title")
      
      פורסם בתכנות
      Y
      yits
    • אוצר החכמה נפתח לציבור.

      אוצר החכמה פתחו את המאגר הבסיסי שלהם חינם לטובת הציבור, לתקופה זו.
      https://tablet.otzar.org/he/pages/

      פורסם בגומלין
      Y
      yits
    • RE: יצירת image - גיבוי התקנת מערכת הפעלה

      אני ינסה לכתוב כאן קצת בצורה מסודרת על התהליך של יצירת אימג'.

      שלב א: (התקנה)

      • התקנה נקיה של מערכת הפעלה על מחשב (או על מכונה וירטואלית).
      • עדכון של המערכת הפעלה.
      • התקנת התוכנות הרצויות.
      • התקנת דרייברים שאתם רוצים שיכללו באימג' ויהיו בכל התקנה.

      לא להתקין דרייברים שלא תרצו לכלול אותם באימג' כמו דרייבר לכרטיס מסך ועוד.

      שלב ב:

      לבטל את ההפעלה האוטמטית של כל התוכנות המיותרות שהותקנו במחשב,
      ניתן לעשות זאת דרך MsConfig.
      http://support.microsoft.co.il/msconfig/


      שלב ג: (SysPrep)

      1. לחצו במקביל על מקשי התחל ו-R. בחלון שנפתח, הזינו את הפקודה הבאה: %systemroot%/system32/sysprep/sysprep ולאחר מכן לחצו על OK (אישור).

      2. תחת System Cleanup Action (פעולת ניקוי המערכת) בחרו באפשרות Enter System Audit Mode (כניסה למצב ביקורת של המערכת).
        לאחר מכן סמנו ב-V את Generalize (הכלל).
        ולסיום תחת Shutdown Options (אפשרויות כיבוי) בחרו ב-Reboot (הפעלה מחדש).

      3. בסיום התהליך, המחשב יפעיל עצמו מחדש בצורה אוטומטית. לאחר שהוא הופעל מחדש, לחצו במקביל על מקשי התחל ו-R. בחלון שנפתח, הזינו את הפקודה הבאה: rundll32.exe sysdm.cpl,EditUserProfiles ולאחר מכן לחצו על OK (אישור).

      4. בחלון הממשק שנפתח, אתרו את פרופיל המשתמש שלכם (זה שהוא אינו מנהל המערכת (Administrator) וגם זה שהוא אינו פרופיל ברירת המחדל שלכם (Default Profile)), סמנו אותו פעם אחת באמצעות לחיצה עם העכבר, ולאחר מכן לחצו על Delete (מחק). כמובן שאם קיימים משתמשים נוספים במחשב, יש להסיר גם את הפרופיל שלהם.

      5. לחצו על התחל, ולאחר מכן לחצו באמצעות הלחצן הימני של העכבר על Computer (מחשב) ולאחר מכן על Manage (ניהול). או בתיבת החיפוש הקלידו ניהול מחשב.

      6. בחלון שנפתח בחרו ב-Local Users and Groups (משתמשים וקבוצות מקומיים) ולאחר מכן בחרו בצדו השני של המסך בתיקייה Users (משתמשים).

      7. בתיקייה, אתרו את המשתמש שלכם, זה שהוא אינו ה-Administrator (מנהל המערכת) ואינו ה-Guest (חשבון אורח), לחצו עליו באמצעות הלחצן הימני של העכבר, ולאחר מכן בחרו ב-Delete (מחק). כמובן שאם קיימים משתמשים נוספים במחשב יש להסיר גם אותם.

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

      9. כעת חזרו על הפעולות שביצעתם בשלב 1 (ג.1).

      10. תחת האפשרות System Cleanup Action (פעולת ניקוי המערכת) בחרו באפשרות Enter System Out-of Box Experience (OOBE) (כניסה למוצר מוכן לשימוש (OOBE) של המערכת) לאחר מכן סמנו ב-V את האפשרות Generalize (הכלל), ולסיום סמנו תחת Shutdown Options (אפשרויות כיבוי) את האפשרות Shut Down (כיבוי).

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


      שלב ד: (יצירת אימג'):

      עבור שלב זה אנו זקוקים לדיסק טכנאי, קובץ ImageX ואמצעי אחסון נוסף.

      • דיסק טכנאי.
        אני משתמש כרגיל בדיסק Win PE של מיקרוסופט.
        קישור להורדה של Win PE + ImageX

      הערה: ניתן להשתמש עם Hirens Boot או כל דבר אחר.
      אבל אנו מוכרחים שיהיה לנו את הכלי IMAGEX.EXE שאיתו אנו יוצרים את האימג'. (אני חושב שהקובץ שהעליתי הוא בגירסת 64 ביט).
      יש גם את הכלי GimageX שהוא כולל ממשק גרפי ניתן להוריד אותו מכאן, ההסבר בהמשך מתייחס לשימוש בשורת הפקודה.

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

      כעת נעבור לשלב המעשי.

      1. הפעלת המחשב דרך הדיסק טכנאי שברשותנו.
      2. ניווט לקובץ ה ImageX דרך שורת הפקודה. (לצורך הדוגמא נשתמש בכונן F)
      3. נזין כעת את הפקודה הבאה ולאחר מכן נלחץ על Enter.
      F:\ImageX /compress fast /check /capture OSDrive: DestDrive:\ImageFileName.wim “Windows Version” “Image Description"
      

      קצת פרשנות לפקודה שתוארה לעיל:

      • ImageX – הכלי שמבצע את פעולת לכידת ה-Image.
      • Compress Fast– פעולת הכיווץ, שתתבצע בצורה מהירה מכיווץ רגיל.
      • Check– פעולה מומלצת בעת ביצוע לכידת Image. על ידי הזנתה, הכלי ImageX מבצע בדיקה של קובץ ה-Image על מנת לבדוק שהוא לא מכיל שגיאות או תקלות.
      • Capture – פעולת הלכידה עצמה.
      • OSDrive – מחיצת המערכת שלכם (לרוב – כונן C), בה מותקנות מערכת ההפעלה וכל התוכנות שאותם אתם רוצים להוסיף ל-Image. אתם תידרשו להזין במקום המונח OSDrive תו בודד המסמן את אות הכונן.
      • DestDrive – כונן היעד בו אתם מעוניינים לשמור את ה-Image שלכם. במקום המונח DestDrive תידרשו להזין תו בודד המסמן את אות הכונן.
      • Windows Version – מסמן את סוג מערכת ההפעלה שממנה יוצר ה-Image. לדוגמא: “Windows 7 Home Premium”.
        שימו לב שסימוני הגרשיים (") הם במקור, ועליכם להזינם.
      • Image Description – תיאור ה-Image שאתם יוצרים. לדוגמא: “Windows 7 and Office 2010”.

      טיפ: אם אתם מתקשים למצוא את האות של הדיסק קשיח ואת מיקום הקובץ ImagX דרך שורת הפקודה אתם יכולים להקליד Notepad ויפתח לכם פנקס רשימות ושם תלחצו על file (קובץ) > open (פתיחה) ויפתח לכם חלונית ניווט ותוכלו לנסות למצוא את הקבצים שלכם.)

      1. בסיום תקבלו את ההודעה הזאת:
      [100%] Capturing Progress
       Successfully imaged OSDrive.
      
      1. הקלידו את הפקודה Exit, ולאחר מכן לחצו על המקש Enter. כעת, תופעל מערכת ההפעלה שלכם מחדש (והיא תבקש ממכם ליצור משתמש לבחור שפה ועוד כמו במערכת הפעלה חדשה).

      שלב ה:(התקנה מקובץ Image)

      כעת, יש לנו קובץ Image מותאם אישית והוא נשמר במיקום שהגדרנו לו בשלב הקודם (ד.3).

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

      לכן הדרך הכי פשוטה לבצע התקנה מתוך הקובץ שיצרנו הוא כך:

      1. העתיקו את תכולת דיסק ההתקנה של וינדוס לתוך דיסק נשלף (וינדוס 7 ומעלה, עדיף וינדוס 10 בשביל תמיכה רחבה יותר בדרייברים כמו USB 3 ועוד) .
      2. שנו את שם הקובץ שיצרתם ל Install.wim.
      3. כנסו לדיסק נשלף שהעתקם לתוכו את דיסק ההתקנה של וינדוס והחליפו את הקובץ שיצרתם בקובץ המקורי שנמצא בתיקיה Sources.
      4. כעת תוכלו לבצע התקנה של מערכת הפעלה מותאמת אישית עם ממשק ההתקנה המקורי של מיקרוסופט.

      בהצלחה!

      פורסם בתוכנה
      Y
      yits
    • RE: דרוש תורם עבור מערכת קול הלשון

      @מרדכי @מוגן

      מערכת הפעלה WIN 7 ומעלה (אולי גם XP)
      אנטי וירוס חובה.

      ולהתקין את הקבצים הבאים:

      • install_flash_player_11_active_x
      • Kol Halashon Public Kiosk Setup (להפעיל כמנהל).

      יש צורך לשנות הגדרות מסויימות במחשב:

      • שומר מסך.
      • מצב שינה.
      • כיבוי מסך.

      ויש עוד כמה הגדרות אטחה (יש קבצים מצורפים).

      • הפעלה אוטמטית של התקנים NoAutoRun.reg
      • חסימה של מנהל המשימות ב Ctrl+Alt+Delete ועוד, BlockACD.reg.

      להריץ את הקובץ הזה Tora_ATM_ODBC.reg (אני חושב שזה עבור דוחות של העתקת שיעורים מהעמדה).

      יש להגדיר לינק לתוכנה של קול הלשון (Khl Public Kiosk Shield) עם הרשאת מנהל,
      לפתוח את המאפיינים של הקיצור דרך ובשורת היעד להגיע לסוף השורה ולהוסיף את הפרמטר הזה PASSWORD=xxxxx , כמובן להחליף את ה XXX בסיסמה משלכם.

      • הסיסמה יכולה להיות רק אותיות בעברית או באנגלית.
      • לפני כל פרמטר יש להוסיף רווח להפריד אותו מהפרמטר הקודם וכן רווח בין היעד עצמו לבין הפרמטר הראשון.
      פורסם בגומלין
      Y
      yits
    • RE: האם אוטודידקטיות היא תכונת נרכשת?

      אם כבר מביאים דברי תורה אז קצת נמשיך.

      פי' המהר"ל על איזהו חכם הלמד מכל אדם

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

      https://www.sefaria.org.il/Derech_Chaim.4.1.2?lang=he

      פורסם בגומלין
      Y
      yits
    • RE: מקבץ | דגלים יעילים ומעניינים בכרום

      יצירת קבוצות לטאבים פתוחים

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

      733b4dea-87fa-43ee-8f06-2d2c0f752ceb-image.png
      https://www.askvg.com/tip-enable-tab-groups-feature-in-google-chrome/

      פורסם בתוכנה
      Y
      yits
    • RE: הכונן מבקש אתחול - לאשר ?

      @מעמד אמר בהכונן מבקש אתחול - לאשר ?:

      @yits לא מבין אנגלית

      להתקין את התוכנה

      0_1531228447540_b9147ca8-1973-4ddb-bbaa-8f1c20a0f275-image.png

      לבחור באפשרות השניה.

      0_1531228484397_c51c7923-dcfb-425c-9fa8-efeb48cf78b7-image.png

      לבחור כונן.
      ללחוץ על NEXT
      0_1531228515967_80417034-9d7e-4ba3-800c-98b1299dc25b-image.png

      0_1531228695974_ed3fc4ac-d356-4f58-83de-48c0441a2c21-image.png

      אם אתה רואה את הקבצים שלך לחץ על FIX DRIVE

      אני מעלה קובץ PDF של האתר מתורגם
      0_1531228740799_[נפתר] Chkdsk לא זמין עבור כונני RAW _ USB _ כרטיס SD _ חיצוני HDD Windows 10_8_7 _ XP.pdf

      פורסם בחומרה
      Y
      yits
    • קובץ אקסס לתוצאות הבחירות

      אני מעלה כאן קובץ שיצרתי בעבר בבחירות 2013
      עשיתי שינויים והתאמות קטנות ב 2015

      ועכשיו שיניתי קצת את הקוד (מי שיבדוק יראה מיד מה קריא ומה לא).

      מעודכן עם הסכמי עודפים.
      ‏‏בחירות 2019.accdb

      יש ללחוץ על "עצור את כל פקודות המאקרו"
      ואח"כ ללחוץ על "הפוך תוכן לזמין".

      ביצעתי עריכה

      פורסם בגומלין
      Y
      yits
    • RE: ההבדלים בין העתקה רגילה של win לתוכנות עזר כמו Fast/teraCopy

      ממשק ההעתקה של מיקרוסופט הוא כל כך משוכלל... שהוא לוקח גם הרבה משאבים, בפרט כשרואים את הגרף.

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

      פורסם בתוכנה
      Y
      yits

    פוסטים אחרונים שנוצרו על ידי yits

    • RE: איך בונים דטה בייס פשוט משותף ברשת

      @aaron אמר באיך בונים דטה בייס פשוט משותף ברשת:

      @yits אמר באיך בונים דטה בייס פשוט משותף ברשת:

      AppSheet

      במחירון שלהם מופיע שזה לתוכנית Business ומעלה..

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

      פורסם בתוכנה
      Y
      yits
    • RE: איך בונים דטה בייס פשוט משותף ברשת

      @aaron אמר באיך בונים דטה בייס פשוט משותף ברשת:

      אני מחפש משהו דומה, אבל שיתחבר למסד נתונים אמיתי (postgres/mysql)

      AppSheet יודע להתחבר למגוון מסדי נתונים

      תמונה מתוך האתר שלהם
      660dd6ed-b542-4d49-b072-a8cf0fa90fc5-image.png

      וזה תמונות מתוך הממשק
      5f979224-8761-4961-b80c-7c02dae3b1c1-image.png
      866a2b67-d774-4a1f-98c4-9e5f8ebfc17a-image.png

      cb3a109f-283a-4a5b-8622-dfd2f8da21f8-image.png

      פורסם בתוכנה
      Y
      yits
    • RE: איך בונים דטה בייס פשוט משותף ברשת

      לכל המתעניינים

      השתמשתי בסוף עם AppSheet.com וזה נראה ממש טוב.

      יוצרים טבלאות בGoogleSheet (או מקשרים לדטה בייס חיצוני)
      ואת הקשרים והמאפיינים של הטבלה עושים ב AppSheet.

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

      פורסם בתוכנה
      Y
      yits
    • RE: איך בונים דטה בייס פשוט משותף ברשת

      תודה על העזרה

      אני החלטתי לבדוק אפשרות אחרת להשתמש ב appSheet
      והנתונים יישבו באקסל של גוגל.

      פורסם בתוכנה
      Y
      yits
    • RE: איך בונים דטה בייס פשוט משותף ברשת

      @sh774 אמר באיך בונים דטה בייס פשוט משותף ברשת:

      קובץ אקסס שנמצא בדרופבוס או גוגל דרייב

      מה אתה מתכוון בזה
      להתחבר מפרונט אנד לDB שיושב באחסון?

      פורסם בתוכנה
      Y
      yits
    • איך בונים דטה בייס פשוט משותף ברשת

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

      פורסם בתוכנה
      Y
      yits
    • RE: גישה ציבורית לקו טלפון עם סיסמא

      @a0533057932 אמר בגישה ציבורית לקו טלפון עם סיסמא:

      @yits אני מכיר את ipconect רק 6 שנים

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

      פורסם במובייל וטבלט
      Y
      yits
    • RE: גישה ציבורית לקו טלפון עם סיסמא

      @a0533057932 אמר בגישה ציבורית לקו טלפון עם סיסמא:

      @chagold אני ממליץ עליהם
      https://ipconnect.co.il/
      לא נתקלתי בישיבה שלא עובדת דרכם (אני מאמין שיש אבל כל מי שאני מכיר זה דרכם)

      @by6199 אמר בגישה ציבורית לקו טלפון עם סיסמא:

      @chagold החברה המובילה היום זה ipconnect מבחינת עלויות זה סיפור יקר מעט.

      אני לא יודע על סמך מה אתם כותבים את זה

      עד לפני שמונה שנים כל הישיבות היו ב IP CONECT
      אבל היו להם הרבה בעיות באותו זמן שהישיבות נדרשו לפתרונות אחרים
      (זה היה בגלל שהאיש טכני שלהם עזב או משהו כזה, אין לי מושג מה איתם היום)

      ואז חברת קשר הייתה ממש בתחילת דרכה
      והיא נכנסה לישיבת קול תורה
      ומשם הם התפרסו הלאה להרבה מאוד ישיבות

      כמעט כל הלקוחות של קשר היו בעבר ב אי פי קונקט

      פורסם במובייל וטבלט
      Y
      yits
    • RE: גישה ציבורית לקו טלפון עם סיסמא

      @chagold אמר בגישה ציבורית לקו טלפון עם סיסמא:

      תוכל לכתוב שמות?

      אני ממליץ מאוד על חברת קשר עבור ישיבות וכדו'
      https://kesher-tel.com/

      פורסם במובייל וטבלט
      Y
      yits
    • RE: תמונת מערכת

      @yits
      https://www.sevenforums.com/tutorials/135077-windows-7-installation-transfer-new-computer.html

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

      פורסם בחומרה
      Y
      yits