טלפון IP המחובר לרשת - הוצאת שיחות מאקסס
-
יש לי טלפון IP (אם זה משנה אז זה snom320)
המחובר לחברת 015אני רוצה להוציא שיחות מתוך רשימת החברים שיש לי כבר באקסס
יש למישהו קוד או הכוונה?אם נכנסים דרך הדפדפן לטלפון עם הIP שלו,
יש שם מקום להוציא שיחות, כך שכנראה אפשר למצוא דרך לחייג, לא?פורסם במקור בפורום CODE613 ב11/05/2017 15:09 (+03:00)
-
אתה צריך לבצע פוסט לכתובת, ואז לא ממש משנה איך המימוש מאחורי הקלעים
להלן קוד לדוגמא:
Function CallToNumber(number, Optional ByVal Name As String = "", Optional ByVal PhoneExtension As String = "") If Len(PhoneExtension) = 0 Then PhoneExtension = GetCurrentPhoneExtension() If Len(PhoneExtension) = 0 Then MsgBox "לא הוגדרה שלוחה": Exit Function 'מחייג מהחייגנוביץ Dim urladdress As String urladdress = "http://" & PBX_GetAddress & "/functions/make_immediate_call.php?caller=" & PhoneExtension & "&callee=" & number & "&name=" & URLEncode(Name) Dim xmlDoc As MSXML2.DOMDocument60 Set xmlDoc = New MSXML2.DOMDocument60 xmlDoc.Async = True xmlDoc.Load (urladdress) Debug.Print urladdress End Function
פורסם במקור בפורום CODE613 ב11/05/2017 15:13 (+03:00)
-
אויש, לא כתבתי בהודעה הראשונה
שאני עםהארץ גדול והקוד הזה חסר משמעות בשבילי, יש שם כמה פונקציות ומשתנים שאין להם אבא,
נאלמתי מימיני לשמאלי...אם מישהו יוכל לתת יותר פירוט לאיזוב קיר כמוני, אודה לו מאוד... :oops:
פורסם במקור בפורום CODE613 ב11/05/2017 22:09 (+03:00)
-
דבר ראשון תודה.
דבר שני
א. אני לא רואה את הרפרנס הזה. יש רק , Microsoft XML, v3.0/6.0 גם לא למעלה בחסרים.
ב. GetCurrentPhoneExtension, PBX_GetAddress , URLEncodeאולי זה תלוי הא בהא? כבר אמרתי שאני עמארץ.
פורסם במקור בפורום CODE613 ב11/05/2017 22:46 (+03:00)
-
א. בדיוק התכוונתי להם, תבחר ב6.
ב. את שורה 2 תמחוק לגמרי.
את PBX_GetAddress תחליף בכתובת של המרכזיה ("10.0.0.34" או "mer566.sys7.co.il").
לUrlEncode תוסיף את הפונציה הזאת, מקוה שיעבוד:Public Function URLEncode( _ StringToEncode As String, _ Optional UsePlusRatherThanHexForSpace As Boolean = False _ ) As String Dim TempAns As String Dim CurChr As Integer CurChr = 1 Do Until CurChr - 1 = Len(StringToEncode) Select Case Asc(Mid(StringToEncode, CurChr, 1)) Case 48 To 57, 65 To 90, 97 To 122 TempAns = TempAns & Mid(StringToEncode, CurChr, 1) Case 32 If UsePlusRatherThanHexForSpace = True Then TempAns = TempAns & "+" Else TempAns = TempAns & "%" & Hex(32) End If Case Else TempAns = TempAns & "%" & _ Right("0" & Hex(Asc(Mid(StringToEncode, _ CurChr, 1))), 2) End Select CurChr = CurChr + 1 Loop URLEncode = TempAns End Function
פורסם במקור בפורום CODE613 ב11/05/2017 23:00 (+03:00)
-
אם אני מוחק את שורה 2 אני צריך לתת לו שלוחה כדי ששורה 4 לא יפעל...
__
עריכה:
מצאתי שזה URL המוציא שיחה. אם אני מדביק את זה בדפדפן הוא עושה את זה..
"http://10.0.0.4/adr.htm?adrnumber=" & number & "&outgoing=100000000@sip1.015pbx.net"לא יודע אם זה הדרך המומלצת, אבל אם כן, אז עכשיו אשאל איך אני מפעיל אותו מאקסס בלי לפתוח דפדפן... ?
פורסם במקור בפורום CODE613 ב11/05/2017 23:16 (+03:00)
-
א. זה פרמטר שהפונקציה מקבלת, כלול אותה בקריאה לפונקציה.
ב. קוד ממש דומה לזה שלעיל.
Dim urladdress As String Dim number As string number = "0500000000" urladdress = "http://10.0.0.4/adr.htm?adrnumber=" & number & "&outgoing=100000000@sip1.015pbx.net" Dim xmlDoc As MSXML2.DOMDocument60 Set xmlDoc = New MSXML2.DOMDocument60 xmlDoc.Async = True xmlDoc.Load (urladdress)
פורסם במקור בפורום CODE613 ב12/05/2017 00:14 (+03:00)
-
סליחה שלא הייתי כאן כדי לתחזק את התשובה שלי (לאחרונה אני עסוק עד מוות ועד בכלל), ותודה לדוד על הטיפול המסור.
איזה אנשים מעניינים גרים פה בפורום.
בן אדם מבקש עזרה, עוזרים לו, ומתנצלים... :lol:תודה לכולם..
ושאלה, עכשיו זה יותר תיאורטית.
הדרך הזה של החיוג טוב רק לחיוג של הטלפון שלי, לא?
במקרה של טלפון אחר/חברה אחרת אצטרך משהו אחר?
למה אני שואל, כי בקוד של ארכיטקט זה היה נראה יותר גלובלי, לא כך?פורסם במקור בפורום CODE613 ב14/05/2017 23:30 (+03:00)
-
הדרך הזה של החיוג טוב רק לחיוג של הטלפון שלי, לא?
במקרה של טלפון אחר/חברה אחרת אצטרך משהו אחר?
למה אני שואל, כי בקוד של ארכיטקט זה היה נראה יותר גלובלי, לא כך?מה שנתתי לך זה בסך הכל קריאה ל HTTP, השיטה הכי רווחת היום זה שאפליקציות ידברו ביניהן דרך קריאות HTTP, כי אז לא ממש משנה איך אתה כותב את הקוד שלך באותו צד. מה שאומר שאתה יכול גם לבנות בעיקרון אקסס שידבר עם תוכנת בינה מלאכותית, וממש ניתן לעשות זאת דרך קריאות HTTP.
אם אתה רוצה לבנות משהו גנרי אתה יכול להשתמש באבסטרקציות שונות בתוך הקוד שלך (שממנו מבוצע החיוג בפועל) כלומר לבנות עוד שכבה שתתווך בין האקסס שלך לבין החייגן, ושם אתה תחליט מה מי מו וכו'.
פורסם במקור בפורום CODE613 ב15/05/2017 15:13 (+03:00)
-
-
זה תלוי בתוכנה שאיתה החברה מתנהלת, אני לא יודע איפה יושב השרת של המרכזייה שלך, מה שאני ראיתי באסטריסק יש קוד PHP שעושה את העבודה (זה יושב על לינוקס) ואם זו חברה מסודרת ויש שם מישהו עם מבטא רוסי כבד, יש סיכוי שיש להם URL כזה פשוט תשאל אותם.
פורסם במקור בפורום CODE613 ב16/05/2017 00:09 (+03:00)
-
יש לך את הAPI הפנימי של 015. (ראאיתי שאתה עובד איתם)
כאן
https://www.015pbx.net/local/guide/dev/json/index.htmlפורסם במקור בפורום CODE613 ב16/05/2017 01:34 (+03:00)