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

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

💡 רוצה לזכור קריאת שמע בזמן? לחץ כאן!
S

softs

@softs
אודות
פוסטים
271
נושאים
9
קבוצות
0
עוקבים
0
עוקב אחרי
0

פוסטים

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

  • השמעת קובץ אודיו דרך SSH ב VBA
    S softs

    אולי תן reference ל windwos media player תיצור קונטרול ותפעיל את הקובץ ככה: (עבד לי באקסל)

     Sheet2.WindowsMediaPlayer1.URL = "http://www.stephaniequinn.com/Music/Allegro%20from%20Duet%20in%20C%20Major.mp3"
        Sheet2.WindowsMediaPlayer1.Controls.Play
        Sheet2.WindowsMediaPlayer1.Visible = False
    

    כמובן שבדוט נט זה הרבה יותר פשוט . . .

    פורסם במקור בפורום CODE613 ב25/06/2014 13:34 (+03:00)


  • יצירת טבלאות ראי עם טריגר
    S softs

    @ארכיטקט

    @softs
    רבותי דיינים מומחים, יש פתרון פשוט :

    IF ((
    SELECT TRIGGER_NESTLEVEL()) > 1 )
    RETURN
    

    וזה מונע הפעלה של טריגר מתוך טריגר בכל ה DB:

    EXEC sp_configure 'show advanced options', 1
    GO
    RECONFIGURE
    GO
    EXEC sp_configure 'nested triggers', 0
    GO
    RECONFIGURE
    GO
    

    איזו מומחיות!!! שחרר עוד קצת מודיעין.....

    שמחתי לעזור, ואתם מוזמנים לאתגר אותי ... <!-- s:-) --><img src="{SMILIES_PATH}/icon_e_smile.gif" alt=":-)" title="מחייך" /><!-- s:-) -->

    פורסם במקור בפורום CODE613 ב23/06/2014 16:33 (+03:00)


  • יצירת טבלאות ראי עם טריגר
    S softs

    רבותי דיינים מומחים, יש פתרון פשוט :

    IF ((
    SELECT TRIGGER_NESTLEVEL()) > 1 )
    RETURN
    

    וזה מונע הפעלה של טריגר מתוך טריגר בכל ה DB:

    EXEC sp_configure 'show advanced options', 1
    GO
    RECONFIGURE
    GO
    EXEC sp_configure 'nested triggers', 0
    GO
    RECONFIGURE
    GO
    

    פורסם במקור בפורום CODE613 ב23/06/2014 11:32 (+03:00)


  • ניתוב ל IP מקומי
    S softs

    @ClickOne

    @softs
    הפנייה פנימית לא יכולה להתבצע אוטומטית מהסיבה הפשוטה שעד שהוא לא יוצא החוצה הוא לא יכול לדעת שזה ה IP החיצוני שלו

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

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

    ד"א, ברוך הבא לפורום...
    ניכרת המקצועיות והידע...

    הראוטר יודע, אבל אז אתה נזקק לחסדיו של הראוטר.
    הפתרון שהצעתי הוא הפשוט ביותר לענ"ד.

    פורסם במקור בפורום CODE613 ב23/06/2014 14:02 (+03:00)


  • ניתוב ל IP מקומי
    S softs

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

    פורסם במקור בפורום CODE613 ב23/06/2014 12:00 (+03:00)


  • בעיה הנראית כמו התנגשות במרחב שמות בדוט נט
    S softs

    נוסף על דברי דוד ל.ט.

    יש דרך לייבא את שניהם ועדיין לא לרשום את הנתיב המלא ע"י יצירת ALIAS
    לדוגמה

    using reg = System.Text.RegularExpressions;
    using utl = Microsoft.Internal.Web.Utils;
    

    כך אפשר לייבא את שניהם כל אחד עם שם שונה ובמקום הנתיב המלא להשתמש ב reg או utl
    תקף גם ל VB
    נ.ב. הקוד להמחשה בלבד

    פורסם במקור בפורום CODE613 ב22/06/2014 17:55 (+03:00)


  • קבלת אימייל בקוד
    S softs

    @דוד ל.ט.

    @softs

    מן הסתם זה ילך ל TRASH ולא ממש יימחק והרווחת שזה לא יופיע יותר

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

    צודק, צריך לבדוק כל שרת לגופו.

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

    עוד נקודה חשובה, למי שמממש את הפתרון של לשמור UniqueID בצד CLIENT, צריך לשים לב שיכול להיות אותו UniqueID לשני הודעות עם הבדל בcasing, לכן אם שומרים ב SQL צריך להגדיר את השדה על COLLATION שהוא CS וגם בקוד לשים לב לזה

    פורסם במקור בפורום CODE613 ב25/02/2015 11:15 (+02:00)


  • קבלת אימייל בקוד
    S softs

    לא,
    אבל אפשר למחוק את ההודעה עם הפקודה DELE ואחר כך QUIT
    מן הסתם זה ילך ל TRASH ולא ממש יימחק והרווחת שזה לא יופיע יותר

    פורסם במקור בפורום CODE613 ב24/02/2015 19:29 (+02:00)


  • קבלת אימייל בקוד
    S softs

    @דוד ל.ט.

    הפרוטוקול POP3 לא מאפשר לשמור מידע כל שהוא בצד שרת, וממילא הדרך היחידה שלו לדלג על מיילים שהוא קרא זה ע"י שמירת הID שלהם בצד הלקוח ודילוג עליהם בכל קריאה.

    מחיפוש באינטרנט:
    http://stackoverflow.com/a/352347/1271037

    It's the responsibility of the POP3 client to check for this.

    ובעברית: עניין זה הוא באחריותו של הלקוח - התוכנה שמושכת את המיילים.

    זה לא נכון כי הוא מאפשר לסמן את המייל כנקרא
    מה שאפשר לעשות בג'ימייל זה להגדיר בטאב של ה POP3 שאחרי שהמייל נקרא הוא עובר ל archive המסתורי של הגימייל או נמחק ואז לא תקבל אותו באיטרציה הבאה
    אני עשיתי את זה עם ספריה של LUMISOFT
    אבל זה לא עובד לבד צריך לסמן את המייל למחיקה וגם לקרוא ל DISCONNECT בסוף אחרת זה לא יקרה

    Dim client As New POP3_Client
    
                client.Timeout = 360000
    
                Try
    
                    client.Connect(My.Settings.InServer, My.Settings.InPort, True)
    
                    client.Authenticate(My.Settings.InUser, My.Settings.InPassword, True)
    
                Catch ex As Exception
    
    
    
                    'TODO LOG
    
                    Exit Sub
                End Try
    
    
                Dim sErr As String = ""
    
                For Each m As POP3_ClientMessage In client.Messages
               
                    Dim msg As Mail_Message = Mail_Message.ParseFromByte(m.MessageToByte)
    
                    For Each at As LumiSoft.Net.Mime.MIME_Entity In msg.Attachments
    
                        If at.ContentDisposition Is Nothing Then
                            Continue For
                        End If
    
    
                        Dim FileName As String = at.ContentDisposition.Param_FileName
    
                        Dim file As Byte() = GetBody(at)
                      
                    Next
                    'כאן מעדכנים את השרת אבל זה לא נשמר עד שלא קוראים לDISCONNECT
                    m.MarkForDeletion()
    
                Next
    			
                client.Disconnect()
    

    פורסם במקור בפורום CODE613 ב24/02/2015 17:05 (+02:00)


  • SQL: שאילתה שתחזיר רשומות מספרים או תאריכים מתוך טווח נתון
    S softs

    @ארכיטקט

    עזרת, אבל מה עם mysql...

    כבר אמרו חז"ל: למד לשונך לומר איני יודע . . .

    פורסם במקור בפורום CODE613 ב31/07/2014 00:04 (+03:00)


  • SQL: שאילתה שתחזיר רשומות מספרים או תאריכים מתוך טווח נתון
    S softs

    OK זה נראה שאני היחיד שמכיר - ויש לי טריקים נוספים אפילו . . . <!-- s8-) --><img src="{SMILIES_PATH}/icon_cool.gif" alt="8-)" title="מגניב" /><!-- s8-) -->

    אגב שלא תגידו שלא אמרתי - התכונה הזו כמעט בת עשר (מ 2005) . . .

    ואני הקטן אנסה להסביר:
    הגדרה של CTE עשית על ידי שימוש במילה WITH כמו בדוגמה
    היא מגדירה למעשה VIEW זמני שקיים רק עד אחרי שמתשאלים אותו פעם אחת ואז נעלם
    תכונה ייחודית שלו היא שאפשר לקרוא ל VIEW מתוך עצמו מה שלמעשה הופך אותו לבעל יכולת רקורסיבית
    מעבר לכך הכל פועל כמו שאילתה רגילה
    בשורה הראשונה אתה למעשה בוחר את השורה הראשונה שלך ואז ב UNION מחבר אליה את הבאות בתור
    לפי הלוגיקה שלך לדוגמה אם בחרת יום מסוים תרצה לחבר אליו את היום הבא או הקודם וכו'
    דבר נוסף שצריך לשים לב לשים TERMINATOR כמו בכל רקורסיה, אחרת ב 100 הוא עף או שמגדירים MAX RECURSION גדול יותר מ100
    במקרה של הדוגמה שהובאה >5 זה הטרמינייטור

    אחד הדברים המגניבים שזה משמש הוא עבור שליפת עץ מטבלה שטוחה ושרשור הנתיבים של העלים

    לדוגמה אם יש טבלת עובדים ויש ID לכל עובד ועמודה שמכילה את ה ID של המנהל של אותו עובד וגם למנהל יש מנהל ולמעלה בקודש וכו'
    לבנות מזה עץ ייראה בערך ככה : (אני ממליץ למי שרוצה להבין ליצור ממש טבלה ולנסות את השאילתה)

    WITH cte (ID,MID,path) AS
    (
    SELECT [EmployeeID],[ManagerID], CAST([First Name] + ' ' + [Last Name] AS NVARCHAR(MAX))
    FROM Employees WHERE [ManagerID] IS NULL
    
    UNION ALL
    
    SELECT [EmployeeID],[ManagerID],
    CAST(path + '\' + [First Name] + ' ' + [Last Name] AS NVARCHAR(MAX))
    FROM Employees INNER JOIN cte ON ID = [ManagerID]
    )
    
    SELECT * FROM cte
    

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

    פורסם במקור בפורום CODE613 ב30/07/2014 23:17 (+03:00)

  • 1 / 1
  • התחברות

  • אין לך חשבון עדיין? הרשמה

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