تماس تلفنی بوسیله vb

[saeid taheri]

آیا کسی می دونه که چگونه می توان بوسیله vb تماس تلفنی گرفت اگر کسی کد مورد نظر را دارده من ممنون می شم که منو راهنمایی کنه
متشکرم - طاهری :?:

[بابک زواری]

شما به کمک باز کردن پورت میتونید این کار رو انجام بدید مثال کامل اون در
msdn مربوط به vb6 قرار داده شده با یک جستجو میتونید پیدا کنید.

[saeid taheri]

خیلی ممنون - آیا شما خودتان کدی ندارید
متشکرم - طاهری

[بابک زواری]

متاسفانه کدی رو که این کار رو انجام میده نمیدونم کجاست وگرنه
براتون می فرستادم.

[روح اله معینی زاده]

با سلام خدمت دوست گرامی :roll:

شما برای این کار باید یک مولفه (Component) تلفن به برنامه خود اضافه کنید. برای این کار بعد از زدن کلیدهای کنترل و تی (Ctrl+T) از لیست ظاهر شده گزینه Microsoft Comm Control را انتخاب نمایید. سپس بعد از تایید پنجره ظاهر شده، یک نمونه از آن را روی فرم خود اضافه کنید.

برای کار با این مولفه شما در مرحله اول باید خاصیت CommPort آن را تنظیم نمایید. این خاصیت یک عدد است که شماره درگاه مودم شما می باشد (مثلا 3 یا 4) . بعد از آن باید یک رشته که شامل نوع تماس (تن یا پالس) و شماره تلفن است ایجاد نمایید که در هنگام ارسال به خط تلفن، برای شما شماره بگیرد. باز کردن و بستن درگاه هم که جزو ضروریات کار می باشد.

با توجه به موارد ذکر شده فوق، کد مربوطه به شکل زیر می تواند باشد:

Dim dial As String, Telephone As String
dial = "ATDP" + Telephone + vbCr + ";"
MSComm.PortOpen = True
MSComm.Output = dial
MSComm.PortOpen = False

در کد فوق دو متغیر تعریف شده که اولی برای تعریف رشته ارسالی به مودم می باشد و دومی شماره تلفن را در خود نگه می دارد که شما به دلخواه خود می توانید آن را مقدار دهی کنید.
بعد درگاه باز شده و آماده شماره گیری شده است. در مرحله اصلی رشته تماس گیری، ارسال شده است.
توجه داشته باشید که دستور آخر، یعنی بستن درگاه باید زمانی انجام شود که شما دیگر نیازی به باز بودن آن ندارید. در حالت عادی که شما با سیستم شماره گیری کرده و بعد گوشی تلفن را بر می دارید و مکالمه را انجام می دهید، بستن این درگاه با توجه به خارج شدن عملیات از سیستم به دستگاه تلفن، بدون اشکال است ولی در موارد دیگر مانند ارسال اطلاعات و ... این کار موجب قطع عملیات خواهد شد. :!:

در خصوص تنظیم CommPort، چون این خاصیت را می توان در خواص شی تعریف نمود، من این کار را علی رغم اینکه می شد در حین اجرای برنامه تنظیم کنم، انجام ندادم. شما در صورتی که نیاز به این امر را در کار خود می بینید، می توانید آن را قبل از اینکه درگاه را باز کنید، انجام دهید.

در پایان یادآور می شوم در صورتی که خط شما پالس (Pulse) است از روش ارسال بالا می توانید استفاده کنید و اگر هم که تن (Tone) است باید آن را به شکل زیر تغییر دهید. (اطمینان دارم که متوجه تغییر شده اید)


dial = "ATDT" + Telephone + vbCr + ";"

امیدوارم مفید فایده واقع شود. در ضمن از دوستانی که به صورت تخصصی با این مقوله کار کرده اند خواهشمندیم نظرات خود را بنویسند. اگر هم امکان دارد در قسمت مقالات VB بحث را انجام دهید.

با احترام- خدانگهدار

[بابک زواری]

یک نکته اینکه وقتی برای تماس تلفنی پورت را باز کردید دوباره نباید این کار
را انجام دهید چون باعث قطع تماس خواهد شد و نکته دوم اینکه وقتی اطلاعات
زیادی را روی پورت میفرستید حتما چند میلی ثانیه بین فرستادن اطلاعات
تاخیر ایجاد کنید چون در غیر اینصورت اطلاعات شما را دستگاه مقصد درست
دریافت نمیکند البته فقط چند میلی ثانیه نه بیشتر.
موفق باشید.

[Programing]

سلام دوست عزیز مدتها بود که دنبال پیدا کردن جواب برای همین سوال بودم
از شما ممنون هستم
kh_zp :wink:

[R_BABAZADEH]

1 ایا کسی برای کار با تلفن از دستورات TAPI استفاده کرده.
2 ایا کسی از طریق کارت مودم توانسته بوق اشغال را مشخص کند :متفکر:

[Vahab]

Thank you

[saeid taheri]

دوستان عزیز خیلی از راهنمایی شما متشکرم :)

[Mehrdad_Barnamenevis]

البته کامپوننت خیلی بهتری هم هست !!

مثل MSW6Comm کنترل
که یه هایپر ترمینال کامل میشه باهاش ساخت !!! 8)

[mostafa313]

جناب مهرداد خات این کام÷وننت چیه و از کجا میشه دانلودش کرد
اگه یه لینک بدین ممنون میشم

[Mehrdad_Barnamenevis]

اگه یه مقدار تو اینترنت سرچ کنید پیداش میکنید !!!!

[R_BABAZADEH]

من که چیزی تو اینترنت از طریق google پیدا نکردم :?: :( :?:

[بابک زواری]

Microsoft Comm Control که توضیح داده شده بدک نیست من یک کار نسبتا پیچیده رو با همین
انجام دادم و هیچ مشکلی هم نداره.

[sabair]

دوست عزیز بیشتر توضیح دهید که چگونه می توان تماس تلفنی در ویژوال بیسک را حل بگوید
یا برنامه دارید آپلود کنید

[valass]

سلام . خسته نباشید دوستان . از اینکه می بینم بچه های فعال اینجا زیادن خوشحالم .و یه سئوال داشتم . می خواستم برنامه تلفن گویا درست کنم . کسی هست که تو این زمینه بتونه به من کمک کنه ؟ممنون می شم اگه راه درست رونشونم بده.

[yavari]

سلام

Please Go To
http://barnamenevis.org/forum/showthread.php?t=42402

موفق باشید

[sabair]

آیا سورس را داری

[saeid taheri]

اگر یکی از دوستان یک نمونه کار ارائه بدهد برای بقیه مفید می باشد
با تشکر