[سؤال] طلب كود امر اتصال بالهاتف المنزلي - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم لغات البرمجة الاخرى (http://vb4arb.com/vb/forumdisplay.php?fid=4) +--- قسم : قسم لغة vb6.0 (http://vb4arb.com/vb/forumdisplay.php?fid=18) +--- الموضوع : [سؤال] طلب كود امر اتصال بالهاتف المنزلي (/showthread.php?tid=3618)

طلب كود امر اتصال بالهاتف المنزلي - فـ ـيـ ـصـ ـل - 09-08-14 السلام عليكم ورحمه الله وبركاته الله يسعدكم جميعا ويوفقكم يارب الفكره ان اشبك سلك هاتف المنزلي في الكمبيوتر و الهاتف في المشروع فيجوال بيسك اضع رقم هاتف + زر اتصال مجرد ما اضغط اتصال على اي رقم يتحول الاتصال من الكمبيوتر الى الهاتف يعني الكمبيوتر يعطي للهاتف اوامر اتصال ويفتح سبيكر بالهاتف ويتم اتصال بالرقم الى تم وضعه في الكمبيوتر اتمنى وصلت لكم الفكرة اتمنى المساعدة منكم ياحبايبي وشكرا لكم RE: طلب كود امر اتصال بالهاتف المنزلي - king2512010 - 10-08-14 اخى / فيصل السلام عليكم ورحمة الله وبركاته .. اليك هذا الكود ... Private Declare Function tapiRequestMakeCall Lib "TAPI32.DLL" (ByVal DestAddr$, ByVal AppName As String, ByVal CalledParty As String, ByVal Comment As String) As Long Public Sub CallPhone(Number As String, Name As String) Dim lRes As Long Dim result As Long ' هذا الأجراء يقوم بالأتصال عن طريق الهاتف lRes = tapiRequestMakeCall(Trim(Number), App.Title, Trim(Name), "") Debug.Print Now; " CallPhone -> tapiRequestMakeCall Result code = "; lRes End Sub Private Sub Command1_Click() CallPhone "0096396993175", "AL-MOZAMGER" End Sub ويمكنك تحميل المرفق .... منقول RE: طلب كود امر اتصال بالهاتف المنزلي - فـ ـيـ ـصـ ـل - 15-08-14 ربي يعطيك الف عافيه ويوفقك RE: طلب كود امر اتصال بالهاتف المنزلي - MicroDoha - 14-04-16 بارك الله فيكم جميعاً ... بالتوفيق