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

אולי סגנון הado הזה יעזור יותר.

Dim AN As New ADODB.Connection
Dim מוצרים As New ADODB.Recordset

Set AN = CurrentProject.Connection
        
Set מוצרים = CreateObject("ADODB.Recordset")

מוצרים.Open "SELECT * FROM [שיוך מוצרים למחלקות] WHERE [מוצר]=" & Me.טקסט0 & "and [מחלקה] =" & Me.רשימה22, AN, adOpenForwardOnly, adLockOptimistic
If מוצרים.EOF = True Then Exit Sub
מוצרים.MoveFirst
מוצרים![n_mutzar] = 0
מוצרים.Delete adAffectCurrent
מוצרים.Update
מוצרים.Close

דרוש קישור ברפרנס
nicrosoft activex data objects 2.1 library

פורסם במקור בפורום CODE613 ב03/04/2017 15:06 (+03:00)

התקנתי. אחרי שעתיים של עבודה, ביישורת האחרונה - קיבלתי את זה.

וצירפתי גם את הלוג.

אגב, גם אני בוינ 7

תודה מראש.

לכידה.PNG
dd_vs_community_20170402222326.log

פורסם במקור בפורום CODE613 ב03/04/2017 01:27 (+03:00)

יש לי מדיה ויקי מותקן עם התוסף של ייבוא קבצי HTML ולמרות זאת אינני מצליח לייבא את הקבצים.
מישהו מכיר את הפרוצודורה/הבאגים?
תודה מראש.

פורסם במקור בפורום CODE613 ב19/03/2017 23:28 (+02:00)

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

Public Function HAMARA(JSON_TEXT_IN As String) As String
Dim TXTMP As String

TXTMP = Replace(JSON_TEXT_IN, ": ", ":[")

TXTMP = Replace(TXTMP, ": 0", ", 0")
TXTMP = Replace(TXTMP, ": 1", ", 1")
TXTMP = Replace(TXTMP, ": 2", ", 2")
TXTMP = Replace(TXTMP, ": 3", ", 3")
TXTMP = Replace(TXTMP, ": 4", ", 4")
TXTMP = Replace(TXTMP, ": 5", ", 5")
TXTMP = Replace(TXTMP, ": 6", ", 6")
TXTMP = Replace(TXTMP, ": 7", ", 7")
TXTMP = Replace(TXTMP, ": 8", ", 8")
TXTMP = Replace(TXTMP, ": 9", ", 9")

TXTMP = Replace(TXTMP, ",", "],")


TXTMP = Replace(TXTMP, "}", "]},")


HAMARA = TXTMP

End Function

JsonBag 2.4.zip

פורסם במקור בפורום CODE613 ב18/03/2017 21:05 (+02:00)

@ClickOne

@CHAGOLD
ספציפית להעלות ולהוריד קבצים יש לי API של דרובוקס. מעניין אותך?

זה פונקצייה שמשתמשת בDLL או EXE חיצוני, או VBA טהור?

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

פורסם במקור בפורום CODE613 ב17/03/2017 12:42 (+02:00)

@מצפה לגדול

@CHAGOLD
ספציפית להעלות ולהוריד קבצים יש לי API של דרובוקס. מעניין אותך?

פונקציית VBA?
כן
מאוד.
תודה מראש!!

שלח לי מייל באישי

פורסם במקור בפורום CODE613 ב16/03/2017 23:44 (+02:00)

ספציפית להעלות ולהוריד קבצים יש לי API של דרובוקס. מעניין אותך?

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

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

פורסם במקור בפורום CODE613 ב08/03/2017 01:33 (+02:00)

@עילום

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

אז מה אתה מציע לעשות?
לקחת נפח כפול?

תודה מראש

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

פורסם במקור בפורום CODE613 ב03/02/2017 08:42 (+02:00)

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

פורסם במקור בפורום CODE613 ב29/01/2017 19:43 (+02:00)

כרגע אנחנו משתמשים באמזון (למדיה, לא לאתר עצמו). בערך 25$ לטרה

פורסם במקור בפורום CODE613 ב26/01/2017 23:40 (+02:00)

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

תודה מראש

פורסם במקור בפורום CODE613 ב26/01/2017 01:21 (+02:00)

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

ההודעה שקיבלתי:
‏‏חתימת הבעיה:
שם אירוע הבעיה: BlueScreen
גרסת מערכת ההפעלה: 6.1.7601.2.1.0.256.1
מזהה אזור: 1037

‏‏מידע נוסף אודות הבעיה:
BCCode: 1000007e
BCP1: C0000005
BCP2: 94948F22
BCP3: 8D7BC990
BCP4: 8D7BC570
OS Version: 6_1_7601
Service Pack: 1_0
Product: 256_1

הקובץ בסיומת ZIP הוא בעצם סיומת BMP שלא היתה אפשרות להעלות אותו כBMP

012817-6318-01.ZIP
WER-28064-0.sysdata.xml

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

וינ 7, דרייורים מעודכנים.
עכשיו ראיתי את המאמר ברשת,

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

פורסם במקור בפורום CODE613 ב09/01/2017 23:49 (+02:00)

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

מה יכולה להיות הסיבה?

תודה מראש.

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

לא הצלחתי להוריד כיון שיש לי נטפרי.
תודה מראש.

פורסם במקור בפורום CODE613 ב01/12/2016 21:09 (+02:00)

איך יש חברות שעושות 'מעקב משלוחים' בדואר אם אין להם API?

פורסם במקור בפורום CODE613 ב04/11/2016 00:58 (+02:00)

@CODE.NET

ברכות על הפרוייקט! זכויותיך בוודאי עצומות.

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

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

פורסם במקור בפורום CODE613 ב07/10/2016 00:55 (+03:00)

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

פורסם במקור בפורום CODE613 ב12/09/2016 23:38 (+03:00)

צודק, תודה.
בכ"א בTIF איך עושים?

פורסם במקור בפורום CODE613 ב02/09/2016 15:14 (+03:00)