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

סליחה.
זה לא הראוטר, אלא הכרטיס רשת.
ראה כאן:
http://stackoverflow.com/questions/22747668/routing-call-from-localhost-to-external-ip-to-locahost

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

מהנסיון שלי הראוטר מחזיר אותו מיד למחשב המקומי המנותב לפורט.

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

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

ד"א, בגלל הסיבה הזו אני אוהב לשים קידומת Tbl לטבלאות Qry לשאילתות וכו'

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

@דוד ל.ט.

בנותן טעם:
http://stackoverflow.com/q/3014940/1271037

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

ודבר נוסף,
כשמסמנים נושא כ"פתור" נא לסמן את התשובה המועילה ולא את השאלה, כדי שנוכל לדעת מה הפיתרון שהועיל בסוף ללא ניסוי ותעייה.

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

@chaim1989

לא ניסיתי אבל לדעתי אם תעשה like %משה%דוד%
זה ימצא גם את משה צבי דוד
מקווה שהבנתי אותך נכון

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

@מלא

באותו כיוון של סינון מרובה שהועלה כאן

האם ישנה אפשרות להכניס לתוכו את האפשרות של like שיחפש שדה המכיל ערך X וגם X וכו'
ולא רק שווה ל X
?

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

הנה הדוגמא שלי:

select * from tbl where (Phone like "05484*" or Phone Like "05276*" or Phone Like "05271*") And Ok=True

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

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

@ארכיטקט

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

יש לך מערך שמחזיק בתוכו את כל הטפסים הפתוחים.
כשאתה רוצה לפתוח כרטיס חדש, רוץ עליו בלופ, ותבדוק אם הID מתאים למה שאתה רוצה לפתוח.
במידה וכן, פשוט תעשה לאיבר במערך (שהוא בעצם הטופס) SetFocus במקום לפתוח טופס חדש.

פורסם במקור בפורום CODE613 ב30/09/2014 22:10 (+03:00)

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

Dim r As New Report_QrySumByHebDate
r.Filter = "UserId=2"
r.FilterOn = True
r.Visible = True

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

פורסם במקור בפורום CODE613 ב16/09/2014 22:05 (+03:00)

@ארכיטקט

