وبلاگ تخصصي برنامه نويسي با VB

TAPI در ويژوال بيسيک - بخش پايانی


دريافت يک تماس :

کد زير برای يافتن و يا ايجاد يک ترمينال مناسب برای دريافت يک تماس بکار می رود . بايستی توجه داشته باشيد که قبل از اجرای کد زير بايستی مراحل مقداردهی اوليه ، انتخاب يک آدرس و رجيسر کردن event ها را انجام دهيد . همچنين در کد زير بايستی مرحله انتخاب ترمينال را نيز انجام دهيد . توجه داشته باشيد که در کد زير متغير pEvent يک اشاره گر برای واسط ITCallNotificationEvent است که توسط TAPI به event Handler داده می شود :

If TapiEvent = TE_CALLNOTIFICATION Then
Dim objCallNotificationEvent As ITCallNotificationEvent
Set objCallNotificationEvent = pEvent
Dim gobjReceivedCallInfo As ITCallInfo
Set gobjReceivedCallInfo = objCallNotificationEvent.Call
Dim objCallControl As ITBasicCallControl
Set objCallControl = gobjReceivedCallInfo
objCallControl.Answer
End If




+ بخاطر طولانی شدن اين سری مطالب و نيز تخصصی بودن آن که باعث می شود مخاطبين کمتری داشته باشد بحث TAPI را به همين جا خاتمه می دهم . اما برای دوستان علاقمند که بخواهند مطالب بيشتری در اين زمينه آموخته و نيز مثالهای عملی از نوشتن برنامه های TAPI را در اختيار داشته باشند لينکهای زير را معرفی می کنم :
آموزش TAPI در سايت MSDN
سوالات مختلف در مورد TAPI
سوالات مختلف در مورد TAPI
Active Call Center
يک کنترل ActiveX برای استفاده از TAPI
نمونه ای از يک برنامه کامل TAPI در ويژوال بيسيک
TAPI در ويژوال بيسيک
کتابی در مورد برنامه نويسی TAPI در ويژوال بيسيک

+ مبحث بعدی : نوشتن کلاسهای اکتيو ايکس سمت سرور ( Server-Side ActiveX Dll ) برای استفاده در صفحات ASP


+ حامد شیدائیان ; ۱٠:٥۳ ‎ق.ظ ; یکشنبه ۱٤ اردیبهشت ،۱۳۸٢
comment نظرات ()