תחומים - פורום חרדי מקצועי

@אביי תראה את זה כאן
https://www.93fm.co.il/radio/613399/

@מעמד אמר בהאם ידוע אם מטפלת שעובדת תחת התמת במשפחתון בביתה צריכה לפתוח עוסק פטור?:

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

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

@WWW אמר בעזרה בתיקון מזגן:

@לחיל-אומר אמר בעזרה בתיקון מזגן:

א. איך מפרקים מזגן בלי שהגז יצא ממנו.

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

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

@לחיל-אומר
@zvinissim

@שוהם307 כתב בשקע+מתג:

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

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

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

תמלא את החור (שימלא את החסר ואפשר קצת יותר) עם סופר 7 וכדומה תן לו להתייבש כמה שעות (רצוי ייבוש מלא), ואח"כ תחבר.

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

@מעמד אמר בטייפ טושיבה שלא קורא את הUSB - עזרה:

@בערל אמר בטייפ טושיבה שלא קורא את הUSB - עזרה:

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

גאון !!
עובד !!
מה הדפקת הזה שביותר זה לא נתמך ?

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

@clickone @yossiz המון תודות עובד מעולה
אין עליכם

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

נעזרתי ב gpt וזה עובד כולל החלפת גופן

Function FindAndHit(findWhat As Variant, text As Variant) As String

    If IsNull(findWhat) Or IsNull(text) Then
        FindAndHit = IIf(IsNull(text), "", text)
        Exit Function
    End If

    Dim openTag As String
    openTag = "<font face=FrankRuehl size=5>"
    Dim closeTag As String
    closeTag = "</font>"

    FindAndHit = Replace(text, findWhat, openTag & findWhat & closeTag)

End Function

@יוס אני יכול להבין את ההיגיון שבזה רחוב סוקולוב הרבה יותר עמוס מרחוב מיימון (למעט נסיעה מאחרי רכב אשפה...)

שים לב כתוב המסלול המהיר ביותר
לעומת זאת לוויז יש את נתוני האמת ועל כן הוא נותן את המסלול הקצר
תנסה לעשות חיפוש בוויז בשעות 8 בבוקר כשסוקולוב עמוס או ב4-6 בצהריים ותראה מה התוצאה

@ששא תכתוב לו להגיע ברכב ולא ברגל
רחוב אבל גבירול בבני ברק הוא חד סתרי ויש 2 דרכים להגיע דרך רחוב שבטי ישראל (הקצרה) או דרך רחוב מיימון (הארוכה יותר)

כתבתי קוד משלי לשמירת סיסמאות בdb אקסס
זה הקוד:

Public Function EncryptString(str As String) As String
    Dim i As Integer
    Dim encryptedStr As String
    Dim Doubl As Long
    Dim todivide As Long
    Dim encoded As Long
    encryptedStr = ""
    
    For i = 1 To Len(str)
    
    If i - 1 < 1 Then todivide = Len(str) Else: todivide = i - 1
    If i + 1 > Len(str) Then Doubl = 1 Else: Doubl = i + 1
    encoded = Asc(Mid(str, i, 1)) * Asc(Mid(str, Doubl, 1)) / Asc(Mid(str, todivide, 1))
    If encoded = 32 Then encoded = encoded * Asc(Mid(str, Doubl, 1)) / Asc(Mid(str, todivide, 1))
    If encoded = 13 Then encoded = encoded * Asc(Mid(str, Doubl, 1)) / Asc(Mid(str, todivide, 1))
        Do While encoded >= 191
            encoded = encoded - 191
            If encoded = 32 Then encoded = encoded * Asc(Mid(str, Doubl, 1)) / Asc(Mid(str, todivide, 1))
            If encoded = 13 Then encoded = encoded * Asc(Mid(str, Doubl, 1)) / Asc(Mid(str, todivide, 1))
        Loop
        encryptedStr = encryptedStr & Chr(encoded)
    Next i
    
    EncryptString = encryptedStr

End Function

התוצאות של הקוד שהזנתי הם

M›rG
cfoq

האם אפשר לדבג אותם אחורה או שכתבתי מעולה?

@מלא ואההווו
לא הכרתי את זה זה נשמע באמת הרבה יותר מעולה וקל לתפעול + בלי קריאה של המשתנים ותפעול קליל.
עריכה: המעלה העיקרית שלו שהמשתנה לא מתאפס בזמן שגיאת ריצה (כלשונם)
תודה רבה.

את האמת הוודעתי ל Powershell רק בשבועות האחרונים והוא פשוט כלי שמדהים אותי ממש כל פעם מחדש
כל יום "יהיו בעיניך כחדשים"

לא שמתי לב שכתבת את זה
ותוך כדי כבר הגעתי לתשובה שכתבת ובכל אופן תודה רבה
בשביל לגשת לנתיב שלו אני צריך לגשת ל

$changes.InputObject.path

לתועלת הציבור הקוד הזה עובד מעולה

    $folder1 = "X:\Test"
    
    $folder2 = "X:\MyBackup\Test"
     
    $folder1Items = Get-ChildItem $folder1 -Recurse | Get-FileHash -Algorithm MD5

    $folder2Items  = Get-ChildItem $folder2 -Recurse | Get-FileHash -Algorithm MD5
  
    $changes = Compare-Object $folder1Items $folder2Items -Property Name, Path -IncludeEqual
 
    $updated = $changes | Where-Object {$_.SideIndicator -eq "<="}
    

        $updated | ForEach-Object {
            
            $ww = (Get-Item $_.Path).DirectoryName.replace($folder1,$folder2)
            if (!(Test-Path -path $ww)) {
            New-Item $ww -Type Directory
            }
            Copy-Item $_.Path $ww -Force 
        }

כמובן שיש לשנות את הנתיבים

@מטעמים את האמת אני נתקלתי בזה לפני איזה 3 שנים, וזה היה הפתרון.

1. איפה בדיוק שמת את הקוד של ההמתנה (באיזו שורה)???
2. ולכמה זמן נתנת לו המתנה ומה יקרה אם תתן לו דקה שלימה להמתין.

אין לי כרגע גישה לקובץ שאיתו היה לי את הבעיה בכדי לבדוק מה בדיוק עשיתי ועם איזה קוד השתמשתי.

@odeddvir תודה
תשובה פשוטה ועובד חלק!