@ClickOne
אם עושים סינון פרמטר בתיבת רשימה(forms!frmMain!IDTxt וכו'), אז Requery לא עובד, כי הוא לא יודע לאיזה טופס להתייחס.

עושים סינון פרמטר ככה: form!IDTxt
זה אמור לעבוד בעזרת השם יתברך.

ואני תמיד עשיתי הפנייה מדוייקת....
תודה!

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

@ClickOne

@ארכיטקט

בעיות נוספות:
אם עושים סינון פרמטר בתיבת רשימה(forms!frmMain!IDTxt וכו'), אז Requery לא עובד, כי הוא לא יודע לאיזה טופס להתייחס.

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

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

@ארכיטקט

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

ב2010 לא ראיתי שום בעייה, וב2013 אכן יש בעייה, והייתי צריך להגדיר Me!cmd.UseTheme = True

בעיות נוספות:
אם עושים סינון פרמטר בתיבת רשימה(forms!frmMain!IDTxt וכו'), אז Requery לא עובד, כי הוא לא יודע לאיזה טופס להתייחס.

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

וכמובן, להיזהר מאד מהזרקת SQL

פורסם במקור בפורום CODE613 ב15/06/2014 19:29 (+03:00)

@ארכיטקט

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

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

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

למרות שאני לא אוהב לממש באקסס דברים שלא נמצאים בילד אין, לפעמים אין ברירה.
הנה הדוגמא שלי לטיימר באקסס שלא משפיע על האקסס, אלא רץ בטרד' בנפרד.
TimerApi.accdb

מקור:
http://support.microsoft.com/kb/180736

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

@ארכיטקט

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

דווקא יש ריבוי מופעים.
מצ"ב הדוגמא שלי
MultiFormInAccess.accdb

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

@ClickOne

כמובן, בסוף זה היה FileContents, למרות שזה לא עבד לי בהתחלה ואני לא מבין למה

הנה הקוד להדבקת קובץ מRDP (שימו לב שזה לא עובד בהדבקה מקומית, וצריך לבדוק אם יש קבצים בFileDrop) :

Dim data As IDataObject = Clipboard.GetDataObject
     
        If data.GetDataPresent("FileContents", True) Then


            Dim newFile As String = Path.Combine("c:\", "a.Pdf")
            Dim memoryStream As MemoryStream = data.GetData("FileContents")
            ' Create a FileStream object to write a stream to a file
            Using fileStream As FileStream = System.IO.File.Create(newFile, CInt(memoryStream.Length))
                ' Fill the bytes[] array with the stream data
                Dim bytesInStream As Byte() = New Byte(memoryStream.Length - 1) {}
                memoryStream.Read(bytesInStream, 0, CInt(bytesInStream.Length))
                ' Use FileStream object to write to the specified file
                fileStream.Write(bytesInStream, 0, bytesInStream.Length)
            End Using
        End If

עכשיו נשאר לראות אם אפשר להמיר לVBA, או שצריך להשתמש בInterop

נאלצתי להסיר את הV שמסמן שהנושא נפתר.

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

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

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

כמובן, בסוף זה היה FileContents, למרות שזה לא עבד לי בהתחלה ואני לא מבין למה

הנה הקוד להדבקת קובץ מRDP (שימו לב שזה לא עובד בהדבקה מקומית, וצריך לבדוק אם יש קבצים בFileDrop) :

Dim data As IDataObject = Clipboard.GetDataObject
     
        If data.GetDataPresent("FileContents", True) Then


            Dim newFile As String = Path.Combine("c:\", "a.Pdf")
            Dim memoryStream As MemoryStream = data.GetData("FileContents")
            ' Create a FileStream object to write a stream to a file
            Using fileStream As FileStream = System.IO.File.Create(newFile, CInt(memoryStream.Length))
                ' Fill the bytes[] array with the stream data
                Dim bytesInStream As Byte() = New Byte(memoryStream.Length - 1) {}
                memoryStream.Read(bytesInStream, 0, CInt(bytesInStream.Length))
                ' Use FileStream object to write to the specified file
                fileStream.Write(bytesInStream, 0, bytesInStream.Length)
            End Using
        End If

עכשיו נשאר לראות אם אפשר להמיר לVBA, או שצריך להשתמש בInterop

פורסם במקור בפורום CODE613 ב10/08/2014 01:32 (+03:00)

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

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

ועכשיו לקובץ.

הפורמט של קובץ הוא FileDrop, אבל כשמעתיקים מRDP אז מה שנשמר בזיכרון זה לא FileDrop אלא משהו אחר.
נסיונות לאתר איזה פורמטים יכולים להיות "מומרים" לפורמט תיקני מחזירים 3 תוצאות:
ע"י הפונקצייה:

data.GetFormats( True)


-		data.GetFormats( True)	{Length=3}	String()
		(0)	"FileGroupDescriptorW"	String
		(1)	"FileContents"	String
		(2)	"Preferred DropEffect"	String

3 התוצאות הם בעצם פרטים על שם הקובץ והפעולה (העתקה, העברה וכו') אבל לא איפה הקובץ.
ההשערה שלי היא שכנראה הקובץ עצמו יושב בפורמט פנימי של מייקרוסופט (כמו שכל מתכנת יכול להגדיר לעצמו פורמט) ולכן הפונקצייה הנ"ל לא מוצאת אותו - (כי כנראה היא מכירה רק את הפורמטים ה"סגורים")

חיפוש באינטרנט מה שמו של הפורמט הזה לא הניב תוצאות מספקות לעת עתה.

רעיונות?

פורסם במקור בפורום CODE613 ב10/08/2014 00:56 (+03:00)

@דוד ל.ט.

אצלי עובד, אבל עם באג חמור...
הרצתי קוד VB.NET, ע"ג מחשב מרוחק (SERVER 2003) והוא הציג כתובת שהועתקה במחשב המקומי (WIN7). פורמט הכתובת בדיוק כמו שציינת.
הנה הקוד:

Dim IsContains = My.Computer.Clipboard.ContainsFileDropList
Console.WriteLine(IsContains)

If IsContains Then Console.WriteLine(My.Computer.Clipboard.GetFileDropList(0))

הפלט:

True
\\tsclient\C\Users\shmuel\Desktop\PC07.pptx

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

כי הוא שומר את ההעתקה בבאפר שלו. (זה גם מה שהיה בXP)
אח"כ הם תיקנו את זה....
אבל! הקוד הנ"ל פשוט לא עובד בWIN7 מול SERVER 2008 R2.....

לא מבין למה... - נראה לי שהם רצו לתקן משהו אחד, ונמצאו מקלקלים דבר אחר....

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

כולנו מכירים את "העתק-הדבק" של קבצים.
אם בקוד אני רוצה לדעת את שם הקובץ להעתקה (אחרי פעולת "העתק") אני יכול להשתמש בקוד הבא:

Clipboard.GetFileDropList(0)

ואז אני יכול להעתיק אותו בקוד, כי יש לי את הנתיב.

הבעייה שלי:
אני רוצה להעתיק על המחשב שלי, ולהדביק בקוד בשרת RDP (במקרה שלי: WIN SERVER 2008 R2).
אז להדביק רגיל הוא נותן, אבל לא לקבל את הנתיב באמצעות הקוד הנ"ל.

בעבר (WIN XP), בהעתקה לRDP ווינדוס היה מעביר את הקובץ לקליפבורד של המחשב השני, ואז הייתה אפשרות להדביק [מהתיקייה הזמנית של המחשב המקומי], היום מייקרוסופט שינו את זה (לטובה!) והקובץ לא מועתק לשום מקום עד שלא עושים "הדבק" והווינדוס שומר את הרפרנס בלבד.

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

\\tcpclient\c\bla.doc

אבל לא ממש מוצא איפה נמצאת הכתובת

רעיונות?

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

תכתוב בתבנית עיצוב:

0.00$

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

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

פורסם במקור בפורום CODE613 ב06/02/2017 20:20 (+02:00)